chaotic behaviour when testing for pod_lines

metacpan · Mar 22, 2015 · 7da6c9f · 7da6c9f
1 parent 2e6e888
commit 7da6c9f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/t/release/badpod.t b/t/release/badpod.t
@@ -37,8 +37,8 @@ sub test_bad_pod {
     is $file->sloc, 3, 'sloc';
     is $file->slop, 4, 'slop';
 
-    p @{ $file->pod_lines };
-    is_deeply @{ $file->pod_lines }, [ [ 5, 7 ], ], 'no pod_lines';
+    p $file->pod_lines;
+    is_deeply $file->pod_lines, [ [ 5, 7 ], ], 'no pod_lines';
 
     is ${ $file->pod },