X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FApp%2FFatPacker.pm;fp=lib%2FApp%2FFatPacker.pm;h=0ca5c862dd5806d48c3e68189b47fad30add0f57;hb=15bd679ef3818ea9264956dbc15d19a7b2dfbc36;hp=b5baa36590a87b28246e5e468f4d84392de9405d;hpb=ab7608eef71b34a00dabc43403352bad63a35726;p=p5sagit%2FApp-FatPacker.git diff --git a/lib/App/FatPacker.pm b/lib/App/FatPacker.pm index b5baa36..0ca5c86 100644 --- a/lib/App/FatPacker.pm +++ b/lib/App/FatPacker.pm @@ -283,20 +283,18 @@ sub fatpack_end { }; } return; - } + }; } else { - *{"${class}::INC"} = sub { - if (my $fat = $_[0]{$_[1]}) { + if (my $fat = $_[0]{$_[1]}) { open my $fh, '<', \$fat or die "FatPacker error loading $_[1] (could be a perl installation issue?)"; return $fh; } return; }; - } unshift @INC, bless \%fatpacked, $class;