1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
|
Description: mark tests as TODO until Sub::Name is fixed
Origin: vendor
Bug: https://github.com/timbunce/devel-nytprof/issues/34
Bug-Debian: https://bugs.debian.org/755332
Forwarded: not-needed, the idea is from there
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2014-07-24
--- a/t/70-subname.t
+++ b/t/70-subname.t
@@ -39,10 +39,11 @@
is $sub->subname, 'main::named';
SKIP: {
- skip "Sub::Name 0.06 required for subname line numbers", 2
- if $Sub::Name::VERSION <= 0.06;
- is $sub->first_line, 3;
- is $sub->last_line, 3;
+ {
+ local $TODO = "Sub::Name problems, cf. CPAN RT #50524";
+ is $sub->first_line, 3;
+ is $sub->last_line, 3;
+ }
}
},
});
|