diff options
Diffstat (limited to 't/cmd.while')
| -rw-r--r-- | t/cmd.while | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/cmd.while b/t/cmd.while index a48318897f..53fdb1014a 100644 --- a/t/cmd.while +++ b/t/cmd.while @@ -1,6 +1,6 @@ #!./perl -# $Header: cmd.while,v 2.0 88/06/05 00:12:31 root Exp $ +# $Header: cmd.while,v 3.0 89/10/18 15:25:07 lwall Locked $ print "1..10\n"; @@ -18,7 +18,7 @@ open(fh,'Cmd.while.tmp') || die "Can't open Cmd.while.tmp."; while (<fh>) { last if /vt100/; } -if (!eof && /vt100/) {print "ok 1\n";} else {print "not ok 1\n";} +if (!eof && /vt100/) {print "ok 1\n";} else {print "not ok 1 $_\n";} # test "next" command |