add a default to @inc

rakudo-p5 · May 15, 2013 · a88e1a0 · a88e1a0
1 parent d9849d7
commit a88e1a0
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/lib/Perl5.nqp b/lib/Perl5.nqp
@@ -25,6 +25,7 @@ sub EXPORT(*@a) {
             my %INC := $INC.FLATTENABLE_HASH();
             unless nqp::existskey(%INC, 'Perl5') {
                 %INC<Perl5> := $*W.find_symbol(['Array']).new;
+                %INC<Perl5>.unshift: $*W.p6ize_recursive( %INC<perl> ~ '/lib/Perl5');
                 my $PERL5LIB := nqp::atkey(nqp::getenvhash(), 'PERL5LIB');
                 if nqp::defined($PERL5LIB) {
                     %INC<Perl5>.unshift: $*W.p6ize_recursive( nqp::split(':', $PERL5LIB) )