debug

metacpan · Mar 20, 2015 · 4958017 · 4958017
1 parent 2241316
commit 4958017
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/t/release/badpod.t b/t/release/badpod.t
@@ -37,7 +37,7 @@ sub test_bad_pod {
     is $file->sloc, 3, 'sloc';
     is $file->slop, 4, 'slop';
 
-    p $file->pod_lines;
+    p \@{ $file->pod_lines };
     is_deeply $file->pod_lines, [ [ 5, 7 ], ], 'no pod_lines';
 
     is ${ $file->pod },