Disable zsh plugin for titles, creates problems

[user/henk/vcsh/zsh.git] / .zsh_functions

diff --git a/.zsh_functions b/.zsh_functions
index d4818ec5017b3f5ac6b38496cfc84ead13d09baf..abc9d22e4507617937982138071b2fc36d2e7391 100644 (file)
--- a/.zsh_functions
+++ b/.zsh_functions
@@ -1,50 +1,78 @@
-function info_print () {
-    local esc_begin esc_end
-    esc_begin="$1"
-    esc_end="$2"
-    shift 2
-    printf '%s' ${esc_begin}
-    printf '%s' "$*"
-    printf '%s' "${esc_end}"
-}
-
-function set_title () {
-    info_print  $'\e]0;' $'\a' "$@"
-}
-
-function ESC_print () {
-    info_print $'\ek' $'\e\\' "$@"
-}
+#function info_print () {
+#    local esc_begin esc_end
+#    esc_begin="$1"
+#    esc_end="$2"
+#    shift 2
+#    printf '%s' ${esc_begin}
+#    printf '%s' "$*"
+#    printf '%s' "${esc_end}"
+#}
+#
+#function set_title () {
+#    info_print  $'\e]0;' $'\a' "$@"
+#}
+#
+#function ESC_print () {
+#    info_print $'\ek' $'\e\\' "$@"
+#}
+#
+#preexec () {
+#    case $TERM in
+#        (xterm*|rxvt*)
+#            set_title "${(%):-"%n@%m:"}" "$1"
+#        ;;
+#        (screen*)
+#            local CMD=${1[(wr)^(*=*|sudo|ssh|evince|-*)]}
+#            ESC_print ${CMD}
+#        ;;
+#    esac
+#}
+#
+#precmd () {
+#    case $TERM in
+#        (xterm*|rxvt*)
+#            set_title ${(%):-"%n@%m: %~"}
+#        ;;
+#        (screen*)
+#            ESC_print "zsh"
+#        ;;
+#    esac
+#
+#    vcs_info
+#
+##    local INBOXINFO="$(task rc.gc=off rc.verbose=nothing +in +PENDING count) "
+#
+#    PS1="${HENKSPROMPTHEADER}%(0?..%F{red}E%?%f )%(1j.%F{yellow}J%j%f .)%(3L.%F{yellow}L%L%f .)%3~ %F{green}$VCSH_REPO_NAME%f%F{yellow}${vcs_info_msg_0_}%f%# "
+#}
 
-preexec () {
-  if [[ "$TERM" == screen* ]] ; then
-      local CMD=${1[(wr)^(*=*|sudo|ssh|evince|-*)]}
-      ESC_print ${CMD}
-  fi
-  case $TERM in
-      (xterm*|rxvt*)
-          set_title "${(%):-"%n@%m:"}" "$1"
-          ;;
-  esac
+function vifind () {
+    vi $( find $@)
 }
 
-precmd () {
-  if [[ $TERM == screen* ]] ; then
-    ESC_print "zsh"
-  fi
-
-  case $TERM in
-    (xterm*|rxvt*)
-      set_title ${(%):-"%n@%m: %~"}
-      ;;
-  esac
+function new_haskell_project () {
+    stack new $1 simple
+    cd $1
+    git init
 }
 
-function vifind () {
-    vi $( find $1 -type f )
+function henkspngpostproc () {
+    local resize_by
+    local img
+    resize_by="$1"
+    shift
+    for img in $*
+    do
+        mkdir -p resized/pngnqed
+        convert -resize $resize_by% $img resized/$img
+        pngnq -f -d resized/pngnqed -e .png resized/$img
+    done
 }
 
-function shufflevideos () {
-    find $@ -type f -iregex ".*\.\(avi\|flv\|mkv\|mpeg\|mpg\|wmv\|wva\|mp4\|webm\|wva\|m4v\|ogm\|mp4\|mov\)" -exec mpv --shuffle $MPVOPTS \{\} +
+function with () {
+    local prefix="$* " str compcontext=normal:normal:_normal
+    while :
+    do
+      str=$prefix
+      vared str && eval $str
+    done
 }
-