diff options
author | Peter Stephenson <pws@users.sourceforge.net> | 2007-04-19 14:16:22 +0000 |
---|---|---|
committer | Peter Stephenson <pws@users.sourceforge.net> | 2007-04-19 14:16:22 +0000 |
commit | c6dfb2999d51be6e71176358a2e14360fe6e6ee6 (patch) | |
tree | e781f3f174a3a2c7978d3b2ad89589e8439aec3e /Functions/Zle/kill-word-match | |
parent | 0d101890d0faeaefa863099042e3510f5021fbc3 (diff) | |
download | zsh-c6dfb2999d51be6e71176358a2e14360fe6e6ee6.tar.gz zsh-c6dfb2999d51be6e71176358a2e14360fe6e6ee6.tar.xz zsh-c6dfb2999d51be6e71176358a2e14360fe6e6ee6.zip |
users/11419: zle copy-region-as-kill <string>
adds text to the kill ring
Diffstat (limited to 'Functions/Zle/kill-word-match')
-rw-r--r-- | Functions/Zle/kill-word-match | 30 |
1 files changed, 14 insertions, 16 deletions
diff --git a/Functions/Zle/kill-word-match b/Functions/Zle/kill-word-match index 1bee0708a..55e253dea 100644 --- a/Functions/Zle/kill-word-match +++ b/Functions/Zle/kill-word-match @@ -8,29 +8,27 @@ local -a matched_words integer count=${NUMERIC:-1} if (( count < 0 )); then - (( NUMERIC = -count )) - zle backward-$WIDGET - return + (( NUMERIC = -count )) + zle backward-$WIDGET + return fi while (( count-- )); do + match-words-by-style - match-words-by-style + word="${(j..)matched_words[4,5]}" - word="${(j..)matched_words[4,5]}" - - if [[ -n $word ]]; then - if [[ -n $done || $LASTWIDGET = *kill* ]]; then - CUTBUFFER="$CUTBUFFER$word" - else - killring=("$CUTBUFFER" "${(@)killring[1,-2]}") - CUTBUFFER=$word - fi - RBUFFER=${(j..)matched_words[6,7]} + if [[ -n $word ]]; then + if [[ -n $done || $LASTWIDGET = *kill* ]]; then + CUTBUFFER="$CUTBUFFER$word" else - return 1 + zle copy-region-as-kill $word fi - done=1 + RBUFFER=${(j..)matched_words[6,7]} + else + return 1 + fi + done=1 done return 0 |