diff options
author | Paul Ackersviller <packersv@users.sourceforge.net> | 2007-11-26 03:41:21 +0000 |
---|---|---|
committer | Paul Ackersviller <packersv@users.sourceforge.net> | 2007-11-26 03:41:21 +0000 |
commit | 53d894e7a368c782abbab56dc7f5048851a69138 (patch) | |
tree | aff4ad7d08d096a50ff11debac38de8d894fdec7 /Functions/Zle/backward-kill-word-match | |
parent | 1d63bd904a08d0836b5f2248ce8dde47986242dd (diff) | |
download | zsh-53d894e7a368c782abbab56dc7f5048851a69138.tar.gz zsh-53d894e7a368c782abbab56dc7f5048851a69138.tar.xz zsh-53d894e7a368c782abbab56dc7f5048851a69138.zip |
Merge of Mikael Magnusson: 24076, 24081, 24082: need to cancel option
processing with -- after widget calls with arguments.
Diffstat (limited to 'Functions/Zle/backward-kill-word-match')
-rw-r--r-- | Functions/Zle/backward-kill-word-match | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/Functions/Zle/backward-kill-word-match b/Functions/Zle/backward-kill-word-match new file mode 100644 index 000000000..ded4db2b5 --- /dev/null +++ b/Functions/Zle/backward-kill-word-match @@ -0,0 +1,35 @@ +emulate -L zsh +setopt extendedglob + +autoload match-words-by-style + +local curcontext=":zle:$WIDGET" word done +local -a matched_words +integer count=${NUMERIC:-1} + +if (( count < 0 )); then + (( NUMERIC = -count )) + zle ${WIDGET##backward-} + return +fi + +while (( count-- )); do + + match-words-by-style + + word="$matched_words[2]$matched_words[3]" + + if [[ -n $word ]]; then + if [[ -n $done || $LASTWIDGET = *kill* ]]; then + CUTBUFFER="$word$CUTBUFFER" + else + zle copy-region-as-kill -- "$word" + fi + LBUFFER=$matched_words[1] + else + return 1 + fi + done=1 +done + +return 0 |