+ grml_prompt_setup grml
+}
+
+function prompt_grml-large_setup () {
+ grml_prompt_setup grml-large
+}
+
+typeset -gA grml_prompt_pre_default \
+ grml_prompt_post_default \
+ grml_prompt_token_default
+
+grml_prompt_pre_default=(
+ rc '%F{red}'
+ rc-always ''
+ change-root ''
+ user '%B%F{blue}'
+ at ''
+ host ''
+ path '%b'
+ vcs ''
+ percent ''
+ sad-smiley ''
+ battery ' '
+ newline ''
+ jobs '%F{cyan}'
+ history '%F{green}'
+ date '%F{blue}'
+ time '%F{blue}'
+ shell-level '%F{red}'
+)
+
+grml_prompt_post_default=(
+ rc '%f'
+ rc-always ''
+ change-root ''
+ user '%f%b'
+ at ''
+ host ''
+ path '%B'
+ vcs ''
+ percent ''
+ sad-smiley ''
+ battery ''
+ newline ''
+ jobs '%f'
+ history '%f'
+ date '%f'
+ time '%f'
+ shell-level '%f'
+)
+
+grml_prompt_token_default=(
+ rc '%(?..%? )'
+ rc-always '%?'
+ change-root 'debian_chroot'
+ user '%n'
+ at '@'
+ host '%m '
+ path '%40<..<%~%<< '
+ vcs '0'
+ percent '%% '
+ sad-smiley '%(?..:()'
+ battery 'PERCENT'
+ newline $'\n'
+ jobs '[%j running job(s)] '
+ history '{history#%!} '
+ date '%D{%Y-%m-%d}'
+ time '%D{%H:%M:%S} '
+ shell-level '%(3L.+ .)'
+)
+
+function grml_typeset_and_wrap () {
+ emulate -L zsh
+ local target="$1"
+ local new="$2"
+ local left="$3"
+ local right="$4"
+
+ if (( ${+parameters[$new]} )); then
+ typeset -g "${target}=${(P)target}${left}${(P)new}${right}"
+ fi
+}
+
+function grml_prompt_addto () {
+ emulate -L zsh
+ local target="$1"
+ local lr it apre apost new v
+ local -a items
+ shift
+
+ [[ $target == PS1 ]] && lr=left || lr=right
+ zstyle -a ":prompt:${grmltheme}:${lr}:setup" items items || items=( "$@" )
+ typeset -g "${target}="
+ for it in "${items[@]}"; do
+ zstyle -s ":prompt:${grmltheme}:${lr}:items:$it" pre apre \
+ || apre=${grml_prompt_pre_default[$it]}
+ zstyle -s ":prompt:grml:${grmltheme}:${lr}:$it" post apost \
+ || apost=${grml_prompt_post_default[$it]}
+ zstyle -s ":prompt:${grmltheme}:${lr}:items:$it" token new \
+ || new=${grml_prompt_token_default[$it]}
+ typeset -g "${target}=${(P)target}${apre}"
+ case $it in
+ battery)
+ grml_typeset_and_wrap $target $new '' ''
+ ;;
+ change-root)
+ grml_typeset_and_wrap $target $new '(' ')'
+ ;;
+ vcs)
+ v="vcs_info_msg_${new}_"
+ if (( ! vcscalled )); then
+ vcs_info
+ vcscalled=1
+ fi
+ if (( ${+parameters[$v]} )) && [[ -n "${(P)v}" ]]; then
+ typeset -g "${target}=${(P)target}${(P)v}"
+ fi
+ ;;
+ *) typeset -g "${target}=${(P)target}${new}" ;;
+ esac
+ typeset -g "${target}=${(P)target}${apost}"
+ done