wodeb(): update URL
[grml-etc-core.git] / etc / skel / .zshrc
index 7b9a74c..4f52a35 100644 (file)
@@ -3,7 +3,7 @@
 # Authors:       grml-team (grml.org), (c) Michael Prokop <mika@grml.org>
 # Bug-Reports:   see http://grml.org/bugs/
 # License:       This file is licensed under the GPL v2.
-# Latest change: Son Nov 12 11:30:30 CET 2006 [mika]
+# Latest change: Mit Aug 08 21:22:03 CEST 2007 [mika]
 ################################################################################
 
 # source ~/.zshrc.global {{{
   fi
 # }}}
 
+# check whether global file has been read {{{
+  if [ -z "$ZSHRC_GLOBAL_HAS_BEEN_READ" ] ; then
+     print 'Warning: global zsh config has not been read'>&2
+  fi
+# }}}
+
+# autoloading stuff {{{
+# associate types and extensions (be aware with perl scripts and anwanted behaviour!)
+#  type zsh-mime-setup &>/dev/null || { autoload zsh-mime-setup && zsh-mime-setup }
+#  alias -s pl='perl -S'
+# }}}
+
 # completion system {{{
 # just make sure it is loaded in this file too
   type compinit &>/dev/null || { autoload -U compinit && compinit }
 # }}}
 
+# make sure isgrmlsmall is defined {{{
+  type isgrmlsmall &>/dev/null || function isgrmlsmall () { return 1 }
+# }}}
+
 ## variables {{{
 
+# do you want grmlsmall-specific adjustments?
+  GRMLSMALL_SPECIFIC=1
+
 # set terminal property (used e.g. by msgid-chooser)
   export COLORTERM="yes"
 
 # set default browser
-  if [ -z $BROWSER ] ; then
+  if [ -z "$BROWSER" ] ; then
      if [ -n "$DISPLAY" ] ; then
-        [ -x =firefox ] && export BROWSER=firefox
+        #v# If X11 is running
+        [ -x $(which firefox) ] && export BROWSER=firefox
      else
-        [ -x =w3m ] && export BROWSER=w3m
+        #v# If no X11 is running
+        [ -x $(which w3m) ] && export BROWSER=w3m
      fi
   fi
+  #v#
   (( ${+PAGER} ))   || export PAGER="less"
 
 # export qtdir
+  #m# v QTDIR \kbd{/usr/share/qt[34]}\quad [for non-root only]
   [ -d /usr/share/qt3 ] && export QTDIR=/usr/share/qt3
   [ -d /usr/share/qt4 ] && export QTDIR=/usr/share/qt4
 
 # support running 'jikes *.java && jamvm HelloWorld' OOTB:
+  #v# [for non-root only]
   [ -f /usr/share/classpath/glibj.zip ] && export JIKESPATH=/usr/share/classpath/glibj.zip
 # }}}
 
@@ -62,7 +86,8 @@
 # These do not have to be at the beginning of the command line.
 # Avoid typing cd ../../ for going two dirs down and so on
 # Usage, e.g.: "$ cd ...' or just '$ ...' with 'setopt auto_cd'
-# Notice: deactivated by 061112 by default, use another approach - see 'power completion'
+# Notice: deactivated by 061112 by default, we use another approach
+# known as "power completion / abbreviation expansion"
 #  alias -g '...'='../..'
 #  alias -g '....'='../../..'
 #  alias -g BG='& exit'
 #  alias -g S='| sort'
 #  alias -g T='|tail'
 #  alias -g V='| vim -'
