diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-02-12 15:31:56 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-02-12 15:31:56 +0000 |
| commit | 3ba77b89580e34a853517cf1c65fef5db14ac82e (patch) | |
| tree | 0b89fceaadc27b2120c0f8592be2dcee47ea0b9e /t | |
| parent | ebca63ee5f1955c84450c209cba0b49a23ad2f27 (diff) | |
| download | perl-3ba77b89580e34a853517cf1c65fef5db14ac82e.tar.gz | |
Un-TODO tests avec change #30228
p4raw-link: @30228 on //depot/perl: ebca63ee5f1955c84450c209cba0b49a23ad2f27
p4raw-id: //depot/perl@30229
Diffstat (limited to 't')
| -rw-r--r-- | t/comp/parser.t | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/t/comp/parser.t b/t/comp/parser.t index 95be22dfea..0d2f4d6e7d 100644 --- a/t/comp/parser.t +++ b/t/comp/parser.t @@ -285,8 +285,6 @@ sub check ($$$) { my ($file, $line, $name) = @_; my (undef, $got_file, $got_line) = caller; like ($got_file, $file, "file of $name"); - local $TODO; - $TODO = "For some wrong reason PL_copline is 1" if $line == 51; is ($got_line, $line, "line of $name"); } |