blob: 8b2d23210e2a51e9815af5d4dcfb228032d05b14 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
|
prompt 'Name: ' %{
set-register n %val{text}
prompt 'Initial value: ' %{
set-register v %val{text}
evaluate-commands %sh{
st=$(echo "$kak_reg_n" | sed 's/^[A-Z]/\L\0/')
setst="set$(echo "$kak_reg_n" | sed 's/^[a-z]/\U\0/')"
echo "execute-keys '<esc>,iconst [$st, $setst] = useState($kak_reg_v);<esc>'"
}
}
}
|