get prompt from array

onnenon · Apr 30, 2024 · 6783322 · 6783322
1 parent 7c63b6b
commit 6783322
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/dist/main.js b/dist/main.js
@@ -5246,11 +5246,12 @@ var $author$project$Main$Model = F4(
 	function (prompt, title_text, command, typing) {
 		return {command: command, prompt: prompt, title_text: title_text, typing: typing};
 	});
+var $author$project$Main$get_prompt = 'λ';
 var $elm$core$Platform$Cmd$batch = _Platform_batch;
 var $elm$core$Platform$Cmd$none = $elm$core$Platform$Cmd$batch(_List_Nil);
 var $author$project$Main$init = function (_v0) {
 	return _Utils_Tuple2(
-		A4($author$project$Main$Model, 'λ', '', './onn.sh', true),
+		A4($author$project$Main$Model, $author$project$Main$get_prompt, '', './onn.sh', true),
 		$elm$core$Platform$Cmd$none);
 };
 var $author$project$Main$TypeCommand = {$: 'TypeCommand'};

diff --git a/src/Main.elm b/src/Main.elm
@@ -28,7 +28,12 @@ type Msg
 
 init : () -> ( Model, Cmd Msg )
 init _ =
-    ( Model "λ" "" "./onn.sh" True, Cmd.none )
+    ( Model get_prompt "" "./onn.sh" True, Cmd.none )
+
+
+get_prompt : String
+get_prompt =
+    "λ"
 
 
 main : Program () Model Msg