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=39c13a89e92fdd6e8a08800d0657c4a0b9efbaf0;hp=277cf849131cbd3b2ca43621d8b5b16a11211c6d;hb=d06a35639f3e8df0332de587f732dd525d6c54a4;hpb=e2f73db69c6e105d5cf754ceb9f38030784c5965

diff --git a/lib/App/FatPacker/Trace.pm b/lib/App/FatPacker/Trace.pm
index 277cf84..39c13a8 100644
--- a/lib/App/FatPacker/Trace.pm
+++ b/lib/App/FatPacker/Trace.pm
@@ -30,7 +30,7 @@ CHECK {
 
   for my $inc (keys %INC) {
     next if exists $initial_inc{$inc};
-    next unless $INC{$inc} =~ /\Q${inc}\E\Z/;
+    next unless defined($INC{$inc}) and $INC{$inc} =~ /\Q${inc}\E\Z/;
     print $trace "$inc\n";
   }
 }