X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flines.t;fp=t%2Flines.t;h=8927ad2c6c2d41115ba529cb53eaf78a58852a30;hb=2688337bafe83db36857a49ecfd39984ef08ee73;hp=d1d701c1099f23dc67b8c18c7047a58ef7c42ae9;hpb=9183b0403d3a4474807820ef9e62110298da31ba;p=p5sagit%2FDevel-Declare.git diff --git a/t/lines.t b/t/lines.t index d1d701c..8927ad2 100644 --- a/t/lines.t +++ b/t/lines.t @@ -47,9 +47,6 @@ my $line2 = __LINE__; #line 48 is(@lines, 2, "2 line numbers recorded"); is $lines[0], 100, "fun starts on line 100"; -{ - local $TODO = "line numbers aren't quite right yet, sometimes"; - is $lines[1], 101, "fun stops on line 101"; - is $line, 102, "next statement on line 102"; - is $line2, 103, "next statement on line 103"; -} +is $lines[1], 101, "fun stops on line 101"; +is $line, 102, "next statement on line 102"; +is $line2, 103, "next statement on line 103";