X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=lib%2Findirect.pm;h=6e99ebaf06b7ae490e2911b884edf7894bfa8b5a;hp=734896a4d6db6bd5ac02a1a971996d13b8b7ae63;hb=feceaa694dff65ca67ac26a13b67e2c0f8bbb795;hpb=3073451bb3c0e963ca447441f101f00c29f50f03

diff --git a/lib/indirect.pm b/lib/indirect.pm
index 734896a..6e99eba 100644
--- a/lib/indirect.pm
+++ b/lib/indirect.pm
@@ -162,6 +162,9 @@ C<meth $obj> (no semicolon) at the end of a file won't be seen as an indirect ob
 With 5.8 perls, the pragma does not propagate into C<eval STRING>.
 This is due to a shortcoming in the way perl handles the hints hash, which is addressed in perl 5.10.
 
+The search for indirect method calls happens before constant folding.
+Hence C<my $x = new Class if 0> will be caught.
+
 =head1 DEPENDENCIES
 
 L<perl> 5.8.