Fix warning from undef PERL5LIB

git-svn-id: http://dev.catalyst.perl.org/repos/bast/local-lib/1.000/trunk@7823 bd8105ee-0ff8-0310-8827-fb3f25b6796d

diff --git a/Changes b/Changes
index e0f7770..ae6891c 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,7 @@
 Revision history for local::lib
 
+        - Fix warning if your $ENV{PERL5LIB} is undef
+
 1.004008 2009-10-13
 
         - Clarify re-reading the shell config file after writing to it.

diff --git a/lib/local/lib.pm b/lib/local/lib.pm
index d45ed1d..1b030b6 100644 (file)
--- a/lib/local/lib.pm
+++ b/lib/local/lib.pm
@@ -21,7 +21,7 @@ Please see `perldoc local::lib` for directions on using this module.
 DEATH
 
   # Remember what PERL5LIB was when we started
-  my $perl5lib = $ENV{PERL5LIB};
+  my $perl5lib = $ENV{PERL5LIB} || '';
 
   my %arg_store;
   for my $arg (@args) {