diff options
| author | Michael G. Schwern <schwern@pobox.com> | 2001-09-06 23:30:41 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-07 12:21:30 +0000 |
| commit | 2fe373ce2a1c176022df002e73eae7d1ec7f2768 (patch) | |
| tree | 008cd0831382ef634f7d146261a1ca605376975f /t/TEST | |
| parent | db2a39d535b6d8484c7749869545e2a2d2f00c6a (diff) | |
| download | perl-2fe373ce2a1c176022df002e73eae7d1ec7f2768.tar.gz | |
Test::Harness 1.25 sync
Message-ID: <20010907033041.A2796@blackrider>
p4raw-id: //depot/perl@11931
Diffstat (limited to 't/TEST')
| -rwxr-xr-x | t/TEST | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -226,7 +226,7 @@ EOT $ok = 1; } else { - if (/^(not )?ok (\d+)(\s*#.*)?/ && + if (/^(not )?ok (\d+)[^#]*(\s*#.*)?/ && $2 == $next) { my($not, $num, $extra) = ($1, $2, $3); |