-
-# power completion, see http://zshwiki.org/home/examples/zleiab
-# less risky than the global aliases but powerful as well
-# just type the abbreviation key and afterwards ',.' to expand it
-  declare -A abk
-  setopt extendedglob
-  setopt interactivecomments
-  abk=(
-   # key  # value
-   'C'    '| wc -l'
-   '...' '../..'
-   '....' '../../..'
-   'BG' '& exit'
-   'C' '|wc -l'
-   'G' '|& grep --color=auto'
-   'H' '|head'
-   'Hl' ' --help |& less -r'
-   'L' '|less'
-   'LL' '|& less -r'
-   'M' '|most'
-   'N' '&>/dev/null'
-   'R' '| tr A-z N-za-m'
-   'SL' '| sort | less'
-   'S' '| sort -u'
-   'T' '|tail'
-   'V' '|& vim -'
-   'hide' "echo -en '\033]50;nil2\007'"
-   'tiny' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-80-*-*-c-*-iso8859-15\007"'
-   'small' 'echo -en "\033]50;6x10\007"'
-   'medium' 'echo -en "\033]50;-misc-fixed-medium-r-normal--13-120-75-75-c-80-iso8859-15\007"'
-   'default' 'echo -e "\033]50;-misc-fixed-medium-r-normal-*-*-140-*-*-c-*-iso8859-15\007"'
-   'large' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-150-*-*-c-*-iso8859-15\007"'
-   'huge' 'echo -en "\033]50;-misc-fixed-medium-r-normal-*-*-210-*-*-c-*-iso8859-15\007"'
-   'smartfont' 'echo -en "\033]50;-artwiz-smoothansi-*-*-*-*-*-*-*-*-*-*-*-*\007"'
-   'semifont' 'echo -en "\033]50;-misc-fixed-medium-r-semicondensed-*-*-120-*-*-*-*-iso8859-15\007"'
-   'da' 'du -sch'
-   'j' 'jobs -l'
-   'u' 'translate -i'
-   'co' "./configure && make && sudo make install"
-   'CH' "./configure --help"
-   'conkeror' 'firefox -chrome chrome://conkeror/content'
-   'dir' 'ls -lSrah'
-   'lad' $'ls -d .*(/)\n# only show dot-directories'
-   'lsa' $'ls -a .*(.)\n# only show dot-files'
-   'lss' $'ls -l *(s,S,t)\n# only files with setgid/setuid/sticky flag'
-   'lsl' $'ls -l *(@[1,10])\n# only symlinks'
-   'lsx' $'ls -l *(*[1,10])\n# only executables'
-   'lsw' $'ls -ld *(R,W,X.^ND/)\n# world-{readable,writable,executable} files'
-   'lsbig' $'ls -flh *(.OL[1,10])\n# display the biggest files'
-   'lsd' $'ls -d *(/)\n# only show directories'
-   'lse' $'ls -d *(/^F)\n# only show empty directories'
-   'lsnew' $'ls -rl *(D.om[1,10])\n# display the newest files'
-   'lsold' $'ls -rtlh *(D.om[-11,-1])\n # display the oldest files'
-   'lssmall' $'ls -Srl *(.oL[1,10])\n# display the smallest files'
-   'rw-' 'chmod 600'
-   '600' 'chmod u+rw-x,g-rwx,o-rwx'
-   'rwx' 'chmod u+rwx'
-   '700' 'chmod u+rwx,g-rwx,o-rwx'
-   'r--' 'chmod u+r-wx,g-rwx,o-rwx'
-   '644' $'chmod u+rw-x,g+r-wx,o+r-wx\n # 4=r,2=w,1=x'
-   '755' 'chmod u+rwx,g+r-w+x,o+r-w+x'
-   'md' 'mkdir -p '
-   'cmplayer' 'mplayer -vo -fs -zoom fbdev'
-   'fbmplayer' 'mplayer -vo -fs -zoom fbdev'
-   'fblinks' 'links2 -driver fb'
-   'insecssh' 'ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
-   'fori' 'for i ({..}) { }'
-   'cx'        'chmod +x'
-   'e' 'print -l'
-   'se' 'setopt interactivecomments'
-   'va' 'valac --vapidir=../vapi/ --pkg=gtk+-2.0 gtktest.vala'
-   'fb2' '=mplayer -vo fbdev -fs -zoom 1>/dev/null -xy 2'
-   'fb3' '=mplayer -vo fbdev -fs  -zoom 1>/dev/null -xy 3'
-   'ci' 'centericq'
-   'D' 'export DISPLAY=:0.0'
-   'mp' 'mplayer -vo xv -fs -zoom'
-  )
-  globalias () {
-        local MATCH
-        matched_chars='[.-|_a-zA-Z0-9]#'
-        LBUFFER=${LBUFFER%%(#m)[.-|_a-zA-Z0-9]#}
-        LBUFFER+=${abk[$MATCH]:-$MATCH}
-  }
-  zle -N globalias
-  bindkey ",." globalias
-# }}}
-
-## another approach for global aliases: cloning vim's abbreviation feature {{{
-# http://zshwiki.org/home/examples/zleiab
-# typeset -A abbreviations
-# abbreviations=(
-#   "Im"    "| more"
-#   "Ia"    "| awk"
-#   "Ig"    "| grep"
-#   "Ieg"   "| egrep"
-#   "Iag"   "| agrep"
-#   "Igr"   "| groff -s -p -t -e -Tlatin1 -mandoc"
-#   "Ip"    "| $PAGER"
-#   "Ih"    "| head"
-#   "Ik"    "| keep"
-#   "It"    "| tail"
-#   "Is"    "| sort"
-#   "Iv"    "| ${VISUAL:-${EDITOR}}"
-#   "Iw"    "| wc"
-#   "Ix"    "| xargs"
-# )
-# 
-# magic-abbrev-expand() {
-#     local MATCH
-#     LBUFFER=${LBUFFER%%(#m)[_a-zA-Z0-9]#}
-#     LBUFFER+=${abbreviations[$MATCH]:-$MATCH}
-#     zle self-insert
-# }
-# 
-# no-magic-abbrev-expand() {
-#   LBUFFER+=' '
-# }
-# 
-# zle -N magic-abbrev-expand
-# zle -N no-magic-abbrev-expand
-# bindkey " " magic-abbrev-expand
-# bindkey "^x " no-magic-abbrev-expand
 # }}}
 
 ## aliases {{{
 #  fi
 
 # general
+  #a2# Execute \kbd{du -sch}
   alias da='du -sch'
+  #a2# Execute \kbd{jobs -l}
   alias j='jobs -l'
 #  alias u='translate -i'          # translate
 
 # compile stuff
+  #a2# Execute \kbd{./configure}
   alias CO="./configure"
+  #a2# Execute \kbd{./configure --help}
   alias CH="./configure --help"
 
 # http://conkeror.mozdev.org/
+  #a2# Run a keyboard driven firefox
   alias conkeror='firefox -chrome chrome://conkeror/content'
 
 # arch/tla stuff
-  alias ldiff='tla what-changed --diffs | less'
-  alias tbp='tla-buildpackage'
-  alias mirror='tla archive-mirror'
-  alias commit='tla commit'
-  alias merge='tla star-merge'
+  if type -p tla &>/dev/null ; then
+     #a2# Execute \kbd{tla what-changed --diffs | less}
+     alias tdi='tla what-changed --diffs | less'
+     #a2# Execute \kbd{tla-buildpackage}
+     alias tbp='tla-buildpackage'
+     #a2# Execute \kbd{tla archive-mirror}
+     alias tmi='tla archive-mirror'
+     #a2# Execute \kbd{tla commit}
+     alias tco='tla commit'
+     #a2# Execute \kbd{tla star-merge}
+     alias tme='tla star-merge'
+  fi
 
 # listing stuff
+  #a2# Execute \kbd{ls -lSrah}
   alias dir="ls -lSrah"
+  #a2# Only show dot-directories
   alias lad='ls -d .*(/)'                # only show dot-directories
+  #a2# Only show dot-files
   alias lsa='ls -a .*(.)'                # only show dot-files
+  #a2# Only files with setgid/setuid/sticky flag
   alias lss='ls -l *(s,S,t)'             # only files with setgid/setuid/sticky flag
+  #a2# Only show 1st ten symlinks
   alias lsl='ls -l *(@[1,10])'           # only symlinks
+  #a2# Display only executables
   alias lsx='ls -l *(*[1,10])'           # only executables
+  #a2# Display world-{readable,writable,executable} files
   alias lsw='ls -ld *(R,W,X.^ND/)'       # world-{readable,writable,executable} files
+  #a2# Display the ten biggest files
   alias lsbig="ls -flh *(.OL[1,10])"     # display the biggest files
+  #a2# Only show directories
   alias lsd='ls -d *(/)'                 # only show directories
+  #a2# Only show empty directories
   alias lse='ls -d *(/^F)'               # only show empty directories
+  #a2# Display the ten newest files
   alias lsnew="ls -rl *(D.om[1,10])"     # display the newest files
+  #a2# Display the ten oldest files
   alias lsold="ls -rtlh *(D.om[1,10])"   # display the oldest files
+  #a2# Display the ten smallest files
   alias lssmall="ls -Srl *(.oL[1,10])"   # display the smallest files
 
 # chmod
+  #a2# Execute \kbd{chmod 600}
   alias rw-='chmod 600'
+  #a2# Execute \kbd{chmod 700}
   alias rwx='chmod 700'
+  #m# a2 r-{}- Execute \kbd{chmod 644}
   alias r--='chmod 644'
+  #a2# Execute \kbd{chmod 755}
   alias r-x='chmod 755'
 
 # some useful aliases
+  #a2# Execute \kbd{mkdir -o}
   alias md='mkdir -p'
 
+  [ -x $(which ipython) ] && alias ips='ipython -p sh'
+
 # console stuff
+  #a2# Execute \kbd{mplayer -vo fbdev}
   alias cmplayer='mplayer -vo fbdev'
-#  alias fbmplayer='mplayer -vo fbdev'
+  #a2# Execute \kbd{mplayer -vo fbdev -fs -zoom}
   alias fbmplayer='mplayer -vo fbdev -fs -zoom'
+  #a2# Execute \kbd{links2 -driver fb}
   alias fblinks='links2 -driver fb'
 
 # ignore ~/.ssh/known_hosts entries
 #  alias insecssh='ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null" -o "PreferredAuthentications=keyboard-interactive"'
+  #a2# ssh with StrictHostKeyChecking=no \\&\quad and UserKnownHostsFile unset
   alias insecssh='ssh -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
+  alias insecscp='scp -o "StrictHostKeyChecking=no" -o "UserKnownHostsFile=/dev/null"'
 
-# use colors when browsing man pages (if not using pinfo or PAGER=most)
-  [ -d ~/.terminfo/ ] && alias man='TERMINFO=~/.terminfo/ LESS=C TERM=mostlike PAGER=less man'
+# use colors when browsing man pages, but only if not using LESS_TERMCAP_* from /etc/zsh/zshenv:
+  if [ -z "$LESS_TERMCAP_md" ] ; then
+     [ -d ~/.terminfo/ ] && alias man='TERMINFO=~/.terminfo/ LESS=C TERM=mostlike PAGER=less man'
+  fi
 
 # check whether Debian's package management (dpkg) is running
-  alias check_dpkg_running="$SUDO dpkg_running"
+  if type salias &>/dev/null ; then
+    #a2# Check whether a dpkg instance is currently running
+    salias check_dpkg_running="dpkg_running"
+  fi
+
+# work around non utf8 capable software in utf environment via $LANG and luit
+  if type isutfenv &>/dev/null && type luit &>/dev/null; then
+     if [ -x $(which mrxvt) ] ; then
+        isutfenv && [ -n "$LANG" ] && alias mrxvt="LANG=${LANG/(#b)(*)[.@]*/$match[1].iso885915} luit mrxvt"
+     fi
+
+     if [ -x $(which aterm) ] ; then
+        isutfenv && [ -n "$LANG" ] && alias aterm="LANG=${LANG/(#b)(*)[.@]*/$match[1].iso885915} luit aterm"
+     fi
+
+     if [ -x $(which centericq) ] ; then
+        isutfenv && [ -n "$LANG" ] && alias centericq="LANG=${LANG/(#b)(*)[.@]*/$match[1].iso885915} luit centericq"
+     fi
+  fi
 # }}}
 
 ## useful functions {{{
 
-# functions without detailed explanation:
+# searching
+  #f4# Search for newspostings from authors
   agoogle() { ${=BROWSER} "http://groups.google.com/groups?as_uauthors=$*" ; }
+  #f4# Search Debian Bug Tracking System by BugID in mbox format
+  debbug()  { ${=BROWSER} "http://bugs.debian.org/$*" }
+  #f4# Search Debian Bug Tracking System
+  debbugm() { bts show --mbox $1 } # provide bugnummer as "$1"
+  #f4# Search DMOZ
+  dmoz()    { ${=BROWSER} http://search.dmoz.org/cgi-bin/search\?search=${1// /_} }
+  #f4# Search German   Wiktionary
+  dwicti()  { ${=BROWSER} http://de.wiktionary.org/wiki/${(C)1// /_} }
+  #f4# Search English  Wiktionary
+  ewicti()  { ${=BROWSER} http://en.wiktionary.org/wiki/${(C)1// /_} }
+  #f4# Search Google Groups
+  ggogle()  { ${=BROWSER} "http://groups.google.com/groups?q=$*" }
+  #f4# Search Google
+  google()  { ${=BROWSER} "http://www.google.com/search?&num=100&q=$*" }
+  #f4# Search Google Groups for MsgID
+  mggogle() { ${=BROWSER} "http://groups.google.com/groups?selm=$*" }
+  #f4# Search Netcraft
+  netcraft(){ ${=BROWSER} "http://toolbar.netcraft.com/site_report?url=$1" }
+  #f4# Use German Wikipedia's full text search
+  swiki()   { ${=BROWSER} http://de.wikipedia.org/wiki/Spezial:Search/${(C)1} }
+  #f4# search \kbd{dict.leo.org}
+  oleo()    { ${=BROWSER} "http://dict.leo.org/?search=$*" }
+  #f4# Search German   Wikipedia
+  wikide () { ${=BROWSER} http://de.wikipedia.org/wiki/"${(C)*}" }
+  #f4# Search English  Wikipedia
+  wikien()  { ${=BROWSER} http://en.wikipedia.org/wiki/"${(C)*}" }
+  #f4# Search official debs
+  wodeb ()  { ${=BROWSER} "http://packages.debian.org/search?keywords=$1&searchon=contents&suite=${2:=unstable}&section=all" }
+
+  #m# f4 gex() Exact search via Google
+  which google &>/dev/null && gex () { google "\"[ $1]\" $*" } # exact search at google
+
+# misc
+  #f5# Backup \kbd{file {\rm to} file\_timestamp}
   bk()      { cp -b ${1} ${1}_`date --iso-8601=m` }
+  #f5# Copied diff
   cdiff()   { diff -crd "$*" | egrep -v "^Only in |^Binary files " }
+  #f5# cd to directoy and list files
   cl()      { cd $1 && ls -a }        # cd && ls
+  #f5# Cvs add
   cvsa()    { cvs add $* && cvs com -m 'initial checkin' $* }
+  #f5# Cvs diff
   cvsd()    { cvs diff -N $* |& $PAGER }
+  #f5# Cvs log
   cvsl()    { cvs log $* |& $PAGER }
+  #f5# Cvs update
   cvsq()    { cvs -nq update }
+  #f5# Rcs2log
   cvsr()    { rcs2log $* | $PAGER }
+  #f5# Cvs status
   cvss()    { cvs status -v $* }
-  debbug()  { ${=BROWSER} "http://bugs.debian.org/$*" }
-  debbugm() { bts show --mbox $1 } # provide bugnummer as $1
+  #f5# Disassemble source files using gcc and as
   disassemble(){ gcc -pipe -S -o - -O -g $* | as -aldh -o /dev/null }
-  dmoz()    { ${=BROWSER} http://search.dmoz.org/cgi-bin/search\?search=${1// /_} }
-  dwicti()  { ${=BROWSER} http://de.wiktionary.org/wiki/${(C)1// /_} }
-  ewicti()  { ${=BROWSER} http://en.wiktionary.org/wiki/${(C)1// /_} }
+  #f5# Firefox remote control - open given URL
   fir()     { firefox -a firefox -remote "openURL($1)" }
-  ggogle()  { ${=BROWSER} "http://groups.google.com/groups?q=$*" }
-  google()  { ${=BROWSER} "http://www.google.com/search?&num=100&q=$*" }
+  #f5# Create Directoy and \kbd{cd} to it
+  mcd()     { mkdir -p "$@"; cd "$@" } # mkdir && cd
+  #f5# Unified diff to timestamped outputfile
   mdiff()   { diff -udrP "$1" "$2" > diff.`date "+%Y-%m-%d"`."$1" }
+  #f5# Memory overview
   memusage(){ ps aux | awk '{if (NR > 1) print $5; if (NR > 2) print "+"} END { print "p" }' | dc }
-  mggogle() { ${=BROWSER} "http://groups.google.com/groups?selm=$*" }
-  netcraft(){ ${=BROWSER} "http://toolbar.netcraft.com/site_report?url=$1" }
-  oleo()    { ${=BROWSER} "http://dict.leo.org/?search=$*" }
+  #f5# Show contents of tar file
   shtar()   { gunzip -c $1 | tar -tf - -- | $PAGER }
+  #f5# Show contents of tgz file
   shtgz()   { tar -ztf $1 | $PAGER }
+  #f5# Show contents of zip file
   shzip()   { unzip -l $1 | $PAGER }
+  #f5# Greps signature from file
   sig()     { agrep -d '^-- $' "$*" ~/.Signature }
-  swiki()   { ${=BROWSER} http://de.wikipedia.org/wiki/Spezial:Search/${(C)1} }
+  #f5# Unified diff
   udiff()   { diff -urd $* | egrep -v "^Only in |^Binary files " }
+  #f5# (Mis)use \kbd{vim} as \kbd{less}
   viless()  { vim --cmd 'let no_plugin_maps = 1' -c "so \$VIMRUNTIME/macros/less.vim" "${@:--}" }
-  wikide () { ${=BROWSER} http://de.wikipedia.org/wiki/"${(C)*}" }
-  wikien()  { ${=BROWSER} http://en.wikipedia.org/wiki/"$*" }
-  wodeb ()  { ${=BROWSER} "http://packages.debian.org/cgi-bin/search_contents.pl?word=$1&version=${2:-unstable}" }
 
-  which google >/dev/null 2>&1 && gex () { google "\"[ $1]\" $*" } # exact search at google
+  # download video from youtube
+  ytdl() {
+    if ! [ -n "$2" ] ; then
+       print "Usage: ydtl http://youtube.com/watch?v=.... outputfile.flv">&2
+       return 1
+    else
+       wget -O${2} "http://youtube.com/get_video?"${${${"$(wget -o/dev/null -O- "${1}" | grep -e watch_fullscreen)"}##*watch_fullscreen\?}%%\&fs=*}
+    fi
+  }
+
 
 # Function Usage: doc packagename
+  #f5# \kbd{cd} to /usr/share/doc/\textit{package}
   doc() { cd /usr/share/doc/$1 && ls }
   _doc() { _files -W /usr/share/doc -/ }
-  compdef _doc doc
-
-# debian upgrade
-  upgrade () {
-    if [ -z $1 ] ; then
-        $SUDO apt-get update
-        $SUDO apt-get -u upgrade
-    else
-        ssh $1 $SUDO apt-get update
-        # ask before the upgrade
-        local dummy
-        ssh $1 $SUDO apt-get --no-act upgrade
-        echo -n "Process the upgrade ?"
-        read -q dummy
-        if [[ $dummy == "y" ]] ; then
-            ssh $1 $SUDO apt-get -u upgrade --yes
-        fi
-    fi
-  }
+  type compdef &>/dev/null && compdef _doc doc
 
-# make screenshot of current desktop (use 'import' from ImageMagic)
+#f5# Make screenshot
   sshot() {
         [[ ! -d ~/shots  ]] && mkdir ~/shots
         #cd ~/shots ; sleep 5 ; import -window root -depth 8 -quality 80 `date "+%Y-%m-%d--%H:%M:%S"`.png
         cd ~/shots ; sleep 5; import -window root shot_`date --iso-8601=m`.jpg
   }
 
-
 # list images only
   limg() {
     local -a images
     fi
   }
 
-
-# create pdf file from source code
+#f5# Create PDF file from source code
   makereadable() {
      output=$1
      shift
 
 # zsh with perl-regex - use it e.g. via:
 # regcheck '\s\d\.\d{3}\.\d{3} Euro' ' 1.000.000 Euro'
+#f5# Checks whether a regex matches or not.\\&\quad Example: \kbd{regcheck '.\{3\} EUR' '500 EUR'}
   regcheck() {
     zmodload -i zsh/pcre
     pcre_compile $1 && \
     pcre_match $2 && echo "regex matches" || echo "regex does not match"
   }
-# list files which have been modified within the last x days
+
+#f5# List files which have been modified within the last {\it n} days
   new() { print -l *(m-$1) }
 
-# grep the history
+#f5# Grep in history
   greph () { history 0 | grep $1 }
-  (grep --help 2>/dev/null |grep -- --color) >/dev/null && \
-    alias grep='grep --color=auto' # use colors when GNU grep with color-support
+  # use colors when GNU grep with color-support
+  #a2# Execute \kbd{grep -{}-color=auto}
+  (grep --help 2>/dev/null |grep -- --color) >/dev/null && alias grep='grep --color=auto'
+  #a2# Execute \kbd{grep -i -{}-color=auto}
   alias GREP='grep -i --color=auto'
 
 # one blank line between each line
   if [ -r ~/.terminfo/m/mostlike ] ; then
 #     alias man2='MANPAGER="sed -e G |less" TERMINFO=~/.terminfo TERM=mostlike /usr/bin/man'
+     #f5# Watch manpages in a stretched style
      man2() { PAGER='dash -c "sed G | /usr/bin/less"' TERM=mostlike /usr/bin/man "$@" ; }
   fi
 
 # jump between directories
 # Copyright 2005 Nikolai Weibull <nikolai@bitwi.se>
 # notice: option AUTO_PUSHD has to be set
+  #f5# Jump between directories
   d(){
     emulate -L zsh
     autoload -U colors
     cd ~$dir
   }
 
-# provide useful information on globbing
-  H-Glob() {
-  echo -e "
-      /      directories
-      .      plain files
-      @      symbolic links
-      =      sockets
-      p      named pipes (FIFOs)
-      *      executable plain files (0100)
-      %      device files (character or block special)
-      %b     block special files
-      %c     character special files
-      r      owner-readable files (0400)
-      w      owner-writable files (0200)
-      x      owner-executable files (0100)
-      A      group-readable files (0040)
-      I      group-writable files (0020)
-      E      group-executable files (0010)
-      R      world-readable files (0004)
-      W      world-writable files (0002)
-      X      world-executable files (0001)
-      s      setuid files (04000)
-      S      setgid files (02000)
-      t      files with the sticky bit (01000)
-   print *(m-1)          # Dateien, die vor bis zu einem Tag modifiziert wurden.
-   print *(a1)           # Dateien, auf die vor einem Tag zugegriffen wurde.
-   print *(@)            # Nur Links
-   print *(Lk+50)        # Dateien die ueber 50 Kilobytes grosz sind
-   print *(Lk-50)        # Dateien die kleiner als 50 Kilobytes sind
-   print **/*.c          # Alle *.c - Dateien unterhalb von \$PWD
-   print **/*.c~file.c   # Alle *.c - Dateien, aber nicht 'file.c'
-   print (foo|bar).*     # Alle Dateien mit 'foo' und / oder 'bar' am Anfang
-   print *~*.*           # Nur Dateien ohne '.' in Namen
-   chmod 644 *(.^x)      # make all non-executable files publically readable
-   print -l *(.c|.h)     # Nur Dateien mit dem Suffix '.c' und / oder '.h'
-   print **/*(g:users:)  # Alle Dateien/Verzeichnisse der Gruppe >users<
-   echo /proc/*/cwd(:h:t:s/self//) # Analog zu >ps ax | awk '{print $1}'<"
-  }
-
+# usage example: 'lcheck strcpy'
+#f5# Find out which libs define a symbol
   lcheck() {
-   nm -go /usr/lib/lib*.a 2>/dev/null | grep ":[[:xdigit:]]\{8\} . .*$1"":[[:xdigit:]]\{8\} . .*$1"
+     if [ -n "$1" ] ; then
+        nm -go /usr/lib/lib*.a 2>/dev/null | grep ":[[:xdigit:]]\{8\} . .*$1"
+      else
+        echo "Usage: lcheck <function>" >&2
+     fi
   }
 
-# clean up directory
+#f5# Clean up directory - remove well known tempfiles
   purge() {
         FILES=(*~(N) .*~(N) \#*\#(N) *.o(N) a.out(N) *.core(N) *.cmo(N) *.cmi(N) .*.swp(N))
         NBFILES=${#FILES}
 # Use the following oneliner to turn back the sort order:
 #  $ awk -F ':' '{ print $2" : "$1" "$3 }' \
 #    /usr/local/lib/words/en-de.ISO-8859-1.vok > ~/.translate/de-en.ISO-8859-1.vok
+#f5# Translates a word
   trans() {
         case "$1" in
                 -[dD]*) translate -l de-en $2
 #  vimpm ()      { vim `perldoc -l $1 | sed -e 's/pod$/pm/'` }
 #  vimhelp ()    { vim -c "help $1" -c on -c "au! VimEnter *" }
 
-# plap foo -- list all occurrences of program in the current PATH
+#f5# List all occurrences of programm in current PATH
   plap() {
         if [[ $# = 0 ]]
         then
   }
 
 # Found in the mailinglistarchive from Zsh (IIRC ~1996)
+#f5# Select items for specific command(s) from history
   selhist() {
         emulate -L zsh
         local TAB=$'\t';
         print -z "${cmd[$answer]#*$TAB}"
   }
 
-# mkdir && cd
-  mcd() { mkdir -p "$@"; cd "$@" }  # mkdir && cd
-
-# cd && ls
-  cl() { cd $1 && ls -a }
-
 # Use vim to convert plaintext to HTML
-  2html() { vim -u NONE -n -c ':syntax on' -c ':so $VIMRUNTIME/syntax/2html.vim' -c ':wqa' $1 > /dev/null 2> /dev/null }
+  #f5# Transform files to html with highlighting
+  2html() { vim -u NONE -n -c ':syntax on' -c ':so $VIMRUNTIME/syntax/2html.vim' -c ':wqa' $1 &>/dev/null }
 
 # Usage: simple-extract <file>
-# Description: extracts archived files (maybe)
+#f5# Smart archive extractor
   simple-extract () {
         if [[ -f $1 ]]
         then
   }
 
 # Usage: smartcompress <file> (<type>)
-# Description: compresses files or a directory.  Defaults to tar.gz
+#f5# Smart archive creator
   smartcompress() {
         if [ $2 ]; then
                 case $2 in
   }
 
 # Usage: show-archive <archive>
-# Description: view archive without unpack
+#f5# List an archive's content
   show-archive() {
         if [[ -f $1 ]]
         then
         fi
   }
 
+#f5# Follow symlinks
   folsym() {
     if [[ -e $1 || -h $1 ]]; then
         file=$1
     fi
   }
 
-# Use 'view' to read manpages, if u want colors, regex - search, ...
-# like vi(m).
 # It's shameless stolen from <http://www.vim.org/tips/tip.php?tip_id=167>
+#f5# Use \kbd{vim} as your manpage reader
   vman() { man $* | col -b | view -c 'set ft=man nomod nolist' - }
 
-# search for various types or README file in dir and display them in $PAGER
 # function readme() { $PAGER -- (#ia3)readme* }
+#f5# View all README-like files in current directory in pager
   readme() {
         local files
         files=(./(#i)*(read*me|lue*m(in|)ut)*(ND))
         fi
   }
 
-# find all suid files in $PATH
 # suidfind() { ls -latg $path | grep '^...s' }
+#f5# Find all files in \$PATH with setuid bit set
   suidfind() { ls -latg $path/*(sN) }
 
 # See above but this is /better/ ... anywise ..
     print 'Finished'
   }
 
-# Reload functions.
+#f5# Reload given functions
   refunc() {
         for func in $argv
         do
 
 # a small check to see which DIR is located on which server/partition.
 # stolen and modified from Sven's zshrc.forall
+  #f5# Report diskusage of a directory
   dirspace() {
-        for dir in $path;
-        do
-                (cd $dir; echo "-<$dir>"; du -shx .; echo);
+    if [ -n "$1" ] ; then
+       for dir in $* ; do
+          if [ -d "$dir" ] ; then
+             ( cd $dir; echo "-<$dir>"; du -shx .; echo);
+          else
+             echo "warning: $dir does not exist" >&2
+          fi
+       done
+    else
+        for dir in $path; do
+          if [ -d "$dir" ] ; then
+             ( cd $dir; echo "-<$dir>"; du -shx .; echo);
+          else
+             echo "warning: $dir does not exist" >&2
+          fi
         done
+    fi
   }
 
-# $ show_print `cat /etc/passwd`
+# % slow_print `cat /etc/passwd`
+#f5# Slowly print out parameters
   slow_print() {
         for argument in "${@}"
         do
         print ""
   }
 
+#f5# Show some status info
   status() {
         print ""
         print "Date..: "$(date "+%Y-%m-%d %H:%M:%S")""
         print ""
   }
 
+# Rip an audio CD
+  #f5# Rip an audio CD
   audiorip() {
         mkdir -p ~/ripps
         cd ~/ripps
         fi
   }
 
+# and burn it
+  #f5# Burn an audio CD (in combination with audiorip)
   audioburn() {
         cd ~/ripps
         cdrdao write --device $DEVICE --driver generic-mmc audiocd.toc
         fi
   }
 
+#f5# Make an audio CD from all mp3 files
   mkaudiocd() {
         cd ~/ripps
         for i in *.[Mm][Pp]3; do mv "$i" `echo $i | tr '[A-Z]' '[a-z]'`; done
         for i in *.wav; do sox $i.wav -r 44100 $i.wav resample; done
   }
 
+#f5# Create an ISO image. You are prompted for\\&\quad volume name, filename and directory
   mkiso() {
         echo " * Volume name "
         read volume
         mkisofs -o ~/$iso -A $volume -allow-multidot -J -R -iso-level 3 -V $volume -R $files
   }
 
-# generate thumbnails ;)
+#f5# Simple thumbnails generator
   genthumbs () {
     rm -rf thumb-* index.html
     echo "
 </html>" >> index.html
   }
 
-# unset all limits (see zshbuiltins(1) /ulimit for details)
+#f5# Set all ulimit parameters to \kbd{unlimited}
   allulimit() {
     ulimit -c unlimited
     ulimit -d unlimited
     oggdec -o - ${1} | lame -b 192 - ${1:r}.mp3
   }
 
-# RFC 2396 URL encoding in Z-Shell
+#f5# RFC 2396 URL encoding in Z-Shell
   urlencode() {
    setopt localoptions extendedglob
    input=( ${(s::)1} )
    print ${(j::)input/(#b)([^A-Za-z0-9_.!~*\'\(\)-])/%$(([##16]#match))}
   }
 
-# get x-lite voip software
+#f5# Install x-lite (VoIP software)
   getxlite() {
     setopt local_options
     setopt errreturn
     fi
    }
 
-# get skype
+#f5# Install skype
   getskype() {
     setopt local_options
     setopt errreturn
     echo "Downloading debian package of skype."
     echo "Notice: If you want to use a more recent skype version run 'getskypebeta'."
     wget http://www.skype.com/go/getskype-linux-deb
-    $SUDO dpkg -i skype_debian-*.deb && echo "skype installed."
+    $SUDO dpkg -i skype*.deb && echo "skype installed."
   }
 
-# get beta-version of skype
+#f5# Install beta-version of skype
   getskypebeta() {
     setopt local_options
     setopt errreturn
     $SUDO dpkg -i skype-beta*.deb && echo "skype installed."
   }
 
-# get gzimo (voicp software)
+#f5# Install gizmo (VoIP software)
   getgizmo() {
     setopt local_options
     setopt errreturn
     $SUDO dpkg -i libsipphoneapi*.deb bonjour_*.deb gizmo-*.deb && echo "gizmo installed."
   }
 
-# get AIR - Automated Image and Restore
+#f5# Get and run AIR (Automated Image and Restore)
   getair() {
     setopt local_options
     setopt errreturn
     [ -x /usr/local/bin/air ] && [ -n "$DISPLAY" ] && $SUDO air
   }
 
-# get specific git commitdiff
+#f5# Get specific git commitdiff
   git-get-diff() {
     if [ -z $GITTREE ] ; then
       GITTREE='linux/kernel/git/torvalds/linux-2.6.git'
     fi
   }
 
-# get specific git commit
+#f5# Get specific git commit
   git-get-commit() {
     if [ -z $GITTREE ] ; then
       GITTREE='linux/kernel/git/torvalds/linux-2.6.git'
     fi
   }
 
-# get specific git diff
+#f5# Get specific git diff
   git-get-plaindiff() {
     if [ -z $GITTREE ] ; then
       GITTREE='linux/kernel/git/torvalds/linux-2.6.git'
     fi
   }
 
-# log 'make install' output
 # http://strcat.de/blog/index.php?/archives/335-Software-sauber-deinstallieren...html
+#f5# Log 'make install' output
   mmake() {
     [[ ! -d ~/.errorlogs ]] && mkdir ~/.errorlogs
     =make -n install > ~/.errorlogs/${PWD##*/}-makelog
   }
 
-# indent source code
+#f5# Indent source code
   smart-indent() {
     indent -npro -kr -i8 -ts8 -sob -l80 -ss -ncs $*
   }
 
 # highlight important stuff in diff output, usage example: hg diff | hidiff
-  [ -x =histring ] && \
+  #m# a2 hidiff \kbd{histring} oneliner for diffs
+  [ -x $(which histring) ] && \
   alias hidiff="histring -fE '^Comparing files .*|^diff .*' | histring -c yellow -fE '^\-.*' | histring -c green -fE '^\+.*'"
 
 # rename pictures based on information found in exif headers
+  #f5# Rename pictures based on information found in exif headers
   exirename() {
     if [ $# -lt 1 ] ; then
        echo 'Usage: jpgrename $FILES' >& 2
        fi
     fi
   }
+
+# open file in vim and jump to line
+# http://www.downgra.de/archives/2007/05/08/T19_21_11/
+  j2v() {
+    local -a params
+    params=(${*//(#m):[0-9]*:/\\n+${MATCH//:/}}) # replace ':23:' to '\n+23'
+    params=(${(s|\n|)${(j|\n|)params}}) # join array using '\n', then split on all '\n'
+    vim ${params}
+  }
+
+# get_ic() - queries imap servers for capabilities; real simple. no imaps
+  ic_get() {
+    local port
+    if [[ ! -z $1 ]]; then
+      port=${2:-143}
+      print "querying imap server on $1:${port}...\n";
+      print "a1 capability\na2 logout\n" | nc $1 ${port}
+    else
+      print "usage:\n  $0 <imap-server> [port]"
+    fi
+  }
+
+# creates a Maildir/ with its {new,cur,tmp} subdirs
+  mkmaildir() {
+    local root subdir
+    root=${MAILDIR_ROOT:-${HOME}/Mail}
+    if [[ -z ${1} ]] ; then print "Usage:\n $0 <dirname>" ; return 1 ; fi
+    subdir=${1}
+    mkdir -p ${root}/${subdir}/{cur,new,tmp}
+  }
+
+# xtrename() rename xterm from within GNU-screen
+  xtrename() {
+    if [[ -z ${DISPLAY} ]] ; then
+      printf 'xtrename only makes sense in X11.\n'
+      return 1
+    fi
+    if [[ -z ${1} ]] ; then
+      printf 'usage: xtrename() "title for xterm"\n'
+      printf '  renames the title of xterm from _within_ screen.\n'
+      printf '  Also works without screen.\n'
+      return 0
+    fi
+    print -n "\eP\e]0;${1}\C-G\e\\"
+    return 0
+  }
+
+# hl() highlighted less
+# http://ft.bewatermyfriend.org/comp/data/zsh/zfunct.html
+  if [ -x $(which highlight) ] ; then
+    function hl() {
+      local theme lang
+      theme=${HL_THEME:-""}
+      case ${1} in
+        (-l|--list)
+          ( printf 'available languages (syntax parameter):\n\n' ;
+            highlight --list-langs ; ) | less -SMr
+          ;;
+        (-t|--themes)
+          ( printf 'available themes (style parameter):\n\n' ;
+            highlight --list-themes ; ) | less -SMr
+          ;;
+        (-h|--help)
+          printf 'usage: hl <syntax[:theme]> <file>\n'
+          printf '    available options: --list (-l), --themes (-t), --help (-h)\n\n'
+          printf '  Example: hl c main.c\n'
+          ;;
+        (*)
+          if [[ -z ${2} ]] || (( ${#argv} > 2 )) ; then
+            printf 'usage: hl <syntax[:theme]> <file>\n'
+            printf '    available options: --list (-l), --themes (-t), --help (-h)\n'
+            (( ${#argv} > 2 )) && printf '  Too many arguments.\n'
+            return 1
+          fi
+          lang=${1%:*}
+          [[ ${1} == *:* ]] && [[ -n ${1#*:} ]] && theme=${1#*:}
+          if [[ -n ${theme} ]] ; then
+            highlight --xterm256 --syntax ${lang} --style ${theme} ${2} | less -SMr
+          else
+            highlight --ansi --syntax ${lang} ${2} | less -SMr
+          fi
+          ;;
+      esac
+      return 0
+    }
+    # ... and a proper completion for hl()
+    # needs 'highlight' as well, so it fits fine in here.
+    function _hl_genarg()  {
+      local expl
+      if [[ -prefix 1 *: ]] ; then
+        local themes
+        themes=(${${${(f)"$(LC_ALL=C highlight --list-themes)"}/ #/}:#*(Installed|Use name)*})
+        compset -P 1 '*:'
+        _wanted -C list themes expl theme compadd ${themes}
+      else
+        local langs
+        langs=(${${${(f)"$(LC_ALL=C highlight --list-langs)"}/ #/}:#*(Installed|Use name)*})
+        _wanted -C list languages expl languages compadd -S ':' -q ${langs}
+      fi
+    }
+    function _hl_complete() {
+      _arguments -s '1: :_hl_genarg' '2:files:_path_files'
+    }
+    compdef _hl_complete hl
+  fi
+
+# create small urls via tinyurl.com using wget, grep and sed
+  zurl() {
+  [[ -z ${1} ]] && print "please give an url to shrink." && return 1
+  local url=${1}
+  local tiny="http://tinyurl.com/create.php?url="
+  #print "${tiny}${url}" ; return
+  wget  -O-             \
+        -o/dev/null     \
+        "${tiny}${url}" \
+    | grep -Eio 'value="(http://tinyurl.com/.*)"' \
+    | sed 's/value=//;s/"//g'
+}
+
+# change fluxbox keys from 'Alt-#' to 'Alt-F#' and vice versa
+  fluxkey-change() {
+    [ -n "$FLUXKEYS" ] || local FLUXKEYS="$HOME/.fluxbox/keys"
+    if ! [ -r "$FLUXKEYS" ] ; then
+       echo "Sorry, \$FLUXKEYS file $FLUXKEYS could not be read - nothing to be done."
+       return 1
+    else
+       if grep -q 'Mod1 F[0-9] :Workspace [0-9]' $FLUXKEYS ; then
+          echo -n 'Switching to Alt-# mode in ~/.fluxbox/keys: '
+          sed -i -e 's|^\(Mod[0-9]\+[: space :]\+\)F\([0-9]\+[: space :]\+:Workspace.*\)|\1\2|' $FLUXKEYS && echo done || echo failed
+       elif grep -q 'Mod1 [0-9] :Workspace [0-9]' $FLUXKEYS ; then
+          echo -n 'Switching to Alt-F# mode in ~/.fluxbox/keys: '
+          sed -i -e 's|^\(Mod[0-9]\+[: space :]\+\)\([0-9]\+[: space :]\+:Workspace.*\)|\1F\2|' $FLUXKEYS && echo done || echo failed
+       else
+          echo 'Sorry, do not know what to do.'
+          return 1
+       fi
+    fi
+  }
+
+# retrieve weather information on the console
+# Usage example: 'weather LOWG'
+  weather () {
+   [ -n "$1" ] || {
+           print 'Usage: weather <station_id>' >&2
+           return 1
+   }
+
+   local PLACE="${1:u}"
+   local FILE="$HOME/.weather/$PLACE"
+   local LOG="$HOME/.weather/log"
+
+   [ -d $HOME/.weather ] || {
+           print -n "Creating $HOME/.weather: "
+           mkdir $HOME/.weather
+           print 'done'
+   }
+
+   print "Retrieving information for ${PLACE}:"
+   print
+   wget -T 10 --no-verbose --output-file=$LOG --output-document=$FILE --timestamping http://weather.noaa.gov/pub/data/observations/metar/decoded/$PLACE.TXT
+
+   if [[ $? = 0 ]] ; then
+           if [ -n "$VERBOSE" ] ; then
+                   cat $FILE
+           else
+                   DATE=$(grep 'UTC' $FILE | sed 's#.* /##')
+                   TEMPERATURE=$(awk '/Temperature/ { print $4" degree Celcius / " $2" degree Fahrenheit" }' $FILE| tr -d '(')
+                   echo "date: $DATE"
+                   echo "temp:  $TEMPERATURE"
+           fi
+   else
+           print "There was an error retrieving the weather information for $PLACE" >&2
+           cat $LOG
+           return 1
+   fi
+  }
+
+
 # }}}
 
 # mercurial related stuff {{{
-  if type -p hg >/dev/null 2>&1 ; then
+  if type -p hg &>/dev/null ; then
   # gnu like diff for mercurial
   # http://www.selenic.com/mercurial/wiki/index.cgi/TipsAndTricks
+    #f5# GNU like diff for mercurial
     hgdi() {
       for i in `hg status -marn "$@"` ; diff -ubwd <(hg cat "$i") "$i"
     }
 
-  # diffstat for specific version of mercurial
+  # build debian package
+    #a2# Alias for \kbd{hg-buildpackage}
+    alias hbp='hg-buildpackage'
+
+  # execute commands on the versioned patch-queue from the current repos
+    alias mq='hg -R $(readlink -f $(hg root)/.hg/patches)'
+
+  # diffstat for specific version of a mercurial repository
   #   hgstat      => display diffstat between last revision and tip
   #   hgstat 1234 => display diffstat between revision 1234 and tip
+    #f5# Diffstat for specific version of a mercurial repos
     hgstat() {
       [ -n "$1" ] && hg diff -r $1 -r tip | diffstat || hg export tip | diffstat
     }
 
-  # get current mercurial tip via hg itself and install it in $HOME
-  gethgclone() {
-    setopt local_options
-    setopt errreturn
-    if [ -f mercurial-tree/.hg ] ; then
-      cd mercurial-tree
-      echo "Running hg pull for retreiving latest version..."
-      hg pull
-      echo "Finished update. Building mercurial"
-      make local
-      echo "Setting \$PATH to $PWD:\$PATH..."
-      export PATH="$PWD:$PATH"
-    else
-      echo "Downloading mercurial via hg"
-      hg clone http://selenic.com/repo/hg mercurial-tree
-      cd mercurial-tree
+  # get current mercurial tip via hg itself
+    #f5# Get current mercurial tip via hg itself
+    gethgclone() {
+      setopt local_options
+      setopt errreturn
+      if [ -f mercurial-tree/.hg ] ; then
+        cd mercurial-tree
+        echo "Running hg pull for retreiving latest version..."
+        hg pull
+        echo "Finished update. Building mercurial"
+        make local
+        echo "Setting \$PATH to $PWD:\$PATH..."
+        export PATH="$PWD:$PATH"
+      else
+        echo "Downloading mercurial via hg"
+        hg clone http://selenic.com/repo/hg mercurial-tree
+        cd mercurial-tree
+        echo "Building mercurial"
+        make local
+        echo "Setting \$PATH to $PWD:\$PATH..."
+        export PATH="$PWD:$PATH"
+        echo "make sure you set it permanent via ~/.zshrc if you plan to use it permanently."
+        # echo "Setting \$PYTHONPATH to PYTHONPATH=\${HOME}/lib/python,"
+        # export PYTHONPATH=${HOME}/lib/python
+      fi
+    }
+
+  fi # end of check whether we have the 'hg'-executable
+
+  # get current mercurial snapshot
+    #f5# Get current mercurial snapshot
+    gethgsnap() {
+      setopt local_options
+      setopt errreturn
+      if [ -f mercurial-snapshot.tar.gz ] ; then
+         echo "mercurial-snapshot.tar.gz exists already, skipping download."
+      else
+        echo "Downloading mercurial snapshot"
+        wget http://www.selenic.com/mercurial/mercurial-snapshot.tar.gz
+      fi
+      echo "Unpacking mercurial-snapshot.tar.gz"
+      tar zxf mercurial-snapshot.tar.gz
+      cd mercurial-snapshot/
+      echo "Installing required build-dependencies"
+      $SUDO apt-get update
+      $SUDO apt-get install python2.4-dev
       echo "Building mercurial"
       make local
       echo "Setting \$PATH to $PWD:\$PATH..."
       export PATH="$PWD:$PATH"
       echo "make sure you set it permanent via ~/.zshrc if you plan to use it permanently."
-      # echo "Setting \$PYTHONPATH to PYTHONPATH=\${HOME}/lib/python,"
-      # export PYTHONPATH=${HOME}/lib/python
-    fi
-  }
-
-  fi # end of check whether we have the 'hg'-executable
-
-  # get and install current mercurial snapshot in $HOME
-  gethgsnap() {
-    setopt local_options
-    setopt errreturn
-    if [ -f mercurial-snapshot.tar.gz ] ; then
-       echo "mercurial-snapshot.tar.gz exists already, skipping download."
-    else
-      echo "Downloading mercurial snapshot"
-      wget http://www.selenic.com/mercurial/mercurial-snapshot.tar.gz
-    fi
-    echo "Unpacking mercurial-snapshot.tar.gz"
-    tar zxf mercurial-snapshot.tar.gz
-    cd mercurial-snapshot/
-    echo "Installing required build-dependencies"
-    $SUDO apt-get update
-    $SUDO apt-get install python2.4-dev
-    echo "Building mercurial"
-    make local
-    echo "Setting \$PATH to $PWD:\$PATH..."
-    export PATH="$PWD:$PATH"
-    echo "make sure you set it permanent via ~/.zshrc if you plan to use it permanently."
-  }
+    }
 # }}}
 
 # some useful commands often hard to remember - let's grep for them {{{
 
 # Work around ion/xterm resize bug.
 #if [ "$SHLVL" = 1 ]; then
-#       if [ -x `which resize 2>/dev/null` ]; then
+#       if [ -x $(which resize) ]; then
 #               eval `resize </dev/null`
 #       fi
 #fi
 # print $'\e[?96;0;64c'
 # }}}
 
-# finally source a local zshrc {{{
+# finally source a local zshrc and grmlsmall-specific configuration {{{
+
+# The following file is used to remove zsh-config-items that do not work
+# in grml-small by default.
+# If you do not want these adjustments (for whatever reason),
+# there are three ways to accomplish that:
+#  a) at the beginning of this file (variables section), set
+#     $GRMLSMALL_SPECIFIC to 0 or comment out the variable definition.
+#  b) remove/rename .zshrc.grmlsmall
+#  c) comment out the following line
+  (( GRMLSMALL_SPECIFIC > 0 )) && isgrmlsmall && source ~/.zshrc.grmlsmall
+
 # this allows us to stay in sync with /etc/skel/.zshrc
 # through 'ln -s /etc/skel/.zshrc ~/.zshrc' and put own
 # modifications in ~/.zshrc.local
   fi
 # }}}
 
+### doc strings for external functions from files
+#m# f5 grml-wallpaper() Sets a wallpaper (try completion for possible values)
 ## END OF FILE #################################################################
 # vim:foldmethod=marker