blob: dd0b85a82c66dde42c324b52d120cd718f277cdd (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
# Take an expression suitable for interpolation in double quotes that
# performs a replacement on the parameter "ARG". Replaces the
# shell argument (which may be a quoted string) under or before the
# cursor with that. Ensure the expression is suitable quoted.
#
# For example, to uppercase the entire shell argument:
# modify-current-argument '${(U)ARG}'
# To strip the current quoting from the word (whether backslashes or
# single, double or dollar quotes) and use single quotes instead:
# modify-current-argument '${(qq)${(Q)ARG}}'
# Retain most options from the calling function for the eval.
# Reset some that might confuse things.
setopt localoptions noksharrays multibyte
local -a reply
integer REPLY REPLY2
autoload -U split-shell-arguments
split-shell-arguments
# Can't do this unless there's some text under or left of us.
(( REPLY < 2 )) && return 1
# Get the index of the word we want.
if (( REPLY & 1 )); then
# Odd position; need previous word.
(( REPLY-- ))
# Pretend position was just after the end of it.
(( REPLY2 = ${#reply[REPLY]} + 1 ))
fi
# Length of all characters before current.
# Force use of character (not index) counting and join without IFS.
integer wordoff="${(cj..)#reply[1,REPLY-1]}"
# Replacement for current word. This could do anything to ${reply[REPLY]}.
local ARG="${reply[REPLY]}" repl
eval repl=\"$1\"
# New line: all words before and after current word, with
# no additional spaces since we've already got the whitespace
# and the replacement word in the middle.
BUFFER="${(j..)reply[1,REPLY-1]}${repl}${(j..)reply[REPLY+1,-1]}"
# Keep cursor at same position in replaced word.
# Redundant here, but useful if $repl changes the length.
# Limit to the next position after the end of the word.
integer repmax=$(( ${#repl} + 1 ))
# Remember CURSOR starts from offset 0 for some reason, so
# subtract 1 from positions.
(( CURSOR = wordoff + (REPLY2 > repmax ? repmax : REPLY2) - 1 ))
|
