view .shell.d/00.path_manipulation.sh @ 336:ea73ef5dc38c

emacs: avoid weird package.el breakage with newish packages I've been toting around this package.el from 2009 or so, and something in the package format seems to have changed that broke me. Thanks to some related diagnostics by Lucas, I've grabbed the last package.el that worked with emacs 23 and stashed it here. This seems to work, modulo some things (notably js2-mode and smex) now seem to require emacs 24 if you install them using package.el, so this will end up being brittle on my last couple of emacs23 machines.
author Augie Fackler <raf@durin42.com>
date Thu, 29 May 2014 14:30:42 -0400
parents 7dfb7799567f
children c85072e620a8
line wrap: on
line source

# Functions for manipulating $PATH. Split out so I can use them in .zshenv if I want.

function insert_path_element() {
  insert_element_into_var $1 PATH
}

function remove_path_element() {
  remove_element_from_var $1 PATH
}

function insert_element_into_var () {
  eval varcontents=\$"$2"
  eval varname="$2"
  newcomp="$1"
  if echo "$varcontents" | grep "$newcomp:" >> /dev/null; then
    true
  elif [[ "$varcontents" == "" ]] ; then
    export $varname="$newcomp"
  else
    export $varname="$newcomp:$varcontents"
  fi
}

function remove_element_from_var() {
  eval varcontents=\$"$2"
  eval varname="$2"
  newcomp="$1"
  if echo "$varcontents" | grep "$newcomp:" >> /dev/null; then
    export $varname="`echo $varcontents | sed s%$newcomp:%%`"
  elif [[ "$varcontents" == "$newcomp" ]] ; then
    unset $varname
  else
    echo $1 not in $varname
  fi
}