diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-21 12:52:37 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-21 12:52:37 +0000 |
commit | 395ddfe62c8314bb91a6a28057648356e4dfc9bf (patch) | |
tree | d4c60aa5144bf40b8b702b3232713db2293f910c /t | |
parent | f206cdda513dcda39e1ced147a33b8497001ef8b (diff) | |
download | perl-395ddfe62c8314bb91a6a28057648356e4dfc9bf.tar.gz |
Case of confused test numbering.
p4raw-id: //depot/perl@10778
Diffstat (limited to 't')
-rwxr-xr-x | t/op/pat.t | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/t/op/pat.t b/t/op/pat.t index f8f75358bb..2531d71954 100755 --- a/t/op/pat.t +++ b/t/op/pat.t @@ -6,7 +6,7 @@ $| = 1; -print "1..632\n"; +print "1..634\n"; BEGIN { chdir 't' if -d 't'; @@ -1786,13 +1786,13 @@ EOT #test /o feature sub test_o { $_[0] =~/$_[1]/o; return $1} if(test_o('abc','(.)..') eq 'a') { - print "ok 631\n"; + print "ok 633\n"; } else { - print "not ok 631\n"; + print "not ok 633\n"; } if(test_o('abc','..(.)') eq 'a') { - print "ok 632\n"; + print "ok 634\n"; } else { - print "not ok 632\n"; + print "not ok 634\n"; } |