From 51b61c5969c5455a705eea01e7c1fda2fe026f57 Mon Sep 17 00:00:00 2001 From: Martin Berends Date: Wed, 26 May 2010 14:23:37 +0100 Subject: [PATCH] [Perl6/Compiler.pir] re-order @*INC again, '.' goes to the end, pmichaud++ --- src/Perl6/Compiler.pir | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Perl6/Compiler.pir b/src/Perl6/Compiler.pir index be2eb6c2d40..8b27aab508c 100644 --- a/src/Perl6/Compiler.pir +++ b/src/Perl6/Compiler.pir @@ -128,8 +128,6 @@ Perl6::Compiler - Perl6 compiler env = root_new ['parrot';'Env'] $S0 = env['PERL6LIB'] $P0 = split ':', $S0 - # append the current directory - push $P0, '.' # append ~/.perl6/lib $S0 = env['HOME'] if $S0 goto have_home # for users of unix-y systems @@ -148,6 +146,8 @@ Perl6::Compiler - Perl6 compiler concat $S0, $S1 concat $S0, '/languages/perl6/lib' push $P0, $S0 + # append the current directory + push $P0, '.' # remove this when 'use lib' works fine # $P0 now has all the directories, move them to @*INC $P1 = new ['Parcel'] # do not use '&circumfix:<[ ]>' because it makes a list of lists