A suggested way to prevent unalias from failing on UBUNTU

rwstauner · Jun 17, 2011 · f8a9194 · f8a9194
1 parent d13d8e6
commit f8a9194
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/perlbrew b/perlbrew
@@ -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
     export PATH_WITHOUT_PERLBREW=$(perl -e 'print join ":", grep { index($_, $ENV{PERLBREW_ROOT}) } split/:/,$ENV{PATH};')
     export PATH=$PERLBREW_PATH:$PATH_WITHOUT_PERLBREW
 }