diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-01-23 15:18:30 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-01-23 15:18:30 +0000 |
| commit | c7dd0d64a9c73f2676b6c4e66eea777c2f908725 (patch) | |
| tree | 4a86b65a3db083e3470386f2020eab3c90ec4753 /t | |
| parent | 6fbb66d654f8539b40e6cdc4ce45f9e073f37d64 (diff) | |
| download | perl-c7dd0d64a9c73f2676b6c4e66eea777c2f908725.tar.gz | |
Missing chunk in change #26926
p4raw-link: @26926 on //depot/perl: 6fbb66d654f8539b40e6cdc4ce45f9e073f37d64
p4raw-id: //depot/perl@26927
Diffstat (limited to 't')
| -rwxr-xr-x | t/op/taint.t | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/t/op/taint.t b/t/op/taint.t index 3d333c840f..b54426229f 100755 --- a/t/op/taint.t +++ b/t/op/taint.t @@ -1140,12 +1140,11 @@ TERNARY_CONDITIONALS: { { my @a; + local $::TODO = 1; $a[0] = $^X; my $i = 0; while($a[0]=~ m/(.)/g ) { last if $i++ > 10000; } cmp_ok $i, '<', 10000, "infinite m//g"; - } - |