.zsh/logging

   1 # logging
   2 #
   3 # Logging abilities for the shell initialisation scripts
   4 #
   5 # Copyright © 1994–2008 martin f. krafft <madduck@madduck.net>
   6 # Released under the terms of the Artistic Licence 2.0
   7 #
   8 # Source repository: git://git.madduck.net/etc/zsh.git
   9 #
  10
  11 __log() {
  12   local level; level="$1"; shift
  13   echo "${level}: $@" >&2
  14 }
  15 __do_debug() {
  16   [ -n "${ZDEBUG:-}" ]
  17 }
  18 error() {
  19   [[ -o xtrace ]] && set +x && local __XTRACE=1
  20   __log E "$@"
  21   [ "${__XTRACE:-}" ] && set -x
  22 }
  23 warn() {
  24   [[ -o xtrace ]] && set +x && local __XTRACE=1
  25   __log W "$@"
  26   [ "${__XTRACE:-}" ] && set -x
  27 }
  28 info() {
  29   [[ -o xtrace ]] && set +x && local __XTRACE=1
  30   __log I "$@"
  31   [ "${__XTRACE:-}" ] && set -x
  32 }
  33 debug() {
  34   [[ -o xtrace ]] && set +x && local __XTRACE=1
  35   __do_debug && __log D "$@"
  36   [ "${__XTRACE:-}" ] && set -x
  37 }
  38
  39 # vim:ft=zsh