diff options
| author | jocuri%softhome.net <> | 2004-08-28 17:14:59 +0200 |
|---|---|---|
| committer | jocuri%softhome.net <> | 2004-08-28 17:14:59 +0200 |
| commit | e304adf98ba86c921c1e3df2ee623c2a302ae2b3 (patch) | |
| tree | 2e575825797a7d2c721c0b7b1aa9a202520bc283 /t/002goodperl.t | |
| parent | 840d608f8d9c553896d730b6199edc5f4b2d1c14 (diff) | |
| download | bugzilla-e304adf98ba86c921c1e3df2ee623c2a302ae2b3.tar.gz bugzilla-e304adf98ba86c921c1e3df2ee623c2a302ae2b3.tar.xz | |
Patch for bug 216572: 002goodperl.t shouldn't add an extra test for every additional Throw*Error violation in the same file; patch by Marc Schumann <marcschum@web.de>; r=kiko, a=justdave.
Diffstat (limited to 't/002goodperl.t')
| -rw-r--r-- | t/002goodperl.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/002goodperl.t b/t/002goodperl.t index 92a01fc2d..676cd1776 100644 --- a/t/002goodperl.t +++ b/t/002goodperl.t @@ -107,7 +107,7 @@ foreach my $file (@testitems) { my $lineno = 0; my $error = 0; - while (my $file_line = <FILE>) { + while (!$error && (my $file_line = <FILE>)) { $lineno++; if ($file_line =~ /Throw.*Error\("(.*?)"/) { if ($1 =~ /\s/) { |