Sentinel test: minor fixes to --pause-on-error.

This commit is contained in:
antirez 2014-02-23 18:01:30 +01:00
parent afd3db17a0
commit 09dec3613e

View File

@ -124,11 +124,13 @@ proc main {} {
# on error in order to give the developer a chance to understand more about
# the error condition while the instances are still running.
proc pause_on_error {} {
puts ""
puts [colorstr yellow "*** Please inspect the error now ***"]
puts "\nType \"continue\" to resume the test."
while {[gets stdin] ne {continue}} {
puts "> "
puts "\nType \"continue\" to resume the test.\n"
while 1 {
puts -nonewline "> "
flush stdout
if {[gets stdin] eq {continue}} break
}
}