Merge remote branch 'johncm/master' into develop

gugod · Jun 22, 2011 · d102362 · d102362
2 parents 7532b63 + af1cb55
commit d102362
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/App/perlbrew.pm b/lib/App/perlbrew.pm
@@ -40,7 +40,7 @@ __perlbrew_reinit () {
 
 __perlbrew_set_path () {
     [[ -z "$PERLBREW_ROOT" ]] && return 1
-    unalias perl 2>/dev/null
+    [[ -n $(alias perl 2>/dev/null) ]] && unalias perl 2>/dev/null
     export PATH_WITHOUT_PERLBREW=$(perl -e 'print join ":", grep { index($_, $ENV{PERLBREW_ROOT}) } split/:/,$ENV{PATH};')
     export PATH=$PERLBREW_PATH:$PATH_WITHOUT_PERLBREW
 }