From bc9237d9458a60fdd27b75542c356958e2dfb633 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 29 Apr 2010 15:34:21 -0500
Subject: switch to work perl when i'm in ~/work

---
 bashrc | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'bashrc')

diff --git a/bashrc b/bashrc
index 9569e93..51dc3d8 100644
--- a/bashrc
+++ b/bashrc
@@ -314,6 +314,22 @@ function _set_vcs {
 export PROMPT_COMMAND="_set_error;_set_vcs;$PROMPT_COMMAND"
 export PS1="\[\$__error_color\]\$__error \[${HIYELLOW}\][\t] \[${HIGREEN}\]\u@\h \[${HIBLUE}\]\W\[${CYAN}\]\$__vcs \[${HIBLUE}\]\\$\[${NORM}\] "
 # }}}
+# set the correct perl {{{
+function _setup_perlbrew {
+    local perl="$(readlink ${HOME}/perl5/perlbrew/perls/current)"
+    local pwd="${PWD#${HOME}}/"
+    if [[ "${pwd:0:6}" == "/work/" ]]; then
+        if [[ "$perl" != "work-perl" ]]; then
+            perlbrew switch work-perl
+        fi
+    else
+        if [[ "$perl" == "work-perl" ]]; then
+            perlbrew switch perl-5.10.1
+        fi
+    fi
+}
+export PROMPT_COMMAND="${PROMPT_COMMAND};_setup_perlbrew"
+# }}}
 # }}}
 # external files {{{
 [ -f /etc/bash_completion ] && source /etc/bash_completion
-- 
cgit v1.2.3-54-g00ecf