X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2Flib%2Findirect%2FTest2.pm;fp=t%2Flib%2Findirect%2FTest2.pm;h=296b66ad51ad6dc3b789bb8766423bbe427276e5;hb=f8f57e18d37518ed81956e1bdadb5757dec206d5;hp=0000000000000000000000000000000000000000;hpb=4e2370e14767646be62be5902c16580a75a55eed;p=perl%2Fmodules%2Findirect.git

diff --git a/t/lib/indirect/Test2.pm b/t/lib/indirect/Test2.pm
new file mode 100644
index 0000000..296b66a
--- /dev/null
+++ b/t/lib/indirect/Test2.pm
@@ -0,0 +1,8 @@
+no indirect ":fatal";
+my $x;
+if ($x) {
+my $y = qq{abcdef
+ @{[$x->new]}
+ };
+}
+1;