<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">=== modified file 't/21debug.t'
--- t/21debug.t	2015-03-08 15:05:44 +0000
+++ t/21debug.t	2015-03-10 12:12:14 +0000
@@ -57,7 +57,7 @@
       $LINE = __LINE__; my $f = Future-&gt;fail("Failed!");
       undef $f;
    },
-   qr/^Future=\S+ was constructed at \Q$0\E line $LINE and was lost near \Q$0\E line $LOSTLINE with an unreported failure of: Failed!/,
+   qr/^Future=\S+ was constructed at \Q$0\E line $LINE and was lost near \Q$0\E line (?:$LOSTLINE|${\($LINE+1)}) with an unreported failure of: Failed!/,
    'Destroyed failed future raises warning' );
 
 {

</pre></body></html>