Enhance REPL test

rakudo · Oct 15, 2019 · 637c1af · 637c1af
1 parent 9e70bde
commit 637c1af
Showing 1 changed file with 1 addition and 11 deletions.
diff --git a/t/02-rakudo/repl.t b/t/02-rakudo/repl.t
@@ -6,23 +6,13 @@ use Test::Helpers;
 plan 45;
 
 my $*REPL-SCRUBBER = -> $_ is copy {
-    if $*DISTRO.is-win {
     s/^^ "You may want to `zef install Readline` or `zef install Linenoise`"
         " or use rlwrap for a line editor\n\n"//;
-    s/^^ "To exit type 'exit' or '^Z'\n"//;
+    $*DISTRO.is-win ?? s/^^ "To exit type 'exit' or '^Z'\n"// !! s/^^ "To exit type 'exit' or '^D'\n"//;
     s:g/ ^^ "> "  //; # Strip out the prompts
     s:g/    ">" $ //; # Strip out the final prompt
     s:g/ ^^ "* "+ //; # Strip out the continuation-prompts
     $_
-    } else {
-    s/^^ "You may want to `zef install Readline` or `zef install Linenoise`"
-        " or use rlwrap for a line editor\n\n"//;
-    s/^^ "To exit type 'exit' or '^D'\n"//;
-    s:g/ ^^ "> "  //; # Strip out the prompts
-    s:g/    ">" $ //; # Strip out the final prompt
-    s:g/ ^^ "* "+ //; # Strip out the continuation-prompts
-    $_
-    }
 }
 
 {