don't fail tracing w/undef INC values due to failed optional module load

diff --git a/Changes b/Changes
index b01a9f0..639864e 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,7 @@
 Revision history for App-FatPacker
 
+  - don't fail tracing w/undef INC values due to failed optional module load
+
 0.010_006 - 2017-01-20
   - detect and handle packing from within inc dirs w/version part
   - fix tests to no longer rely on . being in @INC

diff --git a/lib/App/FatPacker/Trace.pm b/lib/App/FatPacker/Trace.pm
index 277cf84..39c13a8 100644 (file)
--- 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";
   }
 }