z_mirror/kak-mirror

git clone https://git.raiguard.me/z_mirror/kak-mirror

Caleb HeuerRelocate source file to rc directory3fba3b8

trunk
2.2 KiB41 linesraw
1declare-user-mode mirror
2
3# grow/shrink
4map global mirror c 'C<a-;><a-C><a-;>'  -docstring column
5map global mirror h 'H<a-;>L<a-;>'      -docstring character
6map global mirror l 'L<a-;>H<a-;>'      -docstring character
7map global mirror j 'J<a-;>K<a-;>'      -docstring line
8map global mirror k 'K<a-;>J<a-;>'      -docstring line
9map global mirror J 'J<a-;>K<a-;><a-x>' -docstring 'full line'
10map global mirror K 'K<a-;>J<a-;><a-x>' -docstring 'full line'
11map global mirror b 'B<a-;>W<a-;>'      -docstring 'word begin'
12map global mirror w 'W<a-;>B<a-;>'      -docstring 'word begin'
13map global mirror e 'E<a-;>B<a-;>'      -docstring 'word end'
14map global mirror p '}p<a-;>{p<a-;>'    -docstring paragraph
15map global mirror s '}s<a-;>{s<a-;>'    -docstring sentence
16map global mirror m 'M<a-;><a-M><a-;>'  -docstring matching
17
18# insert/delete
19map global mirror ( '\a)<esc>\i(<esc>H<a-;>'          -docstring '(surround)'
20map global mirror { '\a}<esc>\i{<esc>H<a-;>'          -docstring '{surround}'
21map global mirror [ '\a]<esc>\i[<esc>H<a-;>'          -docstring '[surround]'
22map global mirror < '\a<gt><esc>\i<lt><esc>H<a-;>'    -docstring '<surround>'
23map global mirror « '\a»<esc>\i«<esc>H<a-;>'          -docstring '«surround»'
24map global mirror ) '\a )<esc>\i( <esc>2H<a-;>'       -docstring '( surround )'
25map global mirror } '\a }<esc>\i{ <esc>2H<a-;>'       -docstring '{ surround }'
26map global mirror ] '\a ]<esc>\i[ <esc>2H<a-;>'       -docstring '[ surround ]'
27map global mirror > '\a <gt><esc>\i<lt> <esc>2H<a-;>' -docstring '< surround >'
28map global mirror » '\a »<esc>\i« <esc>2H<a-;>'       -docstring '« surround »'
29map global mirror '"' '\a"<esc>\i"<esc>H<a-;>'        -docstring '"surround"'
30map global mirror "'" "\a'<esc>\i'<esc>H<a-;>"        -docstring "'surround'"
31map global mirror '`' '\a`<esc>\i`<esc>H<a-;>'        -docstring '`surround`'
32map global mirror d ': mirror-delete<ret>'            -docstring 'delete'
33define-command -hidden mirror-delete %{ execute-keys Z<a-S><a-d>z<a-:>H }
34
35# fallthrough
36map global mirror '<a-;>' '<a-;>'       -docstring 'swap anchor and cursor'
37map global mirror '<a-S>' '<a-S>'       -docstring 'select sels boundaries'
38
39# Suggested mapping
40
41#map global normal "'" ': enter-user-mode -lock mirror<ret>' -docstring 'mirror lock'