test: update test_valid_keymap to have a smaller prompt

frazze-jobb · Oct 30, 2023 · a06ce68 · a06ce68
1 parent 7606788
commit a06ce68
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/lib/kernel/test/interactive_shell_SUITE.erl b/lib/kernel/test/interactive_shell_SUITE.erl
@@ -1215,6 +1215,10 @@ shell_ignore_pager_commands(Config) ->
 test_valid_keymap(Config) when is_list(Config) ->
     DataDir = proplists:get_value(data_dir,Config),
     Term = setup_tty([{args, ["-config", DataDir ++ "valid_keymap.config"]} | Config]),
+    Prompt = fun() -> ["\e[94m",54620,44397,50612,47,51312,49440,47568,"\e[0m"] end,
+    erpc:call(Term#tmux.node, application, set_env,
+              [stdlib, shell_prompt_func_test,
+               proplists:get_value(shell_prompt_func_test, Config, Prompt)]),
     try
         check_not_in_content(Term, "Invalid key"),
         check_not_in_content(Term, "Invalid function"),
@@ -1223,7 +1227,7 @@ test_valid_keymap(Config) when is_list(Config) ->
         check_content(Term, ">$"),
         send_tty(Term, "1.\n"),
         send_tty(Term, "C-b"),
-        check_content(Term, "2>\\s1\\s?.$"),
+        check_content(Term, "2>\\s1.$"),
         ok
     after
         stop_tty(Term),