From: t0m <t0m@bd8105ee-0ff8-0310-8827-fb3f25b6796d>
Date: Wed, 28 Oct 2009 10:53:29 +0000 (+0000)
Subject: Fix warning from undef PERL5LIB
X-Git-Tag: 1.006009~53
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2Flocal-lib.git;a=commitdiff_plain;h=ea0824e71a82f5e516b93daaf872dc548436f194

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
--- 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
--- 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) {