3 # Logging abilities for the shell initialisation scripts
5 # Copyright © 1994–2008 martin f. krafft <madduck@madduck.net>
6 # Released under the terms of the Artistic Licence 2.0
8 # Source repository: http://git.madduck.net/v/etc/zsh.git
12 local level; level="$1"; shift
13 echo "${level}: $@" >&2
19 [[ -o xtrace ]] && set +x && local __XTRACE=1
21 [ "${__XTRACE:-}" ] && set -x
24 [[ -o xtrace ]] && set +x && local __XTRACE=1
26 [ "${__XTRACE:-}" ] && set -x
29 [[ -o xtrace ]] && set +x && local __XTRACE=1
31 [ "${__XTRACE:-}" ] && set -x
34 [[ -o xtrace ]] && set +x && local __XTRACE=1
35 __do_debug && __log D "$@"
36 [ "${__XTRACE:-}" ] && set -x