about summary refs log tree commit diff
path: root/Functions/Zle/replace-argument
diff options
context:
space:
mode:
authorPeter Stephenson <pws@zsh.org>2014-07-17 09:45:46 +0100
committerPeter Stephenson <pws@zsh.org>2014-07-17 09:45:46 +0100
commit4e54648add79f7cb0c0fe81e46f49817d4555f2a (patch)
tree669c9f8b699ff260666265387b5923215a848dc3 /Functions/Zle/replace-argument
parent7d5db0d27785c61b8056c405a8ae31ec3a4eb01d (diff)
downloadzsh-4e54648add79f7cb0c0fe81e46f49817d4555f2a.tar.gz
zsh-4e54648add79f7cb0c0fe81e46f49817d4555f2a.tar.xz
zsh-4e54648add79f7cb0c0fe81e46f49817d4555f2a.zip
32866: new replace-argument ZLE function.
Also a couple of read-from-minibuffer fixes: don't pass numeric
argument to recursive edit, and hide the minibuffer edit from
the undo history.
Diffstat (limited to 'Functions/Zle/replace-argument')
-rw-r--r--Functions/Zle/replace-argument46
1 files changed, 46 insertions, 0 deletions
diff --git a/Functions/Zle/replace-argument b/Functions/Zle/replace-argument
new file mode 100644
index 000000000..b43fc39bb
--- /dev/null
+++ b/Functions/Zle/replace-argument
@@ -0,0 +1,46 @@
+# Replace an argument to a command, delimited by normal shell syntax.
+# Prompts for the replacement.
+# With no numeric argument, replace the current argument.
+# With a numeric argument, replace that argument: 0 = command word,
+# as in history expansion.
+# If editing buffer is empty, use previous history line.
+
+autoload -Uz split-shell-arguments read-from-minibuffer
+
+if (( ${#BUFFER} == 0 )); then
+  (( HISTNO-- ))
+  CURSOR=${#BUFFER}
+fi
+
+local widget=$WIDGET
+integer numeric cursor=CURSOR
+if (( ${+NUMERIC} )); then
+  numeric=$NUMERIC
+else
+  numeric=-1
+fi
+local reply REPLY REPLY2
+integer index
+split-shell-arguments
+
+if (( numeric >= 0 )); then
+  index=$(( 2 + 2*numeric ))
+else
+  index=$((REPLY & ~1 ))
+fi
+
+local edit
+if [[ $widget = *edit* ]]; then
+  edit=$reply[$index]
+fi
+read-from-minibuffer "Replace $reply[$index] with: " $edit || return 1
+
+integer diff=$(( ${#REPLY} - ${#reply[$index]} ))
+reply[$index]=$REPLY
+
+BUFFER=${(j..)reply}
+if (( cursor > REPLY2 )); then
+  (( CURSOR = cursor + diff ))
+else
+  (( CURSOR = REPLY2 ))
+fi