rebuild

gugod · Nov 23, 2015 · 99d2681 · 99d2681
1 parent 8478560
commit 99d2681
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/perlbrew b/perlbrew
@@ -1,6 +1,12 @@
 #!/usr/bin/perl
 
-BEGIN { use Config; @INC = @Config{qw(vendorlibexp privlibexp archlibexp sitelibexp sitearchexp)} };
+use Config;
+BEGIN {
+    my @oldinc = @INC;
+    @INC = ( $Config{sitelibexp}."/".$Config{archname}, $Config{sitelibexp}, @Config{qw<vendorlibexp vendorarchexp archlibexp privlibexp>} );
+    require Cwd;
+    @INC = @oldinc;
+}
 
 
 # This chunk of stuff was generated by App::FatPacker. To find the original