diff options
author | Todd Lyons <tlyons@exim.org> | 2013-04-08 10:20:46 -0700 |
---|---|---|
committer | Todd Lyons <tlyons@exim.org> | 2013-04-08 10:32:12 -0700 |
commit | 825fae12de435166c3706fa21ea7ccc8423c48bb (patch) | |
tree | 4dc0442b4b21d21b7733a3b639a2f5165303099e | |
parent | 4c3e261358809a572aee804633234a4df35bfaf9 (diff) |
Fix runtest -CONTINUE to work everywhere
Changes the $more variable to just cat the changes to STDOUT and not
pipe it through less or more.
-rwxr-xr-x | test/runtest | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/test/runtest b/test/runtest index 0514c05f5..6623d3b4b 100755 --- a/test/runtest +++ b/test/runtest @@ -2165,7 +2165,9 @@ while (@ARGV > 0 && $ARGV[0] =~ /^-/) { if ($arg eq "-DEBUG") { $debug = 1; $cr = "\n"; next; } if ($arg eq "-DIFF") { $cf = "diff -u"; next; } - if ($arg eq "-CONTINUE"){$force_continue = 1; next; } + if ($arg eq "-CONTINUE"){$force_continue = 1; + $more = "cat"; + next; } if ($arg eq "-UPDATE") { $force_update = 1; next; } if ($arg eq "-NOIPV4") { $have_ipv4 = 0; next; } if ($arg eq "-NOIPV6") { $have_ipv6 = 0; next; } @@ -3461,9 +3463,10 @@ foreach $test (@test_list) for (;;) { print "\nshow stdErr, show stdOut, Retry, Continue (without file comparison), or Quit? [Q] "; - $_ = <T>; + $_ = $force_continue ? "c" : <T>; tests_exit(1) if /^q?$/i; log_failure($log_failed_filename, $testno, "exit code unexpected") if (/^c$/i && $force_continue); + print "... continue forced\n" if $force_continue; last if /^[rc]$/i; if (/^e$/i) { @@ -3499,9 +3502,10 @@ foreach $test (@test_list) for (;;) { print "\nShow server stdout, Retry, Continue, or Quit? [Q] "; - $_ = <T>; + $_ = $force_continue ? "c" : <T>; tests_exit(1) if /^q?$/i; log_failure($log_failed_filename, $testno, "exit code unexpected") if (/^c$/i && $force_continue); + print "... continue forced\n" if $force_continue; last if /^[rc]$/i; if (/^s$/i) |