[Bast-commits] r3732 - local-lib/1.000/trunk/lib/local

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2007-09-13 23:00:46 +0100 (Thu, 13 Sep 2007)
New Revision: 3732

Modified:
   local-lib/1.000/trunk/lib/local/lib.pm
Log:
populate @INC as well as $ENV{PERL5LIB}

Modified: local-lib/1.000/trunk/lib/local/lib.pm
===================================================================
--- local-lib/1.000/trunk/lib/local/lib.pm	2007-09-13 22:00:06 UTC (rev 3731)
+++ local-lib/1.000/trunk/lib/local/lib.pm	2007-09-13 22:00:46 UTC (rev 3732)
@@ -135,6 +135,7 @@
     exit 0;
   } else {
     $class->setup_env_hash_for($path);
+    unshift(@INC, split(':', $ENV{PERL5LIB}));
   }
 }