X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FApp-FatPacker.git;a=blobdiff_plain;f=lib%2FApp%2FFatPacker%2FTrace.pm;h=277cf849131cbd3b2ca43621d8b5b16a11211c6d;hp=d58800e6988a9f47e0ad1b11f458689153d747a5;hb=8c96f6ee2785b5faaa2e12302ff4424d85f7d44f;hpb=ee7b216c399a38c112b685e8e855146da1bae954 diff --git a/lib/App/FatPacker/Trace.pm b/lib/App/FatPacker/Trace.pm index d58800e..277cf84 100644 --- a/lib/App/FatPacker/Trace.pm +++ b/lib/App/FatPacker/Trace.pm @@ -30,6 +30,7 @@ CHECK { for my $inc (keys %INC) { next if exists $initial_inc{$inc}; + next unless $INC{$inc} =~ /\Q${inc}\E\Z/; print $trace "$inc\n"; } }