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;
+ }
}
},
});
|
