From: Matt S Trout <mst@shadowcat.co.uk>
Date: Sun, 22 Jan 2017 12:51:40 +0000 (+0000)
Subject: don't fail tracing w/undef INC values due to failed optional module load
X-Git-Tag: v0.010007~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d06a35639f3e8df0332de587f732dd525d6c54a4;p=p5sagit%2FApp-FatPacker.git

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

diff --git a/Changes b/Changes
index b01a9f0..639864e 100644
--- 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
--- 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";
   }
 }