Add valid project name suggestion for GleamReservedModule

Author: diemogebhardt

compiler-cli/src/new.rs

@@ -368,7 +368,7 @@ fn suggest_valid_name(invalid_name: &str, reason: &InvalidProjectNameReason) ->
                 let suggestion = stripped.to_string();
                 match validate_name(&suggestion) {
                     Ok(_) => Some(suggestion),
-                    Err(_) => None,
+                    Err(_) => Some(format!("{}_app", invalid_name)),
                 }
             }
             _ => None,
@@ -378,7 +378,7 @@ fn suggest_valid_name(invalid_name: &str, reason: &InvalidProjectNameReason) ->
             Some(format!("{}_app", invalid_name))
         }
         InvalidProjectNameReason::GleamReservedWord => Some(format!("{}_app", invalid_name)),
-        InvalidProjectNameReason::GleamReservedModule => None,
+        InvalidProjectNameReason::GleamReservedModule => Some(format!("{}_app", invalid_name)),
         InvalidProjectNameReason::FormatNotLowercase => Some(invalid_name.to_lowercase()),
         InvalidProjectNameReason::Format => {
             let suggestion = regex::Regex::new(r"[^a-z0-9]")

compiler-cli/src/new/tests.rs

@@ -401,7 +401,7 @@ fn suggest_valid_names() {
             "gleam",
             &crate::new::InvalidProjectNameReason::GleamReservedModule
         ),
-        None
+        Some("gleam_app".to_string())
     );
 
     assert_eq!(