mirror of
https://github.com/Raimondi/delimitMate.git
synced 2025-12-08 05:34:45 +08:00
Compare commits
381 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
22e6272b1a | ||
|
|
c4d51a21b3 | ||
|
|
9ec998e87a | ||
|
|
0246f25de8 | ||
|
|
1eafd59b9c | ||
|
|
4eaeef01bf | ||
|
|
fb60f3cc9f | ||
|
|
e362f5a69d | ||
|
|
c97a824ed4 | ||
|
|
37122299b7 | ||
|
|
d882e342f7 | ||
|
|
b1ff7f7942 | ||
|
|
e48ea9f852 | ||
|
|
cb6866f1c3 | ||
|
|
8204ab4cb8 | ||
|
|
6f038350de | ||
|
|
0f6581c6f3 | ||
|
|
7752546515 | ||
|
|
7809c5e171 | ||
|
|
b6cc751cc9 | ||
|
|
24cffe07b3 | ||
|
|
6fddbc5568 | ||
|
|
015e0efe53 | ||
|
|
03a0e5d8b3 | ||
|
|
d970ecc4ca | ||
|
|
353fb9a718 | ||
|
|
4d0060f22b | ||
|
|
65016ebe37 | ||
|
|
85d76972e6 | ||
|
|
c4b5877958 | ||
|
|
2335c4ae27 | ||
|
|
6f1a9d00af | ||
|
|
b99ecfa2e3 | ||
|
|
50d97fd76e | ||
|
|
8bc47fd1c4 | ||
|
|
bc97837c71 | ||
|
|
d24ad6b301 | ||
|
|
81de76fe52 | ||
|
|
5945fdfd14 | ||
|
|
9a77c3aee6 | ||
|
|
342a04b427 | ||
|
|
03e94587ae | ||
|
|
c78a6e6d93 | ||
|
|
470c053a3b | ||
|
|
254a89d67c | ||
|
|
e7b4dedb84 | ||
|
|
21a3ade90c | ||
|
|
8e30e70bcd | ||
|
|
ac792c01b6 | ||
|
|
c23ef684e3 | ||
|
|
b63924f2b2 | ||
|
|
07b7cc969f | ||
|
|
13e52d42ae | ||
|
|
aa9d737763 | ||
|
|
bf2b68edab | ||
|
|
fe9022433d | ||
|
|
6f7e6413ce | ||
|
|
a9a37854da | ||
|
|
0739792d01 | ||
|
|
6f4f1b06d3 | ||
|
|
0049b07a1c | ||
|
|
fe1983cfa1 | ||
|
|
a4ac44a84f | ||
|
|
4c13ed6aee | ||
|
|
eafd832c04 | ||
|
|
e13872fdb2 | ||
|
|
9a9b9edb9a | ||
|
|
0f353bd2b3 | ||
|
|
c1b832bbf8 | ||
|
|
073957f0a1 | ||
|
|
c678061b79 | ||
|
|
12c7d85ff6 | ||
|
|
66834e7209 | ||
|
|
21072cf13e | ||
|
|
d952f6c721 | ||
|
|
0efe44bc70 | ||
|
|
631d72465a | ||
|
|
4024181af2 | ||
|
|
38487bbec8 | ||
|
|
c74a48ccd8 | ||
|
|
df1f32f772 | ||
|
|
f2b9b3a0c2 | ||
|
|
1c45f7bbde | ||
|
|
a1f21e8ef5 | ||
|
|
eba94168ce | ||
|
|
06c1f31632 | ||
|
|
9826c667e0 | ||
|
|
35280c1444 | ||
|
|
82160a5de6 | ||
|
|
07d9fa9ddc | ||
|
|
54853a954c | ||
|
|
f00f6b6cf2 | ||
|
|
d280d23a83 | ||
|
|
821e0019fb | ||
|
|
5ef40e0234 | ||
|
|
399e18d669 | ||
|
|
92fba35d27 | ||
|
|
0528bdac15 | ||
|
|
5db098e953 | ||
|
|
b45536fe8d | ||
|
|
3dde5cc8cb | ||
|
|
5787ec4f59 | ||
|
|
2dc880bf1c | ||
|
|
440f38858f | ||
|
|
f7f895c211 | ||
|
|
654dc14e6e | ||
|
|
543be33b13 | ||
|
|
7345bfddef | ||
|
|
16a35eefab | ||
|
|
74ab16ea5b | ||
|
|
2adbf5a8d7 | ||
|
|
e4a02eb998 | ||
|
|
ad11ab2210 | ||
|
|
6b0d448f6a | ||
|
|
32c9db8f37 | ||
|
|
a77423a46f | ||
|
|
57fd02b2e0 | ||
|
|
14faba1c62 | ||
|
|
8ab087c95c | ||
|
|
61d62e8920 | ||
|
|
7ce61655a7 | ||
|
|
8d133d4726 | ||
|
|
7caa6092b7 | ||
|
|
d98d8c0a0d | ||
|
|
e2d63e38f6 | ||
|
|
579e3520a4 | ||
|
|
90d07a68be | ||
|
|
2cb3f4d5e6 | ||
|
|
3a23e89cb5 | ||
|
|
70e1ac1462 | ||
|
|
d4ba528935 | ||
|
|
8a8aad183f | ||
|
|
cfc6654855 | ||
|
|
f2efe4331b | ||
|
|
dfa7e9b730 | ||
|
|
765bdd80dc | ||
|
|
739d2f9bd4 | ||
|
|
eb7738e4aa | ||
|
|
32f5d8df07 | ||
|
|
7b5887c324 | ||
|
|
0326b7c14a | ||
|
|
1dfe26a538 | ||
|
|
9c1564a22f | ||
|
|
028964cf7d | ||
|
|
5a84c1a746 | ||
|
|
0f9563969d | ||
|
|
d3ffebab74 | ||
|
|
ece6c39a65 | ||
|
|
ad151d3e55 | ||
|
|
b65d719353 | ||
|
|
a42dff4ad8 | ||
|
|
4a7d5a6e54 | ||
|
|
50a0df0be4 | ||
|
|
cecebf6e86 | ||
|
|
ad4430706e | ||
|
|
93d4a373fb | ||
|
|
a9f51531d9 | ||
|
|
6bb98110b4 | ||
|
|
0b34aea202 | ||
|
|
f1e92d05d5 | ||
|
|
8ec2bcb89a | ||
|
|
beb87ef41f | ||
|
|
26a6def62f | ||
|
|
0fb597ef36 | ||
|
|
fe5dd9a61a | ||
|
|
bb9b0edcc5 | ||
|
|
f3176a664c | ||
|
|
1cbbe90a09 | ||
|
|
a9174f65ba | ||
|
|
2af2dd2350 | ||
|
|
9c77b8434a | ||
|
|
646794cbda | ||
|
|
93fdcf92e1 | ||
|
|
fbbd9514c5 | ||
|
|
be5c41b3c1 | ||
|
|
b853ee9f35 | ||
|
|
eb2625c4a7 | ||
|
|
e17f6cd23c | ||
|
|
54acd56b48 | ||
|
|
9bdd4b078a | ||
|
|
f5748da36c | ||
|
|
eade67b409 | ||
|
|
b3f62f79c2 | ||
|
|
9d133d5b69 | ||
|
|
9f003b5bf5 | ||
|
|
e688e20151 | ||
|
|
8749708115 | ||
|
|
5cc5d8d9b3 | ||
|
|
98b4119746 | ||
|
|
c889905e47 | ||
|
|
db54dadb46 | ||
|
|
604260f56e | ||
|
|
581a3ebc17 | ||
|
|
cc1acaba96 | ||
|
|
7b781ab6b6 | ||
|
|
233eb52a97 | ||
|
|
aff9743269 | ||
|
|
ce1d05fac5 | ||
|
|
6dad313734 | ||
|
|
5263e25548 | ||
|
|
39b8298390 | ||
|
|
57b80ea78a | ||
|
|
a5b7141fc4 | ||
|
|
9efb01da68 | ||
|
|
860c45ab2a | ||
|
|
8686edfc63 | ||
|
|
5e7a7c4738 | ||
|
|
928cc1146a | ||
|
|
d420afdacd | ||
|
|
f6015300a0 | ||
|
|
e183064744 | ||
|
|
40849c94ef | ||
|
|
4c1424f9bd | ||
|
|
0783f97fc0 | ||
|
|
e551885c24 | ||
|
|
4891a04258 | ||
|
|
ad77a9a75e | ||
|
|
5bf35a6b31 | ||
|
|
49044099dd | ||
|
|
7c423067a8 | ||
|
|
d08fa765b9 | ||
|
|
f47bcd8e3f | ||
|
|
873e79ec37 | ||
|
|
589b2ae85a | ||
|
|
f9f2b5f177 | ||
|
|
4157dc8a88 | ||
|
|
d0fc1456b7 | ||
|
|
86f70a7d9c | ||
|
|
f7b53f045d | ||
|
|
f3d140e363 | ||
|
|
93a1770f37 | ||
|
|
859a732509 | ||
|
|
eb778be64b | ||
|
|
2b2ae65182 | ||
|
|
e1b52d3676 | ||
|
|
ff4745b191 | ||
|
|
2ba694830d | ||
|
|
12c5c96ca2 | ||
|
|
a97af1fb97 | ||
|
|
5bf6a1e30c | ||
|
|
f8883cb700 | ||
|
|
f72ffe3c12 | ||
|
|
d2e896fbe1 | ||
|
|
a0b1799270 | ||
|
|
1d423ab2b9 | ||
|
|
7f5df4bf6e | ||
|
|
9f1fdc418d | ||
|
|
64cf4beb8a | ||
|
|
119174b7dd | ||
|
|
b3a7728299 | ||
|
|
2266a19900 | ||
|
|
1b587bee9a | ||
|
|
31b289adfe | ||
|
|
efadb34c84 | ||
|
|
58d63b4e5b | ||
|
|
0441a03bb9 | ||
|
|
90cb449ada | ||
|
|
a678d7baab | ||
|
|
2911bf33c9 | ||
|
|
221daf6e6a | ||
|
|
8f5a45f9e7 | ||
|
|
6f5fd80e0e | ||
|
|
1caeda0799 | ||
|
|
3fb33b8e47 | ||
|
|
e6288a7313 | ||
|
|
7dd7edff64 | ||
|
|
4b94c38f95 | ||
|
|
217adb3d8e | ||
|
|
e63e373ae1 | ||
|
|
9c11c5cc82 | ||
|
|
8b24f0fd9f | ||
|
|
701e14f72f | ||
|
|
c9c1464075 | ||
|
|
e831d89acf | ||
|
|
133c125f93 | ||
|
|
b9cea6312a | ||
|
|
1b37d60840 | ||
|
|
a70aa5285e | ||
|
|
2eba04961d | ||
|
|
3519f82f79 | ||
|
|
e9491e473c | ||
|
|
9e3075cff5 | ||
|
|
7c9ba95565 | ||
|
|
3ae285424c | ||
|
|
fa1d3b3d6a | ||
|
|
63f8c2af4f | ||
|
|
29eb98d79d | ||
|
|
5b004ca49d | ||
|
|
34df78f8ab | ||
|
|
e234e45846 | ||
|
|
081ec279ed | ||
|
|
4399fa327f | ||
|
|
ceaa6e01ed | ||
|
|
235f0dcbfb | ||
|
|
fadd7fefbc | ||
|
|
193b6027c2 | ||
|
|
a76439a641 | ||
|
|
89cc598217 | ||
|
|
28ce6213fc | ||
|
|
6d1f48c1bf | ||
|
|
0e20bcaff8 | ||
|
|
aae61ad8ba | ||
|
|
4dac6ce6ac | ||
|
|
875a9e450b | ||
|
|
48d2e3b9d1 | ||
|
|
5626a633d5 | ||
|
|
3652ba24e3 | ||
|
|
740fc90ae7 | ||
|
|
e0de2dbf39 | ||
|
|
efcf9eb341 | ||
|
|
2545fa5967 | ||
|
|
c91674eed2 | ||
|
|
542728671e | ||
|
|
d1621b6672 | ||
|
|
6d1cc1187b | ||
|
|
377c3a37e1 | ||
|
|
d03324135c | ||
|
|
edeaff4730 | ||
|
|
c85fee6eb5 | ||
|
|
0ccb143a12 | ||
|
|
941beed3b3 | ||
|
|
739a3e606c | ||
|
|
61cc934b68 | ||
|
|
7aec4532f9 | ||
|
|
6f22aab0b8 | ||
|
|
592cf2fea1 | ||
|
|
3d818560eb | ||
|
|
da66a3f7c9 | ||
|
|
e5ce5b0967 | ||
|
|
03342b8d22 | ||
|
|
86c1895ceb | ||
|
|
fd4fb482fe | ||
|
|
0fbbc0f808 | ||
|
|
ced80ebb21 | ||
|
|
7b0d9367b2 | ||
|
|
37512d7f89 | ||
|
|
f8b5bbe555 | ||
|
|
698b3f1e43 | ||
|
|
bdf477de4b | ||
|
|
b03d5dce36 | ||
|
|
03390cfb5f | ||
|
|
45c66a4d07 | ||
|
|
a317b6ead7 | ||
|
|
ed672dd39b | ||
|
|
72e639ff1a | ||
|
|
95c899f3e2 | ||
|
|
6d4113e3c3 | ||
|
|
8d720b8932 | ||
|
|
422420c494 | ||
|
|
2c8b586679 | ||
|
|
e748b461b6 | ||
|
|
17a061a1fa | ||
|
|
29d42e0771 | ||
|
|
e818c05e33 | ||
|
|
29cb16c42e | ||
|
|
d478e75178 | ||
|
|
eb03c7058e | ||
|
|
1e7a5c7f6e | ||
|
|
b9bd9e3229 | ||
|
|
b25906e610 | ||
|
|
5ca0eee4cd | ||
|
|
a751498fbc | ||
|
|
9292c9294a | ||
|
|
4083c581d6 | ||
|
|
86ff123318 | ||
|
|
a8cbf2e429 | ||
|
|
96d53eaa31 | ||
|
|
b5292f7c58 | ||
|
|
6b80cfefb6 | ||
|
|
7540b37e8f | ||
|
|
9c6b615397 | ||
|
|
007da2c08a | ||
|
|
5e8f9eacac | ||
|
|
4c8f55722d | ||
|
|
00da04d835 | ||
|
|
8ba4a6ddd2 | ||
|
|
4f2db7a481 | ||
|
|
23326b1178 | ||
|
|
2e786b5ca6 | ||
|
|
4e63e5fe10 | ||
|
|
d3348192b8 |
12
.gitignore
vendored
Normal file
12
.gitignore
vendored
Normal file
@@ -0,0 +1,12 @@
|
|||||||
|
*.sw?
|
||||||
|
*.un?
|
||||||
|
*.vba
|
||||||
|
*.vmb
|
||||||
|
*.zip
|
||||||
|
*.gz
|
||||||
|
vimball.txt
|
||||||
|
*.orig
|
||||||
|
tags
|
||||||
|
test/build
|
||||||
|
test/*.tap
|
||||||
|
test/*.msgout
|
||||||
21
LICENSE.txt
Normal file
21
LICENSE.txt
Normal file
@@ -0,0 +1,21 @@
|
|||||||
|
MIT License
|
||||||
|
|
||||||
|
Copyright (c) 2017 Israel Chauca
|
||||||
|
|
||||||
|
Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||||
|
of this software and associated documentation files (the "Software"), to deal
|
||||||
|
in the Software without restriction, including without limitation the rights
|
||||||
|
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||||||
|
copies of the Software, and to permit persons to whom the Software is
|
||||||
|
furnished to do so, subject to the following conditions:
|
||||||
|
|
||||||
|
The above copyright notice and this permission notice shall be included in all
|
||||||
|
copies or substantial portions of the Software.
|
||||||
|
|
||||||
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||||
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||||
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||||
|
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||||||
|
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||||||
|
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
||||||
|
SOFTWARE.
|
||||||
15
Makefile
Normal file
15
Makefile
Normal file
@@ -0,0 +1,15 @@
|
|||||||
|
.DEFAULT: test
|
||||||
|
|
||||||
|
test_files := $(wildcard test/*.test)
|
||||||
|
short_targets := $(patsubst test/%,%,$(test_files))
|
||||||
|
|
||||||
|
.PHONY: monitor test $(test_files) $(short_targets)
|
||||||
|
|
||||||
|
test:
|
||||||
|
$(MAKE) -C test
|
||||||
|
|
||||||
|
monitor:
|
||||||
|
$(MAKE) -C test monitor
|
||||||
|
|
||||||
|
$(test_files) $(short_targets):
|
||||||
|
$(MAKE) -C test $(patsubst test/%,%,$@)
|
||||||
6
README.md
Normal file
6
README.md
Normal file
@@ -0,0 +1,6 @@
|
|||||||
|
This plug-in provides automatic closing of quotes, parenthesis, brackets, etc., besides some other related features that
|
||||||
|
should make your time in insert mode a little bit easier, like syntax awareness (will not insert the closing delimiter
|
||||||
|
in comments and other configurable regions), <CR> and <Space> expansions (off by default), and some more.
|
||||||
|
|
||||||
|
Most of the features can be modified or disabled permanently, using global variables, or on a FileType basis, using
|
||||||
|
:autocmd.
|
||||||
588
autoload/delimitMate.vim
Normal file
588
autoload/delimitMate.vim
Normal file
@@ -0,0 +1,588 @@
|
|||||||
|
" Script variables {{{1
|
||||||
|
let s:defaults = {}
|
||||||
|
let s:defaults.enabled = 1
|
||||||
|
let s:defaults.pairs = ['()', '[]', '{}']
|
||||||
|
let s:defaults.quotes = ['"', "'", '`']
|
||||||
|
let s:defaults.debug = 0
|
||||||
|
let s:defaults.autoclose = 1
|
||||||
|
let s:defaults.expand_space = 0
|
||||||
|
let s:defaults.expand_cr = 0
|
||||||
|
let s:defaults.jump_expansion = 0
|
||||||
|
let s:defaults.jump_next = 1
|
||||||
|
let s:defaults.jump_long = 0
|
||||||
|
let s:defaults.insert_eol_marker = 0
|
||||||
|
let s:defaults.eol_marker = ';'
|
||||||
|
let s:defaults.expand_inside_quotes = 0
|
||||||
|
let s:defaults.smart_pairs = 1
|
||||||
|
let s:defaults.smart_pairs_extra = []
|
||||||
|
let s:defaults.balance_pairs = 0
|
||||||
|
let s:defaults.nesting_quotes = []
|
||||||
|
let s:defaults.smart_quotes = 1
|
||||||
|
let s:defaults.smart_quotes_extra = []
|
||||||
|
let s:defaults.excluded_regions = []
|
||||||
|
|
||||||
|
" Set smart_pairs expressions:
|
||||||
|
let s:exprs = []
|
||||||
|
call add(s:exprs, 'next_char =~# "\\w"')
|
||||||
|
call add(s:exprs, 'next_char =~# "[".escape(v:char,"\\^]")."€£$]"')
|
||||||
|
call add(s:exprs,
|
||||||
|
\'next_char =~# "[".escape(join(s:option("quotes"),""),"\\^]")."]"')
|
||||||
|
call add(s:exprs, 'ahead =~# "^[^[:space:][:punct:]]"')
|
||||||
|
let s:defaults.smart_pairs_base = s:exprs
|
||||||
|
|
||||||
|
" Set smart_quotes expressions:
|
||||||
|
let s:exprs = []
|
||||||
|
call add(s:exprs, 'prev_char =~# "\\w"')
|
||||||
|
call add(s:exprs, 'prev_char =~# "[^[:space:][:punct:]"
|
||||||
|
\.escape(join(options.quotes, ""), "\\^[]")."]"')
|
||||||
|
call add(s:exprs, 'next_char =~# "\\w"')
|
||||||
|
call add(s:exprs, 'char == "\"" && &filetype =~? "\\<vim\\>"
|
||||||
|
\&& line =~ "^\\s*$"')
|
||||||
|
call add(s:exprs, 'next_char =~# "[^[:space:][:punct:]"
|
||||||
|
\. escape(join(options.quotes, ""), "\\^[]")."]"')
|
||||||
|
" Balance quotes
|
||||||
|
call add(s:exprs, 'strchars(substitute(substitute(a:info.cur.line,
|
||||||
|
\"\\\\.", "", "g"), "[^".escape(char, "\\^[]")."]", "", "g")) % 2')
|
||||||
|
|
||||||
|
let s:defaults.smart_quotes_base = s:exprs
|
||||||
|
|
||||||
|
unlet s:exprs
|
||||||
|
|
||||||
|
let s:info = {}
|
||||||
|
let s:info.char = ''
|
||||||
|
let s:info.nesting = 0
|
||||||
|
let s:info.skip_icp = 0
|
||||||
|
let s:info.is_ignored_syn = 0
|
||||||
|
let s:info.template = {}
|
||||||
|
|
||||||
|
function! s:debug(debug_level, ...) "{{{1
|
||||||
|
if get(b:, 'delimitMate_debug',
|
||||||
|
\ get(g:, 'delimitMate_debug',
|
||||||
|
\ get(s:defaults, 'debug', 0)))
|
||||||
|
let trail = expand('<sfile>')
|
||||||
|
let trail = substitute(trail, '\%(\.\.<SNR>\d\+_debug\)\+$', '', '')
|
||||||
|
let trail = substitute(trail, '<SNR>\d\+_', '', 'g')
|
||||||
|
let trail = substitute(trail, '\.\.', '.', 'g')
|
||||||
|
let trail = substitute(trail, '^function\s\+\%(delimitMate\)\?', '', '')
|
||||||
|
let message = get(a:, 1, '')
|
||||||
|
echom printf('%s: %s', trail, message)
|
||||||
|
endif
|
||||||
|
endfunction
|
||||||
|
command! -nargs=* -count=3 DMDebug call s:debug(<count>, <args>)
|
||||||
|
|
||||||
|
function! s:defaults.consolidate() "{{{1
|
||||||
|
3DMDebug 'Consolidate options'
|
||||||
|
let g = filter(copy(g:), 'v:key =~# "^delimitMate_"')
|
||||||
|
let b = filter(copy(b:), 'v:key =~# "^delimitMate_"')
|
||||||
|
call extend(g, b, 'force')
|
||||||
|
let short_options = {}
|
||||||
|
call map(g, 'extend(short_options,
|
||||||
|
\{substitute(v:key, "^delimitMate_", "", ""): v:val}, "force")')
|
||||||
|
call extend(short_options, self, 'keep')
|
||||||
|
return short_options
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:info.update() "{{{1
|
||||||
|
let self.prev = get(self, 'cur', {})
|
||||||
|
let d = {}
|
||||||
|
let d.line = getline('.')
|
||||||
|
let d.col = col('.')
|
||||||
|
let d.lnum = line('.')
|
||||||
|
let d.prev_line = line('.') == 1 ? '' : getline(line('.') - 1)
|
||||||
|
let d.next_line = line('.') == line('$') ? '' : getline(line('.') + 1)
|
||||||
|
let d.ahead = len(d.line) >= d.col ? d.line[d.col - 1 : ] : ''
|
||||||
|
let d.behind = d.col >= 2 ? d.line[: d.col - 2] : ''
|
||||||
|
let d.prev_char = strcharpart(d.behind, strchars(d.behind) - 1, 1)
|
||||||
|
let d.next_char = strcharpart(d.ahead, 0, 1)
|
||||||
|
let d.around = d.prev_char . d.next_char
|
||||||
|
call extend(d, s:info.template, 'keep')
|
||||||
|
1DMDebug printf('lnum: %s, col: %s, prev_char: %s, next_char: %s',
|
||||||
|
\ d.lnum, d.col, string(d.prev_char), string(d.next_char))
|
||||||
|
1DMDebug printf("behind: %s", d.behind)
|
||||||
|
1DMDebug printf("ahead : %s", d.ahead )
|
||||||
|
1DMDebug printf("prev_line: %s", d.prev_line)
|
||||||
|
1DMDebug printf('cur_line : %s', d.line)
|
||||||
|
1DMDebug printf('next_line: %s', d.next_line)
|
||||||
|
let self.cur = d
|
||||||
|
return d
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:balance_pairs(pair, info, opts) "{{{1
|
||||||
|
let left = strcharpart(a:pair, 0, 1)
|
||||||
|
let right = strcharpart(a:pair, 1, 1)
|
||||||
|
let pat = '[^' . escape(a:pair, '\^[]') . ']'
|
||||||
|
let behind = substitute(a:info.cur.behind, '\\.', '', 'g')
|
||||||
|
let behind = matchstr(behind, '['.escape(left, '\^[]').'].*')
|
||||||
|
let behind = substitute(behind, pat, '', 'g')
|
||||||
|
let ahead = substitute(a:info.cur.ahead, '\\.', '', 'g')
|
||||||
|
let ahead = matchstr(ahead, '^.*['.escape(right, '\^[]').']')
|
||||||
|
let ahead = substitute(ahead, pat, '', 'g')
|
||||||
|
let lefts = 0
|
||||||
|
let rights = 0
|
||||||
|
for char in split(behind, '\zs')
|
||||||
|
if char ==# left
|
||||||
|
let lefts += 1
|
||||||
|
elseif char ==# right
|
||||||
|
let rights += rights < lefts
|
||||||
|
endif
|
||||||
|
endfor
|
||||||
|
let balance1 = lefts - rights
|
||||||
|
let lefts = 0
|
||||||
|
let rights = 0
|
||||||
|
let balance2 = 0
|
||||||
|
for char in split(ahead, '\zs')
|
||||||
|
if char ==# left
|
||||||
|
let lefts += 1
|
||||||
|
elseif char ==# right
|
||||||
|
let rights += 1
|
||||||
|
endif
|
||||||
|
if lefts < rights
|
||||||
|
let balance2 -= 1
|
||||||
|
let lefts = 0
|
||||||
|
let rights = 0
|
||||||
|
endif
|
||||||
|
endfor
|
||||||
|
3DMDebug balance1 + balance2
|
||||||
|
return balance1 + balance2
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:info.template.is_escaped(...) "{{{1
|
||||||
|
3DMDebug
|
||||||
|
let str = a:0 ? a1 : self.behind
|
||||||
|
return len(matchstr(str, '\\*$')) % 2
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:option(name) "{{{1
|
||||||
|
3DMDebug
|
||||||
|
let opt = get(b:, 'delimitMate_' . a:name,
|
||||||
|
\ get(g:, 'delimitMate_' . a:name,
|
||||||
|
\ get(s:defaults, a:name, '')))
|
||||||
|
3DMDebug printf('%s: %s', a:name, string(opt))
|
||||||
|
if type(opt) == 3 || type(opt) == 4
|
||||||
|
return copy(opt)
|
||||||
|
endif
|
||||||
|
return opt
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:synstack(lnum, col) "{{{1
|
||||||
|
3DMDebug
|
||||||
|
return map(synstack(a:lnum, a:col), 'synIDattr(v:val, "name")')
|
||||||
|
\+ [synIDattr(synIDtrans(synID(line('.'), col('.'), 1)), 'name')]
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:any_is_true(expressions, info, options) "{{{1
|
||||||
|
let char = a:info.char
|
||||||
|
let info = deepcopy(a:info)
|
||||||
|
let options = deepcopy(a:options)
|
||||||
|
let line = info.cur.line
|
||||||
|
let lnum = info.cur.lnum
|
||||||
|
let col = info.cur.col
|
||||||
|
let behind = info.cur.behind
|
||||||
|
let ahead = info.cur.ahead
|
||||||
|
let prev_char = info.cur.prev_char
|
||||||
|
let next_char = info.cur.next_char
|
||||||
|
let exprs = copy(a:expressions)
|
||||||
|
call filter(exprs, 'eval(v:val)')
|
||||||
|
3DMDebug string(exprs)
|
||||||
|
return !empty(exprs)
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:rights2jump_pair(char, pair, info, opts, go_next) "{{{1
|
||||||
|
" TODO consider escaped characters
|
||||||
|
let go_next = a:go_next
|
||||||
|
\ && empty(a:info.cur.ahead)
|
||||||
|
\ && a:info.cur.next_line =~# '^\s*['.escape(a:char, '[]^-\').']'
|
||||||
|
let line = a:info.cur.ahead
|
||||||
|
3DMDebug 'ahead: ' . line
|
||||||
|
let pair_pat = '[' . escape(a:pair, '[]^\-') . ']'
|
||||||
|
let char_pat = '[' . escape(a:char, '[]^\-') . ']'
|
||||||
|
let idx = match(line, pair_pat)
|
||||||
|
let balance = 0
|
||||||
|
while go_next || idx >= 0 && balance >= 0 && line[idx : ] !~# char_pat
|
||||||
|
if idx == -1
|
||||||
|
let idx = strchars(matchstr(a:info.cur.next_line, '^\s*\S'))
|
||||||
|
break
|
||||||
|
endif
|
||||||
|
if line[idx : ] =~# char_pat
|
||||||
|
let balance -= 1
|
||||||
|
else
|
||||||
|
let balance += 1
|
||||||
|
endif
|
||||||
|
let idx = match(line, pair_pat, idx + 1)
|
||||||
|
endwhile
|
||||||
|
3DMDebug 'idx: ' . idx
|
||||||
|
return idx + 1
|
||||||
|
endfunction
|
||||||
|
if line[idx : ] =~# char_pat
|
||||||
|
let balance -= 1
|
||||||
|
else
|
||||||
|
let balance += 1
|
||||||
|
endif
|
||||||
|
let idx = match(line, pair_pat, idx + 1)
|
||||||
|
endwhile
|
||||||
|
3DMDebug 'idx: ' . idx
|
||||||
|
return idx + 1
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:keys4space(info, opts) "{{{1
|
||||||
|
2DMDebug string(a:opts)
|
||||||
|
let empty_pair = !empty(filter(copy(a:opts.pairs),
|
||||||
|
\'v:val ==# a:info.cur.around'))
|
||||||
|
if a:opts.expand_space && empty_pair
|
||||||
|
2DMDebug "expand space inside a pair"
|
||||||
|
return " \<C-G>U\<Left>"
|
||||||
|
endif
|
||||||
|
let empty_quotes = !empty(filter(copy(a:opts.quotes),
|
||||||
|
\'v:val.v:val ==# a:info.cur.around'))
|
||||||
|
if a:opts.expand_space && a:opts.expand_inside_quotes && empty_quotes
|
||||||
|
2DMDebug "expand space inside quotes"
|
||||||
|
return " \<C-G>U\<Left>"
|
||||||
|
endif
|
||||||
|
2DMDebug "do nothing"
|
||||||
|
return ''
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:keys4left(char, pair, info, opts) "{{{1
|
||||||
|
"| cases | criteria | action options | action
|
||||||
|
"| | balance | auto balance back smart | close back
|
||||||
|
"|--------|----------|-----------------------------|------------
|
||||||
|
"| any | any | 0 0 1 1 | 0 0
|
||||||
|
"| any | any | 0 0 1 0 | 0 0
|
||||||
|
"| (|)) | -1 | 1 1 1 0 | 0 0
|
||||||
|
"| (|) | 0 | 1 1 1 0 | 1 1
|
||||||
|
"| ((|) | 1 | 1 1 1 0 | 1 0
|
||||||
|
if !a:opts.autoclose
|
||||||
|
2DMDebug "No autoclose"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
let exprs = a:opts.smart_pairs_base + a:opts.smart_pairs_extra
|
||||||
|
if a:opts.smart_pairs && s:any_is_true(exprs, a:info, a:opts)
|
||||||
|
2DMDebug "smart pairs"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
if a:opts.balance_pairs && s:balance_pairs(a:pair, a:info, a:opts) < 0
|
||||||
|
2DMDebug "balance pairs"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
let eol_marker = a:opts.insert_eol_marker == 1
|
||||||
|
\&& empty(a:info.cur.ahead) ? a:opts.eol_marker
|
||||||
|
\ . "\<C-G>U\<Left>" : ''
|
||||||
|
2DMDebug "add right delimiter"
|
||||||
|
let jump_back = a:opts.jump_back ? "\<C-G>U\<Left>" : ''
|
||||||
|
return "\<C-V>" . strcharpart(a:pair, 1, 1) . eol_marker . jump_back
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:keys4right(char, pair, info, opts) "{{{1
|
||||||
|
"| cases | criteria | action options | action
|
||||||
|
"| | next prev close bal | next long bal | jump back
|
||||||
|
"|--------|---------------------|----------------|-----------
|
||||||
|
"| (|)) | 1 1 1 -1 | 1 1 0 | 1 0
|
||||||
|
"| (|) | 1 1 1 0 | 1 1 0 | 1 0
|
||||||
|
"| ((|) | 1 1 1 1 | 1 1 0 | 1 0
|
||||||
|
"| x|) | 1 0 1 -1 | 1 1 0 | 1 0
|
||||||
|
"| (x|) | 1 0 1 0 | 1 1 0 | 1 0
|
||||||
|
"| ((x|) | 1 0 1 1 | 1 1 1 | 1 0
|
||||||
|
"| (| | 0 1 0 1 | 0 0 1 | 0 1
|
||||||
|
"| |x) | 0 0 1 -1 | 0 1 0 | 1 0
|
||||||
|
"| (x|x)) | 0 0 1 -1 | 0 1 0 | 1 0
|
||||||
|
"| (x|x) | 0 0 1 0 | 0 1 0 | 1 0
|
||||||
|
"| ((x|x) | 0 0 1 1 | 0 0 1 | 0 1
|
||||||
|
"| x| | 0 0 0 0 | 0 0 0 | 0 0
|
||||||
|
"| (x| | 0 0 0 1 | 0 0 0 | 0 0
|
||||||
|
let previous = strcharpart(a:pair, 0, 1) ==# a:info.cur.prev_char
|
||||||
|
let is_cr_exp = a:opts.expand_cr
|
||||||
|
\ && empty(a:info.cur.ahead)
|
||||||
|
\ && matchstr(a:info.cur.next_line, '^\s*\zs\S') ==# a:char
|
||||||
|
let is_space_exp = a:opts.expand_space
|
||||||
|
\ && matchstr(a:info.cur.ahead, '^\s\zs\S') ==# a:char
|
||||||
|
let next = a:char ==# a:info.cur.next_char || is_cr_exp || is_space_exp
|
||||||
|
let balance = s:balance_pairs(a:pair, a:info, a:opts)
|
||||||
|
\ - is_cr_exp
|
||||||
|
let next_line = a:opts.jump_expansion && a:opts.expand_cr
|
||||||
|
let closing = s:rights2jump_pair(a:char, a:pair, a:info, a:opts, next_line)
|
||||||
|
let jump_opts = a:opts.jump_next + (a:opts.jump_long * 2)
|
||||||
|
2DMDebug 'is_cr_exp: ' . is_cr_exp
|
||||||
|
2DMDebug 'is_space_exp: ' . is_space_exp
|
||||||
|
2DMDebug 'next: ' . next
|
||||||
|
2DMDebug 'previous: ' . previous
|
||||||
|
2DMDebug 'closing: ' . closing
|
||||||
|
2DMDebug 'balance: ' . balance
|
||||||
|
2DMDebug 'next_line: ' . next_line
|
||||||
|
2DMDebug 'jump_opts: ' . jump_opts
|
||||||
|
if next
|
||||||
|
2DMDebug "next"
|
||||||
|
if closing && jump_opts && (!a:opts.balance_pairs || balance <= 0)
|
||||||
|
2DMDebug "cases: '(|)', '(|))' or '((|)'"
|
||||||
|
2DMDebug "cases: 'x|)', '(x|)' or '((x|)'"
|
||||||
|
return "\<BS>" . repeat("\<C-G>U\<Right>", closing)
|
||||||
|
endif
|
||||||
|
2DMDebug "Nothing to do"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
" !next
|
||||||
|
if previous
|
||||||
|
2DMDebug "!next && previous"
|
||||||
|
if (!a:opts.balance_pairs || balance > 0) && a:opts.jump_back
|
||||||
|
2DMDebug "case: '(|'"
|
||||||
|
return "\<C-G>U\<Left>"
|
||||||
|
endif
|
||||||
|
2DMDebug "Nothing to do"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
" !next && !previous
|
||||||
|
if closing
|
||||||
|
2DMDebug "!next && !previous && closing"
|
||||||
|
if (!a:opts.balance_pairs || balance <= 0) && jump_opts >= 2
|
||||||
|
2DMDebug "case: '(x|x))' or '(x|x)'"
|
||||||
|
return "\<BS>" . repeat("\<C-G>U\<Right>", closing)
|
||||||
|
elseif (!a:opts.balance_pairs || balance > 0) && a:opts.jump_back
|
||||||
|
2DMDebug "case: '((x|x)'"
|
||||||
|
return "\<C-G>U\<Left>"
|
||||||
|
endif
|
||||||
|
2DMDebug "Nothing to do"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
2DMDebug "Nothing to do"
|
||||||
|
return ''
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:keys4quote(char, info, opts) "{{{1
|
||||||
|
let quotes_behind = strchars(matchstr(a:info.cur.behind,
|
||||||
|
\'['.escape(a:char, '\^[]').']*$'))
|
||||||
|
let quotes_ahead = strchars(matchstr(a:info.cur.ahead,
|
||||||
|
\'^['.escape(a:char, '\^[]').']*'))
|
||||||
|
2DMDebug quotes_behind . ' - ' . quotes_ahead
|
||||||
|
2DMDebug string(a:opts.nesting_quotes)
|
||||||
|
if a:opts.autoclose && index(a:opts.nesting_quotes, a:char) >= 0
|
||||||
|
\&& quotes_behind > 1
|
||||||
|
let add2right = quotes_ahead > quotes_behind + 1
|
||||||
|
\? 0 : quotes_behind - quotes_ahead + 1
|
||||||
|
2DMDebug "nesting quotes"
|
||||||
|
2DMDebug add2right
|
||||||
|
return repeat(a:char, add2right) . repeat("\<C-G>U\<Left>", add2right)
|
||||||
|
endif
|
||||||
|
if a:info.cur.next_char ==# a:char
|
||||||
|
2DMDebug "jump over quote"
|
||||||
|
return "\<Del>"
|
||||||
|
endif
|
||||||
|
if a:info.is_ignored_syn
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
let exprs = a:opts.smart_quotes_base + a:opts.smart_quotes_extra
|
||||||
|
if a:opts.autoclose && a:opts.smart_quotes
|
||||||
|
\&& s:any_is_true(exprs, a:info, a:opts)
|
||||||
|
2DMDebug "smart quotes"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
if !a:opts.autoclose && quotes_behind
|
||||||
|
2DMDebug "don't autoclose, jump back"
|
||||||
|
return "\<C-G>U\<Left>"
|
||||||
|
endif
|
||||||
|
if !a:opts.autoclose
|
||||||
|
2DMDebug "don't autoclose"
|
||||||
|
return ''
|
||||||
|
endif
|
||||||
|
2DMDebug "jump back"
|
||||||
|
return a:char . "\<C-G>U\<Left>"
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! s:keys4cr(info, opts) "{{{1
|
||||||
|
if a:opts.expand_cr
|
||||||
|
\&& !empty(filter(copy(a:opts.pairs),
|
||||||
|
\ 'v:val ==# a:info.prev.around'))
|
||||||
|
\|| (a:opts.expand_cr == 2
|
||||||
|
\ && !empty(filter(copy(a:opts.pairs),
|
||||||
|
\ 'strcharpart(v:val, 1, 1) == a:info.cur.next_char')))
|
||||||
|
" Empty pair
|
||||||
|
2DMDebug "expand CR inside pair"
|
||||||
|
let eol_marker = a:opts.insert_eol_marker == 2
|
||||||
|
\&& strchars(a:info.cur.ahead) == 1 ? a:opts.eol_marker : ''
|
||||||
|
return "0\<C-D>\<Del>x\<C-G>U\<Left>\<BS>\<CR>" . a:info.cur.next_char
|
||||||
|
\. "\<Del>" . eol_marker . "\<Up>\<End>\<CR>"
|
||||||
|
endif
|
||||||
|
if a:opts.expand_cr && a:opts.expand_inside_quotes
|
||||||
|
\&& !empty(filter(copy(a:opts.quotes),
|
||||||
|
\ 'v:val.v:val ==# a:info.prev.around'))
|
||||||
|
" Empty pair
|
||||||
|
2DMDebug "expand CR inside quotes"
|
||||||
|
return "\<Up>\<End>\<CR>"
|
||||||
|
endif
|
||||||
|
2DMDebug "do nothing"
|
||||||
|
return ''
|
||||||
|
endfunction
|
||||||
|
" vim: sw=2 et
|
||||||
|
function! delimitMate#option(name) "{{{1
|
||||||
|
return s:option(a:name)
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! delimitMate#ex_cmd(global, action) "{{{1
|
||||||
|
1DMDebug 'action: ' . a:action . ', scope: ' . (a:global ? 'g:' : 'b:')
|
||||||
|
let scope = a:global ? g: : b:
|
||||||
|
if a:action ==# 'enable'
|
||||||
|
let scope.delimitMate_enabled = 1
|
||||||
|
elseif a:action ==# 'disable'
|
||||||
|
let scope.delimitMate_enabled = 0
|
||||||
|
elseif a:action ==# 'switch'
|
||||||
|
let scope.delimitMate_enabled = !s:option('enabled')
|
||||||
|
endif
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! delimitMate#InsertEnter(...) "{{{1
|
||||||
|
1DMDebug
|
||||||
|
call s:info.update()
|
||||||
|
let s:info.skip_icp = 0
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! delimitMate#CursorMovedI(...) "{{{1
|
||||||
|
1DMDebug
|
||||||
|
call s:info.update()
|
||||||
|
let s:info.skip_icp = 0
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! delimitMate#InsertCharPre(str) "{{{1
|
||||||
|
1DMDebug
|
||||||
|
1DMDebug printf('v:char: %s', string(a:str))
|
||||||
|
if s:info.skip_icp
|
||||||
|
" iabbrev fires this event for every char and the trigger
|
||||||
|
1DMDebug "iabbrev expansion running"
|
||||||
|
return 0
|
||||||
|
endif
|
||||||
|
if pumvisible()
|
||||||
|
1DMDebug "pumvisible"
|
||||||
|
return 0
|
||||||
|
endif
|
||||||
|
if s:info.nesting
|
||||||
|
1DMDebug "nesting"
|
||||||
|
let s:info.nesting -= 1
|
||||||
|
return 0
|
||||||
|
endif
|
||||||
|
let s:info.skip_icp = 1
|
||||||
|
if !s:option('enabled')
|
||||||
|
1DMDebug "disabled"
|
||||||
|
return 0
|
||||||
|
endif
|
||||||
|
let typeahead = ''
|
||||||
|
let synstack = join(map(
|
||||||
|
\synstack(line('.'), col('.')),
|
||||||
|
\'tolower(synIDattr(v:val, "name"))'), ',')
|
||||||
|
let s:info.is_ignored_syn = !empty(filter(
|
||||||
|
\s:option('excluded_regions'),
|
||||||
|
\'stridx(synstack, tolower(v:val)) >= 0'))
|
||||||
|
" v:char could be more than one character
|
||||||
|
for char in split(a:str, '\zs')
|
||||||
|
1DMDebug 'char: ' . char
|
||||||
|
let keys = ''
|
||||||
|
let s:info.char = char
|
||||||
|
let opts = s:defaults.consolidate()
|
||||||
|
if s:info.cur.is_escaped()
|
||||||
|
1DMDebug "escaped"
|
||||||
|
return
|
||||||
|
elseif !empty(filter(copy(opts.quotes), 'v:val ==# char'))
|
||||||
|
1DMDebug "quote"
|
||||||
|
let keys = s:keys4quote(char, s:info, opts)
|
||||||
|
let s:info.nesting = strchars(matchstr(keys, '^[^[:cntrl:]]*'))
|
||||||
|
let s:info.nesting = s:info.nesting < 3 ? 0 : s:info.nesting
|
||||||
|
elseif s:info.is_ignored_syn
|
||||||
|
1DMDebug "ignored syn group"
|
||||||
|
return
|
||||||
|
elseif char == ' '
|
||||||
|
1DMDebug "space"
|
||||||
|
let keys = s:keys4space(s:info, opts)
|
||||||
|
elseif !empty(filter(copy(opts.pairs),
|
||||||
|
\'strcharpart(v:val, 0, 1) ==# char'))
|
||||||
|
1DMDebug "left delimiter"
|
||||||
|
let pair = get(filter(copy(opts.pairs),
|
||||||
|
\'strcharpart(v:val, 0, 1) ==# char'), 0, '')
|
||||||
|
let keys = s:keys4left(char, pair, s:info, opts)
|
||||||
|
elseif !empty(filter(copy(opts.pairs),
|
||||||
|
\'strcharpart(v:val, 1, 1) ==# char'))
|
||||||
|
let pair = get(filter(copy(opts.pairs),
|
||||||
|
\'strcharpart(v:val, 1, 1) ==# char'), 0, '')
|
||||||
|
let keys = s:keys4right(char, pair, s:info, opts)
|
||||||
|
1DMDebug "right delimiter"
|
||||||
|
else
|
||||||
|
1DMDebug "just ignore it"
|
||||||
|
return 0
|
||||||
|
endif
|
||||||
|
1DMDebug 'keys: ' . strtrans(keys)
|
||||||
|
let typeahead .= keys
|
||||||
|
endfor
|
||||||
|
if !empty(typeahead)
|
||||||
|
1DMDebug "feed typeahead: " . strtrans(typeahead)
|
||||||
|
call feedkeys(typeahead, 'tmi')
|
||||||
|
endif
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! delimitMate#TextChangedI(...) "{{{1
|
||||||
|
1DMDebug
|
||||||
|
if pumvisible()
|
||||||
|
1DMDebug "pumvisible"
|
||||||
|
return 0
|
||||||
|
endif
|
||||||
|
if !s:option('enabled')
|
||||||
|
1DMDebug "disabled"
|
||||||
|
return
|
||||||
|
endif
|
||||||
|
if s:info.cur.lnum == s:info.prev.lnum + 1
|
||||||
|
\&& s:info.prev.behind ==# s:info.cur.prev_line
|
||||||
|
\&& s:info.prev.ahead ==# s:info.cur.ahead
|
||||||
|
\&& s:info.cur.behind =~ '^\s*$'
|
||||||
|
" CR
|
||||||
|
1DMDebug "CR at eol"
|
||||||
|
return feedkeys(s:keys4cr(s:info, s:defaults.consolidate()), 'tni')
|
||||||
|
endif
|
||||||
|
if s:info.cur.lnum == s:info.prev.lnum - 1
|
||||||
|
\&& s:info.prev.prev_line ==# s:info.cur.line
|
||||||
|
\&& s:info.prev.next_line ==# s:info.cur.next_line
|
||||||
|
let pair = filter(s:option('pairs'), 's:info.cur.prev_char
|
||||||
|
\. matchstr(s:info.cur.next_line, "^\\s*\\zs\\S") ==# v:val')
|
||||||
|
if s:option('expand_cr') && !empty(pair)
|
||||||
|
1DMDebug "CR expansion inside pair"
|
||||||
|
let spaces = strchars(s:info.cur.next_line, '^\s*')
|
||||||
|
return feedkeys(repeat("\<Del>", spaces), 'nti')
|
||||||
|
endif
|
||||||
|
let quote = filter(s:option('quotes'), 's:info.cur.prev_char
|
||||||
|
\. matchstr(s:info.cur.next_line, "^\\s*\\zs\\S") ==# v:val.v:val')
|
||||||
|
if s:option('expand_cr') && s:option('expand_inside_quotes')
|
||||||
|
\&& !empty(quote)
|
||||||
|
1DMDebug "CR expansion inside quotes"
|
||||||
|
return feedkeys("\<Del>")
|
||||||
|
endif
|
||||||
|
1DMDebug "BS at bol"
|
||||||
|
return
|
||||||
|
endif
|
||||||
|
if s:info.cur.lnum != s:info.prev.lnum
|
||||||
|
1DMDebug "Cursor changed line"
|
||||||
|
return
|
||||||
|
endif
|
||||||
|
if s:info.prev.col - s:info.cur.col != len(s:info.prev.prev_char)
|
||||||
|
1DMDebug "zero or several characters were deleted"
|
||||||
|
return
|
||||||
|
endif
|
||||||
|
if len(s:info.prev.line) == len(s:info.cur.line)
|
||||||
|
1DMDebug "Same line length"
|
||||||
|
return
|
||||||
|
endif
|
||||||
|
1DMDebug s:info.prev.around
|
||||||
|
let pair = filter(s:option('pairs'), 'v:val ==# (s:info.cur.prev_char
|
||||||
|
\ . matchstr(s:info.cur.ahead, "^\\s\\zs\\S"))')
|
||||||
|
let quotes = filter(s:option('quotes'),
|
||||||
|
\ 'v:val . v:val ==# (s:info.cur.prev_char
|
||||||
|
\ . matchstr(s:info.cur.ahead, "^\\s\\zs\\S"))')
|
||||||
|
if s:option('expand_space') && (!empty(pair)
|
||||||
|
\|| (s:option('expand_inside_quotes') && !empty(quotes)))
|
||||||
|
1DMDebug "Space expansion inside pair"
|
||||||
|
return feedkeys("\<Del>", 'tni')
|
||||||
|
endif
|
||||||
|
let pair = filter(s:option('pairs'), 'v:val ==# s:info.prev.around')
|
||||||
|
let quote = filter(s:option('quotes'),
|
||||||
|
\'v:val . v:val ==# s:info.prev.around')
|
||||||
|
if !empty(pair) || !empty(quote)
|
||||||
|
1DMDebug "BS inside empty pair or quotes"
|
||||||
|
let keys = "\<Del>"
|
||||||
|
return feedkeys(keys, 'tni')
|
||||||
|
endif
|
||||||
|
1DMDebug "Everything else"
|
||||||
|
return
|
||||||
|
endfunction
|
||||||
|
|
||||||
4
basic_vimrc
Normal file
4
basic_vimrc
Normal file
@@ -0,0 +1,4 @@
|
|||||||
|
so ./test/_setup.vim
|
||||||
|
let delimitMate_expand_cr = 1
|
||||||
|
filetype indent plugin on
|
||||||
|
|
||||||
440
delimitMate.txt
440
delimitMate.txt
@@ -1,440 +0,0 @@
|
|||||||
*delimitMate.txt* Trying to keep those beasts at bay! v.1.6
|
|
||||||
|
|
||||||
|
|
||||||
REFERENCE MANUAL *delimitMate*
|
|
||||||
|
|
||||||
|
|
||||||
==============================================================================
|
|
||||||
0.- CONTENTS *delimitMate-contents*
|
|
||||||
|
|
||||||
1. Introduction____________________________|delimitMateIntro|
|
|
||||||
2. Functionality___________________________|delimitMateFunctionality|
|
|
||||||
2.1 Automatic closing & exiting________|delimitMateAutoClose|
|
|
||||||
2.2 Expansion of space and CR__________|delimitMateExpansion|
|
|
||||||
2.3 Deletion of empty pairs____________|delimitMateBackspace|
|
|
||||||
2.4 Visual wrapping____________________|delimitMateVisualWrapping|
|
|
||||||
3. Customization___________________________|delimitMateOptions|
|
|
||||||
3.1 Option summary_____________________|delimitMateOptionSummary|
|
|
||||||
3.2 Options details____________________|delimitMateOptionDetails|
|
|
||||||
4. Commands________________________________|delimitMateCommands|
|
|
||||||
5. TODO list_______________________________|delimitMateTodo|
|
|
||||||
6. Maintainer______________________________|delimitMateMaintainer|
|
|
||||||
7. Credits_________________________________|delimitMateCredits|
|
|
||||||
8. History_________________________________|delimitMateHistory|
|
|
||||||
|
|
||||||
==============================================================================
|
|
||||||
1.- INTRODUCTION *delimitMateIntro*
|
|
||||||
|
|
||||||
The delimitMate plugin tries to provide some not so dumb help in the work with
|
|
||||||
delimiters (brackets, quotes, etc.), with some optional auto-completions and
|
|
||||||
expansions.
|
|
||||||
|
|
||||||
When automatic closing is enabled, if an opening delimiter is inserted
|
|
||||||
delimitMate inserts the closing pair and places the cursor between them. When
|
|
||||||
automatic closing is disabled, no closing delimiters is inserted by
|
|
||||||
delimitMate, but if a pair of delimiters is typed, the cursor is placed in the
|
|
||||||
middle. Also, to get out of a pair of delimiters just type the right delimiter
|
|
||||||
and the cursor will jump to the right.
|
|
||||||
|
|
||||||
If the cursor is inside an empty pair of delimiters <Space> and <CR> can be
|
|
||||||
expanded to follow your coding style, you just need to define a couple of
|
|
||||||
options with the desired mappings for them.
|
|
||||||
|
|
||||||
==============================================================================
|
|
||||||
2. FUNCTIONALITY *delimitMateFunctionality*
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
2.1 AUTOMATIC CLOSING AND EXITING *delimitMateAutoClose*
|
|
||||||
|
|
||||||
With automatic closing enabled, if an opening delimiter is inserted the plugin
|
|
||||||
inserts the closing delimiter and places the cursor between the pair. With
|
|
||||||
automatic closing disabled, no closing delimiters is inserted by delimitMate,
|
|
||||||
but when a pair of delimiters is typed, the cursor is placed in the middle.
|
|
||||||
|
|
||||||
When the cursor is inside an empty pair or located next to the left of a
|
|
||||||
closing delimiter, the cursor is placed outside the pair to the right of the
|
|
||||||
closing delimiter.
|
|
||||||
|
|
||||||
Unless |'b:delimitMate_matchpairs'| and |'b:delimitMate_quotes'|is set, this
|
|
||||||
script uses the values in '&matchpairs' to identify the pairs, and ", ' and `
|
|
||||||
for quotes respectively.
|
|
||||||
|
|
||||||
The following table shows the behaviour, this applies to quotes too (the final
|
|
||||||
position of the cursor is represented by a "|"):
|
|
||||||
|
|
||||||
With auto-close: >
|
|
||||||
Type | You get
|
|
||||||
====================
|
|
||||||
( | (|)
|
|
||||||
–––––––––|––––––––––
|
|
||||||
() | ()|
|
|
||||||
<
|
|
||||||
Without auto-close: >
|
|
||||||
|
|
||||||
Type | You get
|
|
||||||
====================
|
|
||||||
() | (|)
|
|
||||||
–––––––––|––––––––––
|
|
||||||
()) | ()|
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
2.2 EXPANSION OF SPACE AND CAR RETURN *delimitMateExpansion*
|
|
||||||
|
|
||||||
When the cursor is inside an empty pair of delimiters, <Space> and <CR> can be
|
|
||||||
expanded to follow your coding style with |'b:delimitMate_expand_space'| and
|
|
||||||
|'b:delimitMate_expand_cr'|. e.g. (cursor represented by a "|"):
|
|
||||||
|
|
||||||
Expand <Space> to: >
|
|
||||||
|
|
||||||
<Space><Space><Left> | You get
|
|
||||||
====================================
|
|
||||||
(|) | ( | )
|
|
||||||
<
|
|
||||||
Expand <CR> to: >
|
|
||||||
|
|
||||||
<CR><CR><Up> | You get
|
|
||||||
============================
|
|
||||||
(|) | (
|
|
||||||
| |
|
|
||||||
| )
|
|
||||||
<
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
2.3 DELETION OF EMPTY PAIR *delimitMateBackspace*
|
|
||||||
|
|
||||||
If you press backspace inside an empty pair, both delimiters are deleted.
|
|
||||||
|
|
||||||
e.g.: >
|
|
||||||
|
|
||||||
Before | After
|
|
||||||
====================================
|
|
||||||
call expand(|) | call expand|
|
|
||||||
<
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
2.4 WRAPPING OF VISUAL SELECTION *delimitMateVisualWrapping*
|
|
||||||
|
|
||||||
When visual mode is active this script allows for the selection to be enclosed
|
|
||||||
with delimiters. But, since brackets have special meaning in visual mode, a
|
|
||||||
leader (the value of 'mapleader' by default) should precede the delimiter.
|
|
||||||
This feature doesn't currently work on blockwise visual mode, any suggestions
|
|
||||||
will be welcome.
|
|
||||||
|
|
||||||
e.g. (selection represented between square brackets): >
|
|
||||||
|
|
||||||
Selected text | After \"
|
|
||||||
=============================================
|
|
||||||
An [absurd] example! | An "absurd" example!
|
|
||||||
<
|
|
||||||
==============================================================================
|
|
||||||
3. CUSTOMIZATION *delimitMateOptions*
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
3.1 OPTIONS SUMMARY *delimitMateOptionSummary*
|
|
||||||
|
|
||||||
The behaviour of this script can be customized setting the following options
|
|
||||||
in your vimrc file. You can use local options to set the configuration for
|
|
||||||
specific file types, see |delimitMateOptionDetails| for examples.
|
|
||||||
|
|
||||||
|'loaded_delimitMate'| Turns off the script.
|
|
||||||
|
|
||||||
|'delimitMate_autoclose'| Tells delimitMate whether to automagically
|
|
||||||
insert the closing delimiter.
|
|
||||||
|
|
||||||
|'delimitMate_matchpairs'| Tells delimitMate which characters are
|
|
||||||
matching pairs.
|
|
||||||
|
|
||||||
|'delimitMate_quotes'| Tells delimitMate which quotes should be
|
|
||||||
used.
|
|
||||||
|
|
||||||
|'delimitMate_visual_leader'| Sets the leader to be used in visual mode.
|
|
||||||
|
|
||||||
|'delimitMate_expand_cr'| Sets the expansion for <CR> inside an empty
|
|
||||||
pair of matching delimiters or quotes.
|
|
||||||
|
|
||||||
|'delimitMate_expand_space'| Sets the expansion for <Space> inside an
|
|
||||||
empty pair of matching delimiters or quotes.
|
|
||||||
|
|
||||||
|'delimitMate_excluded_ft'| Turns off the script for the given file types.
|
|
||||||
|
|
||||||
|'delimitMate_apostrophes'| Tells delimitMate how it should "fix"
|
|
||||||
balancing of single quotes when used as
|
|
||||||
apostrophes.
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
3.2 OPTIONS DETAILS *delimitMateOptionDetails*
|
|
||||||
|
|
||||||
Add the shown lines to your vimrc file in order to set the below options.
|
|
||||||
Local options take precedence over global ones and can be used along with
|
|
||||||
autocmd to modify delimitMate's behavior for specific file types.
|
|
||||||
|
|
||||||
*'loaded_delimitMate'*
|
|
||||||
*'b:loaded_delimitMate'*
|
|
||||||
This option prevents delimitMate from loading.
|
|
||||||
e.g.: >
|
|
||||||
let loaded_delimitMate = 1
|
|
||||||
au FileType mail let b:loaded_delimitMate = 1
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_autoclose'*
|
|
||||||
*'b:delimitMate_autoclose'*
|
|
||||||
Values: 0 or 1. ~
|
|
||||||
Default: 1 ~
|
|
||||||
|
|
||||||
If this option is set to 0, delimitMate will not add a closing delimiter
|
|
||||||
automagically. See |delimitMateAutoClose| for details.
|
|
||||||
e.g.: >
|
|
||||||
let delimitMate_autoclose = 0
|
|
||||||
au FileType mail let b:delimitMate_autoclose = 0
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_matchpairs'*
|
|
||||||
*'b:delimitMate_matchpairs'*
|
|
||||||
Values: A string with |matchpairs| syntax. ~
|
|
||||||
Default: &matchpairs ~
|
|
||||||
|
|
||||||
Use this option to tell delimitMate which characters should be considered
|
|
||||||
matching pairs. Read |delimitMateAutoClose| for details.
|
|
||||||
e.g: >
|
|
||||||
let delimitMate = "(:),[:],{:},<:>"
|
|
||||||
au FileType vim,html let b:delimitMate_matchpairs = "(:),[:],{:},<:>"
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_quotes'*
|
|
||||||
*'b:delimitMate_quotes'*
|
|
||||||
Values: A string of characters separated by spaces. ~
|
|
||||||
Default: "\" ' `" ~
|
|
||||||
|
|
||||||
Use this option to tell delimitMate which characters should be considered as
|
|
||||||
quotes. Read |delimitMateAutoClose| for details.
|
|
||||||
e.g.: >
|
|
||||||
let b:delimitMate_quotes = "\" ' ` *"
|
|
||||||
au FileType html let b:delimitMate_quotes = "\" '"
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_visual_leader'*
|
|
||||||
*'b:delimitMate_visual_leader'*
|
|
||||||
Values: Any character. ~
|
|
||||||
Default: q ~
|
|
||||||
|
|
||||||
The value of this option will be used to wrap the selection in visual mode
|
|
||||||
when followed by a delimiter. Read |delimitMateVisualWrap| for details.
|
|
||||||
e.g: >
|
|
||||||
let delimitMate_visual_leader = "f"
|
|
||||||
au FileType html let b:delimitMate_visual_leader = "f"
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_expand_cr'*
|
|
||||||
*'b:delimitMate_expand_cr'*
|
|
||||||
Values: A key mapping. ~
|
|
||||||
Default: "\<CR>" ~
|
|
||||||
|
|
||||||
The value of this option will be used to expand the car return character when
|
|
||||||
typed inside an empty delimiter pair. Read |delimitMateExpansion| for details.
|
|
||||||
e.g.: >
|
|
||||||
let b:delimitMate_expand_cr = "\<CR>\<CR>\<Up>"
|
|
||||||
au FileType mail let b:delimitMate_expand_cr = "\<CR>
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_expand_space'*
|
|
||||||
*'b:delimitMate_expand_space'*
|
|
||||||
Values: A key mapping. ~
|
|
||||||
Default: "\<Space>" ~
|
|
||||||
|
|
||||||
The value of this option will be used to expand the space character when typed
|
|
||||||
inside an empty delimiter pair. Read |delimitMateExpansion| for details.
|
|
||||||
e.g.: >
|
|
||||||
let delimitMate_expand_space = "\<Space>\<Space>\<Left>"
|
|
||||||
au FileType tcl let b:delimitMate_expand_space = "\<Space>"
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_excluded_ft'*
|
|
||||||
Values: A string of file type names separated by single commas. ~
|
|
||||||
Default: Empty. ~
|
|
||||||
|
|
||||||
This options turns delimitMate off for the listed file types, use this option
|
|
||||||
only if don't want any of the features it provides.
|
|
||||||
e.g.: >
|
|
||||||
let delimitMate_excluded_ft = "mail,txt"
|
|
||||||
<
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
*'delimitMate_apostrophes'*
|
|
||||||
Values: Strings separated by ":". ~
|
|
||||||
Default: "n't:'s:'re:'d:'ll:'ve:s'" ~
|
|
||||||
|
|
||||||
If auto-close is enabled, this option tells delimitMate how to try to fix the
|
|
||||||
balancing of single quotes when used as apostrophes. The values of this option
|
|
||||||
are strings of text where a single quote would be used as an apostrophe (e.g.:
|
|
||||||
the "n't" of wouldn't or can't) separated by ":". Set it to an empty string to
|
|
||||||
disable this feature.
|
|
||||||
e.g.: >
|
|
||||||
let delimitMate_apostrophes = ""
|
|
||||||
au FileType tcl let delimitMate_apostrophes = ""
|
|
||||||
<
|
|
||||||
==============================================================================
|
|
||||||
4. COMMANDS *delimitMateCommands*
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
:DelimitMateReload *:DelimitMateReload*
|
|
||||||
|
|
||||||
Re-sets all the mappings used for this script, use it if any option has been
|
|
||||||
changed or if the filetype option hasn't been set yet.
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
:DelimitMateTest *:DelimitMateTest*
|
|
||||||
|
|
||||||
This command tests every mapping set-up for this script, useful for testing
|
|
||||||
custom configurations.
|
|
||||||
|
|
||||||
The following output corresponds to the default values, it will be different
|
|
||||||
depending on your configuration. "Open & close:" represents the final result
|
|
||||||
when the closing delimiter has been inserted, either manually or
|
|
||||||
automatically, see |delimitMateExpansion|. "Delete:" typing backspace in an
|
|
||||||
empty pair, see |delimitMateBackspace|. "Exit:" typing a closing delimiter
|
|
||||||
inside a pair of delimiters, see |delimitMateAutoclose|. "Space:" the
|
|
||||||
expansion, if any, of space, see |delimitMateExpansion|. "Visual-L",
|
|
||||||
"Visual-R" and "Visual" shows visual wrapping, see
|
|
||||||
|delimitMateVisualWrapping|. "Car return:" the expansion of car return, see
|
|
||||||
|delimitMateExpansion|. The cursor's position at the end of every test is
|
|
||||||
represented by an "|": >
|
|
||||||
|
|
||||||
* AUTOCLOSE:
|
|
||||||
Open & close: (|)
|
|
||||||
Delete: |
|
|
||||||
Exit: ()|
|
|
||||||
Space: ( |)
|
|
||||||
Visual-L: (v)
|
|
||||||
Visual-R: (v)
|
|
||||||
Car return: (
|
|
||||||
|)
|
|
||||||
|
|
||||||
Open & close: {|}
|
|
||||||
Delete: |
|
|
||||||
Exit: {}|
|
|
||||||
Space: { |}
|
|
||||||
Visual-L: {v}
|
|
||||||
Visual-R: {v}
|
|
||||||
Car return: {
|
|
||||||
|}
|
|
||||||
|
|
||||||
Open & close: [|]
|
|
||||||
Delete: |
|
|
||||||
Exit: []|
|
|
||||||
Space: [ |]
|
|
||||||
Visual-L: [v]
|
|
||||||
Visual-R: [v]
|
|
||||||
Car return: [
|
|
||||||
|]
|
|
||||||
|
|
||||||
Open & close: "|"
|
|
||||||
Delete: |
|
|
||||||
Exit: ""|
|
|
||||||
Space: " |"
|
|
||||||
Visual: "v"
|
|
||||||
Car return: "
|
|
||||||
|"
|
|
||||||
|
|
||||||
Open & close: '|'
|
|
||||||
Delete: |
|
|
||||||
Exit: ''|
|
|
||||||
Space: ' |'
|
|
||||||
Visual: 'v'
|
|
||||||
Car return: '
|
|
||||||
|'
|
|
||||||
|
|
||||||
Open & close: `|`
|
|
||||||
Delete: |
|
|
||||||
Exit: ``|
|
|
||||||
Space: ` |`
|
|
||||||
Visual: `v`
|
|
||||||
Car return: `
|
|
||||||
|`
|
|
||||||
<
|
|
||||||
|
|
||||||
==============================================================================
|
|
||||||
5. TODO LIST *delimitMateTodo*
|
|
||||||
|
|
||||||
- Automatic set-up by file type.
|
|
||||||
- Make visual wrapping work on blockwise visual mode.
|
|
||||||
- Limit behaviour by region.
|
|
||||||
|
|
||||||
==============================================================================
|
|
||||||
6. MAINTAINER *delimitMateMaintainer*
|
|
||||||
|
|
||||||
Hi there! My name is Israel Chauca F. and I can be reached at:
|
|
||||||
mailto:israelchauca@gmail.com
|
|
||||||
|
|
||||||
Feel free to send me any suggestions and/or comments about this plugin, I'll
|
|
||||||
be very pleased to read them.
|
|
||||||
|
|
||||||
==============================================================================
|
|
||||||
7. CREDITS *delimitMateCredits*
|
|
||||||
|
|
||||||
Some of the code that make this script is modified or just shamelessly copied
|
|
||||||
from the following sources:
|
|
||||||
|
|
||||||
- Ian McCracken
|
|
||||||
Post titled: Vim, Part II: Matching Pairs:
|
|
||||||
http://concisionandconcinnity.blogspot.com/
|
|
||||||
|
|
||||||
- Aristotle Pagaltzis
|
|
||||||
From the comments on the previous blog post and from:
|
|
||||||
http://gist.github.com/144619
|
|
||||||
|
|
||||||
- Vim Scripts:
|
|
||||||
http://www.vim.org/scripts
|
|
||||||
|
|
||||||
This script was inspired by the auto-completion of delimiters of TextMate.
|
|
||||||
|
|
||||||
==============================================================================
|
|
||||||
8. HISTORY *delimitMateHistory*
|
|
||||||
|
|
||||||
Version Date Release notes ~
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
1.6 2009-10-10 Now delimitMate tries to fix the balancing of single
|
|
||||||
quotes when used as apostrophes. You can read
|
|
||||||
|delimitMate_apostrophes| for details.
|
|
||||||
Fixed an error when |b:delimitMate_expand_space|
|
|
||||||
wasn't set but |delimitMate_expand_space| wasn't.
|
|
||||||
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
1.5 2009-10-05 Fix: delimitMate should work correctly for files
|
|
||||||
passed as arguments to Vim. Thanks to Ben Beuchler
|
|
||||||
for helping to nail this bug.
|
|
||||||
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
1.4 2009-09-27 Fix: delimitMate is now enabled on new buffers even
|
|
||||||
if they don't have set the file type option or were
|
|
||||||
opened directly from the terminal.
|
|
||||||
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
1.3 2009-09-24 Now local options can be used along with autocmd
|
|
||||||
for specific file type configurations.
|
|
||||||
Fixes:
|
|
||||||
- Unnamed register content is not lost on visual
|
|
||||||
mode.
|
|
||||||
- Use noremap where appropiate.
|
|
||||||
- Wrapping a single empty line works as expected.
|
|
||||||
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
1.2 2009-09-07 Fixes:
|
|
||||||
- When inside nested empty pairs, deleting the
|
|
||||||
innermost left delimiter would delete all right
|
|
||||||
contiguous delimiters.
|
|
||||||
- When inside an empty pair, inserting a left
|
|
||||||
delimiter wouldn't insert the right one, instead
|
|
||||||
the cursor would jump to the right.
|
|
||||||
- New buffer inside the current window wouldn't
|
|
||||||
have the mappings set.
|
|
||||||
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
1.1 2009-08-25 Fixed an error that ocurred when mapleader wasn't
|
|
||||||
set and added support for GetLatestScripts
|
|
||||||
auto-detection.
|
|
||||||
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
1.0 2009-08-23 Initial upload.
|
|
||||||
|
|
||||||
|---------|------------|-----------------------------------------------------|
|
|
||||||
|
|
||||||
vim:tw=78:ts=8:ft=help:norl:formatoptions+=tcroqn:autoindent:
|
|
||||||
547
delimitMate.vim
547
delimitMate.vim
@@ -1,547 +0,0 @@
|
|||||||
" ============================================================================
|
|
||||||
" File: delimitMate.vim
|
|
||||||
" Version: 1.6
|
|
||||||
" Description: This plugin tries to emulate the auto-completion of delimiters
|
|
||||||
" that TextMate provides.
|
|
||||||
" Maintainer: Israel Chauca F. <israelchauca@gmail.com>
|
|
||||||
" Manual: Read ":help delimitMate".
|
|
||||||
" Credits: Some of the code is modified or just copied from the following:
|
|
||||||
"
|
|
||||||
" - Ian McCracken
|
|
||||||
" Post titled: Vim, Part II: Matching Pairs:
|
|
||||||
" http://concisionandconcinnity.blogspot.com/
|
|
||||||
"
|
|
||||||
" - Aristotle Pagaltzis
|
|
||||||
" From the comments on the previous blog post and from:
|
|
||||||
" http://gist.github.com/144619
|
|
||||||
"
|
|
||||||
" - Vim Scripts:
|
|
||||||
" http://www.vim.org/scripts/
|
|
||||||
|
|
||||||
if exists("g:loaded_delimitMate") "{{{1
|
|
||||||
" User doesn't want this plugin, let's get out!
|
|
||||||
finish
|
|
||||||
endif
|
|
||||||
let g:loaded_delimitMate = 1
|
|
||||||
|
|
||||||
if exists("s:loaded_delimitMate") && !exists("g:delimitMate_testing")
|
|
||||||
" Don't define the functions if they already exist: just do the work
|
|
||||||
" (unless we are testing):
|
|
||||||
call s:DelimitMateDo()
|
|
||||||
finish
|
|
||||||
endif
|
|
||||||
|
|
||||||
if v:version < 700
|
|
||||||
echoerr "delimitMate: this plugin requires vim >= 7!"
|
|
||||||
finish
|
|
||||||
endif
|
|
||||||
|
|
||||||
let s:loaded_delimitMate = 1 " }}}1
|
|
||||||
|
|
||||||
function! s:Init() "{{{1
|
|
||||||
|
|
||||||
if !exists("b:delimitMate_autoclose") && !exists("g:delimitMate_autoclose") " {{{
|
|
||||||
let s:autoclose = 1
|
|
||||||
elseif exists("b:delimitMate_autoclose")
|
|
||||||
let s:autoclose = b:delimitMate_autoclose
|
|
||||||
else
|
|
||||||
let s:autoclose = g:delimitMate_autoclose
|
|
||||||
endif " }}}
|
|
||||||
|
|
||||||
if !exists("b:delimitMate_matchpairs") && !exists("g:delimitMate_matchpairs") " {{{
|
|
||||||
if s:ValidMatchpairs(&matchpairs) == 1
|
|
||||||
let s:matchpairs_temp = &matchpairs
|
|
||||||
else
|
|
||||||
echoerr "delimitMate: There seems to be a problem with 'matchpairs', read ':help matchpairs' and fix it or notify the maintainer of this script if this is a bug."
|
|
||||||
finish
|
|
||||||
endif
|
|
||||||
elseif exists("b:delimitMate_matchpairs")
|
|
||||||
if s:ValidMatchpairs(b:delimitMate_matchpairs) || b:delimitMate_matchpairs == ""
|
|
||||||
let s:matchpairs_temp = b:delimitMate_matchpairs
|
|
||||||
else
|
|
||||||
echoerr "delimitMate: Invalid format in 'b:delimitMate_matchpairs', falling back to matchpairs. Fix the error and use the command :DelimitMateReload to try again."
|
|
||||||
if s:ValidMatchpairs(&matchpairs) == 1
|
|
||||||
let s:matchpairs_temp = &matchpairs
|
|
||||||
else
|
|
||||||
echoerr "delimitMate: There seems to be a problem with 'matchpairs', read ':help matchpairs' and fix it or notify the maintainer of this script if this is a bug."
|
|
||||||
let s:matchpairs_temp = ""
|
|
||||||
endif
|
|
||||||
endif
|
|
||||||
else
|
|
||||||
if s:ValidMatchpairs(g:delimitMate_matchpairs) || g:delimitMate_matchpairs == ""
|
|
||||||
let s:matchpairs_temp = g:delimitMate_matchpairs
|
|
||||||
else
|
|
||||||
echoerr "delimitMate: Invalid format in 'g:delimitMate_matchpairs', falling back to matchpairs. Fix the error and use the command :DelimitMateReload to try again."
|
|
||||||
if s:ValidMatchpairs(&matchpairs) == 1
|
|
||||||
let s:matchpairs_temp = &matchpairs
|
|
||||||
else
|
|
||||||
echoerr "delimitMate: There seems to be a problem with 'matchpairs', read ':help matchpairs' and fix it or notify the maintainer of this script if this is a bug."
|
|
||||||
let s:matchpairs_temp = ""
|
|
||||||
endif
|
|
||||||
endif
|
|
||||||
|
|
||||||
endif " }}}
|
|
||||||
|
|
||||||
if exists("b:delimitMate_quotes") " {{{
|
|
||||||
if b:delimitMate_quotes =~ '^\(\S\)\(\s\S\)*$' || b:delimitMate_quotes == ""
|
|
||||||
let s:quotes = split(b:delimitMate_quotes)
|
|
||||||
else
|
|
||||||
let s:quotes = split("\" ' `")
|
|
||||||
echoerr "delimitMate: There is a problem with the format of 'b:delimitMate_quotes', it should be a string of single characters separated by spaces. Falling back to default values."
|
|
||||||
endif
|
|
||||||
elseif exists("g:delimitMate_quotes")
|
|
||||||
if g:delimitMate_quotes =~ '^\(\S\)\(\s\S\)*$' || g:delimitMate_quotes == ""
|
|
||||||
let s:quotes = split(g:delimitMate_quotes)
|
|
||||||
else
|
|
||||||
let s:quotes = split("\" ' `")
|
|
||||||
echoerr "delimitMate: There is a problem with the format of 'g:delimitMate_quotes', it should be a string of single characters separated by spaces. Falling back to default values."
|
|
||||||
endif
|
|
||||||
else
|
|
||||||
let s:quotes = split("\" ' `")
|
|
||||||
endif " }}}
|
|
||||||
|
|
||||||
if !exists("b:delimitMate_visual_leader") && !exists("g:delimitMate_visual_leader") " {{{
|
|
||||||
if !exists("g:mapleader")
|
|
||||||
let s:visual_leader = "\\"
|
|
||||||
else
|
|
||||||
let s:visual_leader = g:mapleader
|
|
||||||
endif
|
|
||||||
elseif exists("b:delimitMate_visual_leader")
|
|
||||||
let s:visual_leader = b:delimitMate_visual_leader
|
|
||||||
else
|
|
||||||
let s:visual_leader = g:delimitMate_visual_leader
|
|
||||||
endif " }}}
|
|
||||||
|
|
||||||
if !exists("b:delimitMate_expand_space") && !exists("g:delimitMate_expand_space") " {{{
|
|
||||||
let s:expand_space = "\<Space>"
|
|
||||||
elseif exists("b:delimitMate_expand_space")
|
|
||||||
if b:delimitMate_expand_space == ""
|
|
||||||
let s:expand_space = "\<Space>"
|
|
||||||
else
|
|
||||||
let s:expand_space = b:delimitMate_expand_space
|
|
||||||
endif
|
|
||||||
else
|
|
||||||
if g:delimitMate_expand_space == ""
|
|
||||||
let s:expand_space = "\<Space>"
|
|
||||||
else
|
|
||||||
let s:expand_space = g:delimitMate_expand_space
|
|
||||||
endif
|
|
||||||
|
|
||||||
endif " }}}
|
|
||||||
|
|
||||||
if !exists("b:delimitMate_expand_cr") && !exists("g:delimitMate_expand_cr") " {{{
|
|
||||||
let s:expand_return = "\<CR>"
|
|
||||||
elseif exists("b:delimitMate_expand_cr")
|
|
||||||
if b:delimitMate_expand_cr == ""
|
|
||||||
let s:expand_return = "\<CR>"
|
|
||||||
else
|
|
||||||
let s:expand_return = b:delimitMate_expand_cr
|
|
||||||
endif
|
|
||||||
else
|
|
||||||
if g:delimitMate_expand_cr == ""
|
|
||||||
let s:expand_return = "\<CR>"
|
|
||||||
else
|
|
||||||
let s:expand_return = g:delimitMate_expand_cr
|
|
||||||
endif
|
|
||||||
|
|
||||||
endif " }}}
|
|
||||||
|
|
||||||
if !exists("b:delimitMate_apostrophes") && !exists("g:delimitMate_apostrophes") " {{{
|
|
||||||
let s:apostrophes = split("n't:'s:'re:'m:'d:'ll:'ve:s'",':')
|
|
||||||
|
|
||||||
elseif exists("b:delimitMate_apostrophes")
|
|
||||||
let s:apostrophes = split(b:delimitMate_apostrophes)
|
|
||||||
else
|
|
||||||
let s:apostrophes = split(g:delimitMate_apostrophes)
|
|
||||||
endif " }}}
|
|
||||||
|
|
||||||
let s:matchpairs = split(s:matchpairs_temp, ',')
|
|
||||||
let s:left_delims = split(s:matchpairs_temp, ':.,\=')
|
|
||||||
let s:right_delims = split(s:matchpairs_temp, ',\=.:')
|
|
||||||
let s:VMapMsg = "delimitMate: delimitMate is disabled on blockwise visual mode."
|
|
||||||
|
|
||||||
call s:UnMap()
|
|
||||||
if s:autoclose
|
|
||||||
call s:AutoClose()
|
|
||||||
else
|
|
||||||
call s:NoAutoClose()
|
|
||||||
endif
|
|
||||||
call s:VisualMaps()
|
|
||||||
call s:ExtraMappings()
|
|
||||||
let b:loaded_delimitMate = 1
|
|
||||||
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:ValidMatchpairs(str) "{{{1
|
|
||||||
if a:str !~ '^.:.\(,.:.\)*$'
|
|
||||||
return 0
|
|
||||||
endif
|
|
||||||
for pair in split(a:str,',')
|
|
||||||
if strpart(pair, 0, 1) == strpart(pair, 2, 1) || strlen(pair) != 3
|
|
||||||
return 0
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
return 1
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:IsEmptyPair(str) "{{{1
|
|
||||||
for pair in s:matchpairs
|
|
||||||
if a:str == join( split( pair, ':' ),'' )
|
|
||||||
return 1
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
for quote in s:quotes
|
|
||||||
if a:str == quote . quote
|
|
||||||
return 1
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
return 0
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:WithinEmptyPair() "{{{1
|
|
||||||
let cur = strpart( getline('.'), col('.')-2, 2 )
|
|
||||||
return s:IsEmptyPair( cur )
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:SkipDelim(char) "{{{1
|
|
||||||
let cur = strpart( getline('.'), col('.')-2, 3 )
|
|
||||||
if cur[0] == "\\"
|
|
||||||
" Escaped character
|
|
||||||
return a:char
|
|
||||||
elseif cur[1] == a:char
|
|
||||||
" Exit pair
|
|
||||||
return "\<Right>"
|
|
||||||
elseif cur[1] == ' ' && cur[2] == a:char
|
|
||||||
" I'm leaving this in case someone likes it. Jump an space and delimiter.
|
|
||||||
return "\<Right>\<Right>"
|
|
||||||
elseif s:IsEmptyPair( cur[0] . a:char )
|
|
||||||
" Add closing delimiter and jump back to the middle.
|
|
||||||
return a:char . "\<Left>"
|
|
||||||
else
|
|
||||||
" Nothing special here, return the same character.
|
|
||||||
return a:char
|
|
||||||
endif
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:QuoteDelim(char) "{{{1
|
|
||||||
let line = getline('.')
|
|
||||||
let col = col('.')
|
|
||||||
if line[col - 2] == "\\"
|
|
||||||
" Seems like a escaped character, insert a single quotation mark.
|
|
||||||
return a:char
|
|
||||||
elseif line[col - 1] == a:char
|
|
||||||
" Get out of the string.
|
|
||||||
return "\<Right>"
|
|
||||||
else
|
|
||||||
" Insert a pair and jump to the middle.
|
|
||||||
return a:char.a:char."\<Left>"
|
|
||||||
endif
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:ClosePair(char) "{{{1
|
|
||||||
if getline('.')[col('.') - 1] == a:char
|
|
||||||
" Same character on the rigth, jump it.
|
|
||||||
return "\<Right>"
|
|
||||||
else
|
|
||||||
" Insert character.
|
|
||||||
return a:char
|
|
||||||
endif
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:ResetMappings() "{{{1
|
|
||||||
for delim in s:right_delims + s:left_delims + s:quotes
|
|
||||||
silent! exec 'iunmap <buffer> ' . delim
|
|
||||||
silent! exec 'vunmap <buffer> ' . s:visual_leader . delim
|
|
||||||
endfor
|
|
||||||
silent! iunmap <buffer> <CR>
|
|
||||||
silent! iunmap <buffer> <Space>
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:MapMsg(msg) "{{{1
|
|
||||||
redraw
|
|
||||||
echomsg a:msg
|
|
||||||
return ""
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:NoAutoClose() "{{{1
|
|
||||||
" inoremap <buffer> ) <C-R>=<SID>SkipDelim('\)')<CR>
|
|
||||||
for delim in s:right_delims + s:quotes
|
|
||||||
exec 'inoremap <buffer> ' . delim . ' <C-R>=<SID>SkipDelim("' . escape(delim,'"') . '")<CR>'
|
|
||||||
endfor
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:AutoClose() "{{{1
|
|
||||||
" Add matching pair and jump to the midle:
|
|
||||||
" inoremap <buffer> ( ()<Left>
|
|
||||||
let s:i = 0
|
|
||||||
while s:i < len(s:matchpairs)
|
|
||||||
exec 'inoremap <buffer> ' . s:left_delims[s:i] . ' ' . s:left_delims[s:i] . s:right_delims[s:i] . '<Left>'
|
|
||||||
let s:i += 1
|
|
||||||
endwhile
|
|
||||||
|
|
||||||
" Add matching quote and jump to the midle, or exit if inside a pair of matching quotes:
|
|
||||||
" inoremap <buffer> " <C-R>=<SID>QuoteDelim("\"")<CR>
|
|
||||||
for delim in s:quotes
|
|
||||||
exec 'inoremap <buffer> ' . delim . ' <C-R>=<SID>QuoteDelim("\' . delim . '")<CR>'
|
|
||||||
endfor
|
|
||||||
|
|
||||||
" Exit from inside the matching pair:
|
|
||||||
" inoremap <buffer> ) <C-R>=<SID>ClosePair(')')<CR>
|
|
||||||
for delim in s:right_delims
|
|
||||||
exec 'inoremap <buffer> ' . delim . ' <C-R>=<SID>ClosePair("\' . delim . '")<CR>'
|
|
||||||
endfor
|
|
||||||
|
|
||||||
" Try to fix the use of apostrophes:
|
|
||||||
" inoremap <buffer> n't n't
|
|
||||||
for map in s:apostrophes
|
|
||||||
exec "inoremap <buffer> " . map . " " . map
|
|
||||||
endfor
|
|
||||||
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:VisualMaps() " {{{1
|
|
||||||
" Wrap the selection with matching pairs, but do nothing if blockwise visual mode is active:
|
|
||||||
let s:i = 0
|
|
||||||
while s:i < len(s:matchpairs)
|
|
||||||
" Map left delimiter:
|
|
||||||
" vnoremap <buffer> <expr> \( <SID>IsBlockVisual() ? <SID>MapMsg("Message") : "s(\<C-R>\")\<Esc>:call <SID>RestoreRegister()<CR>"
|
|
||||||
exec 'vnoremap <buffer> <expr> ' . s:visual_leader . s:left_delims[s:i] . ' <SID>IsBlockVisual() ? <SID>MapMsg("' . s:VMapMsg . '") : "s' . s:left_delims[s:i] . '\<C-R>\"' . s:right_delims[s:i] . '\<Esc>:call <SID>RestoreRegister()<CR>"'
|
|
||||||
|
|
||||||
" Map right delimiter:
|
|
||||||
" vnoremap <buffer> <expr> \) <SID>IsBlockVisual() ? <SID>MapMsg("Message") : "s(\<C-R>\")\<Esc>:call <SID>RestoreRegister()<CR>"
|
|
||||||
exec 'vnoremap <buffer> <expr> ' . s:visual_leader . s:right_delims[s:i] . ' <SID>IsBlockVisual() ? <SID>MapMsg("' . s:VMapMsg . '") : "s' . s:left_delims[s:i] . '\<C-R>\"' . s:right_delims[s:i] . '\<Esc>:call <SID>RestoreRegister()<CR>"'
|
|
||||||
let s:i += 1
|
|
||||||
endwhile
|
|
||||||
|
|
||||||
" Wrap the selection with matching quotes, but do nothing if blockwise visual mode is active:
|
|
||||||
for quote in s:quotes
|
|
||||||
" vnoremap <buffer> <expr> \' <SID>IsBlockVisual() ? <SID>MapMsg("Message") : "s'\<C-R>\"'\<Esc>:call <SID>RestoreRegister()<CR>"
|
|
||||||
exec 'vnoremap <buffer> <expr> ' . s:visual_leader . quote . ' <SID>IsBlockVisual() ? <SID>MapMsg("' . s:VMapMsg . '") : "s' . escape(quote,'"') .'\<C-R>\"' . escape(quote,'"') . '\<Esc>:call <SID>RestoreRegister()<CR>"'
|
|
||||||
endfor
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:IsBlockVisual() " {{{1
|
|
||||||
if visualmode() == "<C-V>"
|
|
||||||
return 1
|
|
||||||
endif
|
|
||||||
" Store unnamed register values for later use in s:RestoreRegister().
|
|
||||||
let s:save_reg = getreg('"')
|
|
||||||
let s:save_reg_mode = getregtype('"')
|
|
||||||
|
|
||||||
if len(getline('.')) == 0
|
|
||||||
" This for proper wrap of empty lines.
|
|
||||||
let @" = "\n"
|
|
||||||
endif
|
|
||||||
return 0
|
|
||||||
endfunction " }}}1
|
|
||||||
|
|
||||||
function! s:RestoreRegister() " {{{1
|
|
||||||
" Restore unnamed register values store in s:IsBlockVisual().
|
|
||||||
call setreg('"', s:save_reg, s:save_reg_mode)
|
|
||||||
echo ""
|
|
||||||
endfunction " }}}1
|
|
||||||
|
|
||||||
function! s:ExpandReturn() "{{{1
|
|
||||||
if s:WithinEmptyPair()
|
|
||||||
" Expand:
|
|
||||||
return s:expand_return
|
|
||||||
else
|
|
||||||
" Don't
|
|
||||||
return "\<CR>"
|
|
||||||
endif
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:ExpandSpace() "{{{1
|
|
||||||
if s:WithinEmptyPair()
|
|
||||||
" Expand:
|
|
||||||
return s:expand_space
|
|
||||||
else
|
|
||||||
" Don't
|
|
||||||
return "\<Space>"
|
|
||||||
endif
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:ExtraMappings() "{{{1
|
|
||||||
" If pair is empty, delete both delimiters:
|
|
||||||
inoremap <buffer> <expr> <BS> <SID>WithinEmptyPair() ? "\<Right>\<BS>\<BS>" : "\<BS>"
|
|
||||||
|
|
||||||
" Expand return if inside an empty pair:
|
|
||||||
if exists("b:delimitMate_expand_cr") || exists("g:delimitMate_expand_cr")
|
|
||||||
inoremap <buffer> <CR> <C-R>=<SID>ExpandReturn()<CR>
|
|
||||||
endif
|
|
||||||
|
|
||||||
" Expand space if inside an empty pair:
|
|
||||||
if exists("b:delimitMate_expand_space") || exists("g:delimitMate_expand_space")
|
|
||||||
inoremap <buffer> <Space> <C-R>=<SID>ExpandSpace()<CR>
|
|
||||||
endif
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:TestMappings() "{{{1
|
|
||||||
if s:autoclose
|
|
||||||
exec "normal i* AUTOCLOSE:\<CR>"
|
|
||||||
for i in range(len(s:left_delims))
|
|
||||||
exec "normal GGAOpen & close: " . s:left_delims[i]. "|"
|
|
||||||
exec "normal A\<CR>Delete: " . s:left_delims[i] . "\<BS>|"
|
|
||||||
exec "normal A\<CR>Exit: " . s:left_delims[i] . s:right_delims[i] . "|"
|
|
||||||
exec "normal A\<CR>Space: " . s:left_delims[i] . " |"
|
|
||||||
exec "normal GGA\<CR>Visual-L: v\<Esc>v" . s:visual_leader . s:left_delims[i]
|
|
||||||
exec "normal A\<CR>Visual-R: v\<Esc>v" . s:visual_leader . s:right_delims[i]
|
|
||||||
exec "normal A\<CR>Car return: " . s:left_delims[i] . "\<CR>|\<Esc>GGA\<CR>\<CR>"
|
|
||||||
endfor
|
|
||||||
for i in range(len(s:quotes))
|
|
||||||
exec "normal GGAOpen & close: " . s:quotes[i] . "|"
|
|
||||||
exec "normal A\<CR>Delete: " . s:quotes[i] . "\<BS>|"
|
|
||||||
exec "normal A\<CR>Exit: " . s:quotes[i] . s:quotes[i] . "|"
|
|
||||||
exec "normal A\<CR>Space: " . s:quotes[i] . " |"
|
|
||||||
exec "normal GGA\<CR>Visual: v\<Esc>v" . s:visual_leader . s:quotes[i]
|
|
||||||
exec "normal A\<CR>Car return: " . s:quotes[i] . "\<CR>|\<Esc>GGA\<CR>\<CR>"
|
|
||||||
endfor
|
|
||||||
else
|
|
||||||
exec "normal i* NO AUTOCLOSE:\<CR>"
|
|
||||||
for i in range(len(s:left_delims))
|
|
||||||
exec "normal GGAOpen & close: " . s:left_delims[i] . s:right_delims[i] . "|"
|
|
||||||
exec "normal A\<CR>Delete: " . s:left_delims[i] . s:right_delims[i] . "\<BS>|"
|
|
||||||
exec "normal A\<CR>Exit: " . s:left_delims[i] . s:right_delims[i] . s:right_delims[i] . "|"
|
|
||||||
exec "normal A\<CR>Space: " . s:left_delims[i] . s:right_delims[i] . " |"
|
|
||||||
exec "normal GGA\<CR>Visual-L: v\<Esc>v" . s:visual_leader . s:left_delims[i]
|
|
||||||
exec "normal A\<CR>Visual-R: v\<Esc>v" . s:visual_leader . s:right_delims[i]
|
|
||||||
exec "normal A\<CR>Car return: " . s:left_delims[i] . s:right_delims[i] . "\<CR>|\<Esc>GGA\<CR>\<CR>"
|
|
||||||
endfor
|
|
||||||
for i in range(len(s:quotes))
|
|
||||||
exec "normal GGAOpen & close: " . s:quotes[i] . s:quotes[i] . "|"
|
|
||||||
exec "normal A\<CR>Delete: " . s:quotes[i] . s:quotes[i] . "\<BS>|"
|
|
||||||
exec "normal A\<CR>Exit: " . s:quotes[i] . s:quotes[i] . s:quotes[i] . "|"
|
|
||||||
exec "normal A\<CR>Space: " . s:quotes[i] . s:quotes[i] . " |"
|
|
||||||
exec "normal GGA\<CR>Visual: v\<Esc>v" . s:visual_leader . s:quotes[i]
|
|
||||||
exec "normal A\<CR>Car return: " . s:quotes[i] . s:quotes[i] . "\<CR>|\<Esc>GGA\<CR>\<CR>"
|
|
||||||
endfor
|
|
||||||
endif
|
|
||||||
exec "normal \<Esc>i"
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:SwitchAutoclose() "{{{1
|
|
||||||
if !exists("g:delimitMate_autoclose")
|
|
||||||
let g:delimitMate_autoclose = 1
|
|
||||||
elseif g:delimitMate_autoclose == 1
|
|
||||||
let g:delimitMate_autoclose = 0
|
|
||||||
else
|
|
||||||
let g:delimitMate_autoclose = 1
|
|
||||||
endif
|
|
||||||
DelimitMateReload
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:UnMap() " {{{
|
|
||||||
" No Autoclose Mappings:
|
|
||||||
for char in s:right_delims + s:quotes
|
|
||||||
if maparg(char,"i") =~? 'SkipDelim'
|
|
||||||
exec 'iunmap <buffer> ' . char
|
|
||||||
"echomsg 'iunmap <buffer> ' . char
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
|
|
||||||
" Autoclose Mappings:
|
|
||||||
let s:i = 0
|
|
||||||
while s:i < len(s:matchpairs)
|
|
||||||
if maparg(s:left_delims[s:i],"i") =~? s:left_delims[s:i] . s:right_delims[s:i] . '<Left>'
|
|
||||||
exec 'iunmap <buffer> ' . s:left_delims[s:i]
|
|
||||||
"echomsg 'iunmap <buffer> ' . s:left_delims[s:i]
|
|
||||||
endif
|
|
||||||
let s:i += 1
|
|
||||||
endwhile
|
|
||||||
for char in s:quotes
|
|
||||||
if maparg(char, "i") =~? 'QuoteDelim'
|
|
||||||
exec 'iunmap <buffer> ' . char
|
|
||||||
"echomsg 'iunmap <buffer> ' . char
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
for char in s:right_delims
|
|
||||||
if maparg(char, "i") =~? 'ClosePair'
|
|
||||||
exec 'iunmap <buffer> ' . char
|
|
||||||
"echomsg 'iunmap <buffer> ' . char
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
for map in s:apostrophes
|
|
||||||
exec "silent! iunmap <buffer> " . map
|
|
||||||
endfor
|
|
||||||
|
|
||||||
" Visual Mappings:
|
|
||||||
for char in s:right_delims + s:left_delims + s:quotes
|
|
||||||
if maparg(s:visual_leader . char,"v") =~? 'IsBlock'
|
|
||||||
exec 'vunmap <buffer> ' . s:visual_leader . char
|
|
||||||
"echomsg 'vunmap <buffer> ' . s:visual_leader . char
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
|
|
||||||
" Expansion Mappings:
|
|
||||||
if maparg('<BS>', "i") =~? 'WithinEmptyPair'
|
|
||||||
iunmap <buffer> <BS>
|
|
||||||
"echomsg "iunmap <buffer> <BS>"
|
|
||||||
endif
|
|
||||||
if maparg('<CR>',"i") =~? 'ExpandReturn'
|
|
||||||
iunmap <buffer> <CR>
|
|
||||||
"echomsg "iunmap <buffer> <CR>"
|
|
||||||
endif
|
|
||||||
if maparg('<Space>',"i") =~? 'ExpandSpace'
|
|
||||||
iunmap <buffer> <Space>
|
|
||||||
"echomsg "iunmap <buffer> <Space>"
|
|
||||||
endif
|
|
||||||
|
|
||||||
endfunction " }}}
|
|
||||||
|
|
||||||
function! s:TestMappingsDo() "{{{1
|
|
||||||
if !exists("g:delimitMate_testing")
|
|
||||||
call s:DelimitMateDo()
|
|
||||||
call s:TestMappings()
|
|
||||||
else
|
|
||||||
call s:SwitchAutoclose()
|
|
||||||
call s:TestMappings()
|
|
||||||
exec "normal i\<CR>"
|
|
||||||
call s:SwitchAutoclose()
|
|
||||||
call s:TestMappings()
|
|
||||||
endif
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
function! s:DelimitMateDo() "{{{1
|
|
||||||
if exists("g:delimitMate_excluded_ft")
|
|
||||||
" Check if this file type is excluded:
|
|
||||||
for ft in split(g:delimitMate_excluded_ft,',')
|
|
||||||
if ft ==? &filetype
|
|
||||||
if !exists("s:quotes")
|
|
||||||
return 1
|
|
||||||
endif
|
|
||||||
"echomsg "excluded"
|
|
||||||
call s:UnMap()
|
|
||||||
return 1
|
|
||||||
endif
|
|
||||||
endfor
|
|
||||||
endif
|
|
||||||
try
|
|
||||||
"echomsg "included"
|
|
||||||
let save_cpo = &cpo
|
|
||||||
set cpo&vim
|
|
||||||
call s:Init()
|
|
||||||
finally
|
|
||||||
let &cpo = save_cpo
|
|
||||||
endtry
|
|
||||||
endfunction "}}}1
|
|
||||||
|
|
||||||
" Set some commands: {{{1
|
|
||||||
call s:DelimitMateDo()
|
|
||||||
|
|
||||||
" Let me refresh without re-loading the buffer:
|
|
||||||
command! DelimitMateReload call s:DelimitMateDo()
|
|
||||||
|
|
||||||
" Quick test:
|
|
||||||
command! DelimitMateTest call s:TestMappingsDo()
|
|
||||||
|
|
||||||
" Run on file type events.
|
|
||||||
"autocmd VimEnter * autocmd FileType * call <SID>DelimitMateDo()
|
|
||||||
autocmd FileType * call <SID>DelimitMateDo()
|
|
||||||
|
|
||||||
" Run on new buffers.
|
|
||||||
autocmd BufNewFile,BufRead,BufEnter * if !exists("b:loaded_delimitMate") | call <SID>DelimitMateDo() | endif
|
|
||||||
|
|
||||||
"function! s:GetSynRegion () | echo synIDattr(synIDtrans(synID(line('.'), col('.'), 1)), 'name') | endfunction
|
|
||||||
|
|
||||||
" GetLatestVimScripts: 2754 1 :AutoInstall: delimitMate.vim
|
|
||||||
" vim:foldmethod=marker:foldcolumn=2
|
|
||||||
943
doc/delimitMate.txt
Normal file
943
doc/delimitMate.txt
Normal file
@@ -0,0 +1,943 @@
|
|||||||
|
*delimitMate.txt* Trying to keep those beasts at bay! v2.7 *delimitMate*
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
MMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM
|
||||||
|
MMMM MMMMMMMMM MMMMMMMMMMMMMMMMMMMMMMMMMM MMMMM MMMMMMMMMMMMMMMMMMMMM ~
|
||||||
|
MMMM MMMMMMMMM MMMMMMMMMMMMMMMMMMMMMMMMMM MMM MMMMMMMMMMMMMMMMMMMMM
|
||||||
|
MMMM MMMMMMMMM MMMMMMMMMMMMMMMMMMMMM MMM M M MMMMMMMMMM MMMMMMMMM ~
|
||||||
|
MMMM MMM MMM MM MM M M MMM MM MM MM MM MMM MMM MMM MM
|
||||||
|
MM MM M MM MMMMMM MMMMMMM MMM MMMMM MM M MMM MMM M M ~
|
||||||
|
M M MM MM MM MM M M MM MMM MMM MMMMM MMMMM MMM MMM M
|
||||||
|
M M MM MMMMM MM MM M M MM MMM MMM MMMMM MMM MMM MMM MMMM ~
|
||||||
|
M M MM M MM MM MM M M MM MMM MMM MMMMM MM M MMM MMM M M
|
||||||
|
MM MMM MMM MM MM M M MM MMM MM MMMMM MMM MMM MMM MM ~
|
||||||
|
MMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
0.- CONTENTS *delimitMate-contents*
|
||||||
|
|
||||||
|
1. Introduction____________________________|delimitMateIntro|
|
||||||
|
2. Customization___________________________|delimitMateOptions|
|
||||||
|
2.1 Options summary____________________|delimitMateOptionSummary|
|
||||||
|
2.2 Options details____________________|delimitMateOptionDetails|
|
||||||
|
3. Functionality___________________________|delimitMateFunctionality|
|
||||||
|
3.1 Automatic closing & exiting________|delimitMateAutoClose|
|
||||||
|
3.2 Expansion of space and CR__________|delimitMateExpansion|
|
||||||
|
3.3 Backspace__________________________|delimitMateBackspace|
|
||||||
|
3.4 Smart Quotes_______________________|delimitMateSmartQuotes|
|
||||||
|
3.5 Balancing matching pairs___________|delimitMateBalance|
|
||||||
|
3.6 FileType based configuration_______|delimitMateFileType|
|
||||||
|
3.7 Syntax awareness___________________|delimitMateSyntax|
|
||||||
|
4. Commands________________________________|delimitMateCommands|
|
||||||
|
5. Mappings________________________________|delimitMateMappings|
|
||||||
|
6. Functions_______________________________|delimitMateFunctions|
|
||||||
|
7. Autocommands____________________________|delimitMateAutocmds|
|
||||||
|
8. TODO list_______________________________|delimitMateTodo|
|
||||||
|
9. Maintainer______________________________|delimitMateMaintainer|
|
||||||
|
10. Credits_________________________________|delimitMateCredits|
|
||||||
|
11. History_________________________________|delimitMateHistory|
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
1.- INTRODUCTION *delimitMateIntro*
|
||||||
|
|
||||||
|
This plug-in provides automatic closing of quotes, parenthesis, brackets,
|
||||||
|
etc.; besides some other related features that should make your time in insert
|
||||||
|
mode a little bit easier.
|
||||||
|
|
||||||
|
Most of the features can be modified or disabled permanently, using global
|
||||||
|
variables, or on a FileType basis, using autocommands.
|
||||||
|
|
||||||
|
NOTE 1: If you have any trouble with this plugin, please run |:DelimitMateTest|
|
||||||
|
in a new buffer to see what is not working.
|
||||||
|
|
||||||
|
NOTE 2: Abbreviations set with |:iabbrev| will not be expanded by delimiters
|
||||||
|
used on delimitMate, you should use <C-]> (read |i_CTRL-]|) to expand them on
|
||||||
|
the go.
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
2. CUSTOMIZATION *delimitMateOptions*
|
||||||
|
|
||||||
|
You can create your own mappings for some features using the global functions.
|
||||||
|
Read |delimitMateFunctions| for more info.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
2.1 OPTIONS SUMMARY *delimitMateOptionSummary*
|
||||||
|
|
||||||
|
The behaviour of this script can be customized setting the following options
|
||||||
|
in your vimrc file. You can use local options to set the configuration for
|
||||||
|
specific file types, see |delimitMateOptionDetails| for examples.
|
||||||
|
|
||||||
|
|'loaded_delimitMate'| Turns off the script.
|
||||||
|
|
||||||
|
|'delimitMate_autoclose'| Tells delimitMate whether to automagically
|
||||||
|
insert the closing delimiter.
|
||||||
|
|
||||||
|
|'delimitMate_matchpairs'| Tells delimitMate which characters are
|
||||||
|
matching pairs.
|
||||||
|
|
||||||
|
|'delimitMate_quotes'| Tells delimitMate which quotes should be
|
||||||
|
used.
|
||||||
|
|
||||||
|
|'delimitMate_nesting_quotes'| Tells delimitMate which quotes should be
|
||||||
|
allowed to be nested.
|
||||||
|
|
||||||
|
|'delimitMate_expand_cr'| Turns on/off the expansion of <CR>.
|
||||||
|
|
||||||
|
|'delimitMate_expand_space'| Turns on/off the expansion of <Space>.
|
||||||
|
|
||||||
|
|'delimitMate_jump_expansion'| Turns on/off jumping over expansions.
|
||||||
|
|
||||||
|
|'delimitMate_smart_quotes'| Turns on/off the "smart quotes" feature.
|
||||||
|
|
||||||
|
|'delimitMate_smart_matchpairs'| Turns on/off the "smart matchpairs" feature.
|
||||||
|
|
||||||
|
|'delimitMate_balance_matchpairs'|Turns on/off the "balance matching pairs"
|
||||||
|
feature.
|
||||||
|
|
||||||
|
|'delimitMate_excluded_regions'| Turns off the script for the given regions or
|
||||||
|
syntax group names.
|
||||||
|
|
||||||
|
|'delimitMate_excluded_ft'| Turns off the script for the given file types.
|
||||||
|
|
||||||
|
|'delimitMate_eol_marker'| Determines what to insert after the closing
|
||||||
|
matchpair when typing an opening matchpair on
|
||||||
|
the end of the line.
|
||||||
|
|
||||||
|
|'delimitMate_apostrophes'| Tells delimitMate how it should "fix"
|
||||||
|
balancing of single quotes when used as
|
||||||
|
apostrophes. NOTE: Not needed any more, kept
|
||||||
|
for compatibility with older versions.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
2.2 OPTIONS DETAILS *delimitMateOptionDetails*
|
||||||
|
|
||||||
|
Add the shown lines to your vimrc file in order to set the below options.
|
||||||
|
Buffer variables take precedence over global ones and can be used along with
|
||||||
|
autocmd to modify delimitMate's behavior for specific file types, read more in
|
||||||
|
|delimitMateFileType|.
|
||||||
|
|
||||||
|
Note: Use buffer variables only to set options for specific file types using
|
||||||
|
:autocmd, use global variables to set options for all buffers. Read more in
|
||||||
|
|g:var| and |b:var|.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'loaded_delimitMate'*
|
||||||
|
*'b:loaded_delimitMate'*
|
||||||
|
This option prevents delimitMate from loading.
|
||||||
|
e.g.: >
|
||||||
|
let loaded_delimitMate = 1
|
||||||
|
au FileType mail let b:loaded_delimitMate = 1
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_offByDefault'*
|
||||||
|
Values: 0 or 1.~
|
||||||
|
Default: 0~
|
||||||
|
|
||||||
|
If this option is set to 1, delimitMate will load, but will not take
|
||||||
|
effect in any buffer unless |:DelimitMateSwitch| is called in that
|
||||||
|
buffer.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_autoclose'*
|
||||||
|
*'b:delimitMate_autoclose'*
|
||||||
|
Values: 0 or 1. ~
|
||||||
|
Default: 1 ~
|
||||||
|
|
||||||
|
If this option is set to 0, delimitMate will not add a closing delimiter
|
||||||
|
automagically. See |delimitMateAutoClose| for details.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_autoclose = 0
|
||||||
|
au FileType mail let b:delimitMate_autoclose = 0
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_matchpairs'*
|
||||||
|
*'b:delimitMate_matchpairs'*
|
||||||
|
Values: A string with |'matchpairs'| syntax, plus support for multi-byte~
|
||||||
|
characters.~
|
||||||
|
Default: &matchpairs ~
|
||||||
|
|
||||||
|
Use this option to tell delimitMate which characters should be considered
|
||||||
|
matching pairs. Read |delimitMateAutoClose| for details.
|
||||||
|
e.g: >
|
||||||
|
let delimitMate_matchpairs = "(:),[:],{:},<:>"
|
||||||
|
au FileType vim,html let b:delimitMate_matchpairs = "(:),[:],{:},<:>"
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_quotes'*
|
||||||
|
*'b:delimitMate_quotes'*
|
||||||
|
Values: A string of characters separated by spaces. ~
|
||||||
|
Default: "\" ' `" ~
|
||||||
|
|
||||||
|
Use this option to tell delimitMate which characters should be considered as
|
||||||
|
quotes. Read |delimitMateAutoClose| for details.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_quotes = "\" ' ` *"
|
||||||
|
au FileType html let b:delimitMate_quotes = "\" '"
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_nesting_quotes'*
|
||||||
|
*'b:delimitMate_nesting_quotes'*
|
||||||
|
Values: A list of quotes. ~
|
||||||
|
Default: [] ~
|
||||||
|
|
||||||
|
When adding a third quote listed in this option is inserted, three quotes will
|
||||||
|
be inserted to the right of the cursor and the cursor will stay in the middle.
|
||||||
|
If more quotes are inserted the number of quotes on both sides of the cursor
|
||||||
|
will stay balanced.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_nesting_quotes = ['"','`']
|
||||||
|
au FileType python let b:delimitMate_nesting_quotes = ['"']
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_expand_cr'*
|
||||||
|
*'b:delimitMate_expand_cr'*
|
||||||
|
Values: 0, 1 or 2 ~
|
||||||
|
Default: 0 ~
|
||||||
|
|
||||||
|
This option turns on/off the expansion of <CR>. Read |delimitMateExpansion|
|
||||||
|
for details. NOTE This feature requires that 'backspace' is either set to 2 or
|
||||||
|
has "eol" and "start" as part of its value.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_expand_cr = 1
|
||||||
|
au FileType mail let b:delimitMate_expand_cr = 1
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_expand_space'*
|
||||||
|
*'b:delimitMate_expand_space'*
|
||||||
|
Values: 1 or 0 ~
|
||||||
|
Default: 0 ~
|
||||||
|
This option turns on/off the expansion of <Space>. Read |delimitMateExpansion|
|
||||||
|
for details.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_expand_space = 1
|
||||||
|
au FileType tcl let b:delimitMate_expand_space = 1
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_expand_inside_quotes'*
|
||||||
|
*'b:delimitMate_expand_inside_quotes'*
|
||||||
|
Values: 1 or 0 ~
|
||||||
|
Default: 0 ~
|
||||||
|
When this option is set to 1 the expansion of space and cr will also be
|
||||||
|
applied to quotes. Read |delimitMateExpansion| for details.
|
||||||
|
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_expand_inside_quotes = 1
|
||||||
|
au FileType mail let b:delimitMate_expand_inside_quotes = 1
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_jump_expansion'*
|
||||||
|
*'b:delimitMate_jump_expansion'*
|
||||||
|
Values: 1 or 0 ~
|
||||||
|
Default: 0 ~
|
||||||
|
This option turns on/off the jumping over <CR> and <Space> expansions when
|
||||||
|
inserting closing matchpairs. Read |delimitMateExpansion| for details.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_jump_expansion = 1
|
||||||
|
au FileType tcl let b:delimitMate_jump_expansion = 1
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_smart_quotes'*
|
||||||
|
*'b:delimitMate_smart_quotes'*
|
||||||
|
Values: String with an optional ! at the beginning followed by a regexp ~
|
||||||
|
Default:~
|
||||||
|
'\%(\w\|[^[:punct:][:space:]]\|\%(\\\\\)*\\\)\%#\|\%#\%(\w\|[^[:space:][:punct:]]\)' ~
|
||||||
|
|
||||||
|
A bang (!) at the beginning is removed and used to "negate" the pattern. The
|
||||||
|
remaining text is used as a regexp to be matched on the current line. A single
|
||||||
|
quote is inserted when the pattern matches and a bang is not present. The bang
|
||||||
|
changes that, so a single quote is inserted only if the regexp does not match.
|
||||||
|
|
||||||
|
This feature is disabled when the variable is set to an empty string, with the
|
||||||
|
exception of apostrophes.
|
||||||
|
|
||||||
|
Note that you need to use '\%#' to match the position of the cursor. Keep in
|
||||||
|
mind that '\%#' matches with zero width, so if you need to match the char
|
||||||
|
under the cursor (which would be the one to the right on insert mode) use
|
||||||
|
something like '\%#.'.
|
||||||
|
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_smart_quotes = '\w\%#'
|
||||||
|
au FileType tcl let b:delimitMate_smart_quotes = '!\s\%#\w'
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_smart_matchpairs'*
|
||||||
|
*'b:delimitMate_smart_matchpairs'*
|
||||||
|
Values: Regexp ~
|
||||||
|
Default: '^\%(\w\|\!\|[£$]\|[^[:space:][:punct:]]\)' ~
|
||||||
|
|
||||||
|
This regex is matched against the text to the right of cursor, if it's not
|
||||||
|
empty and there is a match delimitMate will not autoclose the pair. At the
|
||||||
|
moment to match the text, an escaped bang (\!) in the regex will be replaced
|
||||||
|
by the character being inserted, while an escaped number symbol (\#) will be
|
||||||
|
replaced by the closing pair.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_smart_matchpairs = ''
|
||||||
|
au FileType tcl let b:delimitMate_smart_matchpairs = '^\%(\w\|\$\)'
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_balance_matchpairs'*
|
||||||
|
*'b:delimitMate_balance_matchpairs'*
|
||||||
|
Values: 1 or 0 ~
|
||||||
|
Default: 0 ~
|
||||||
|
|
||||||
|
This option turns on/off the balancing of matching pairs. Read
|
||||||
|
|delimitMateBalance| for details.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_balance_matchpairs = 1
|
||||||
|
au FileType tcl let b:delimitMate_balance_matchpairs = 1
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_excluded_regions'*
|
||||||
|
Values: A string of syntax group names names separated by single commas. ~
|
||||||
|
Default: Comment ~
|
||||||
|
|
||||||
|
This options turns delimitMate off for the listed regions, read |group-name|
|
||||||
|
for more info about what is a region.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_excluded_regions = "Comment,String"
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_excluded_ft'*
|
||||||
|
Values: A string of file type names separated by single commas. ~
|
||||||
|
Default: Empty. ~
|
||||||
|
|
||||||
|
This options turns delimitMate off for the listed file types, use this option
|
||||||
|
only if you don't want any of the features it provides on those file types.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_excluded_ft = "mail,txt"
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_insert_eol_marker'*
|
||||||
|
Values: Integer ~
|
||||||
|
Default: 1 ~
|
||||||
|
|
||||||
|
Whether to insert the eol marker (EM) or not. The EM is inserted following
|
||||||
|
rules:
|
||||||
|
|
||||||
|
0 -> never
|
||||||
|
1 -> when inserting any matchpair
|
||||||
|
2 -> when expanding car return in matchpair
|
||||||
|
|
||||||
|
e.g.: >
|
||||||
|
au FileType c,perl let b:delimitMate_insert_eol_marker = 2
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_eol_marker'*
|
||||||
|
Values: String. ~
|
||||||
|
Default: Empty. ~
|
||||||
|
|
||||||
|
The contents of this string will be inserted after the closing matchpair or
|
||||||
|
quote when the respective opening matchpair or quote is inserted at the end
|
||||||
|
of the line.
|
||||||
|
e.g.: >
|
||||||
|
au FileType c,perl let b:delimitMate_eol_marker = ";"
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
*'delimitMate_apostrophes'*
|
||||||
|
Values: Strings separated by ":". ~
|
||||||
|
Default: No longer used. ~
|
||||||
|
|
||||||
|
NOTE: This feature is turned off by default, it's been kept for compatibility
|
||||||
|
with older version, read |delimitMateSmartQuotes| for details.
|
||||||
|
If auto-close is enabled, this option tells delimitMate how to try to fix the
|
||||||
|
balancing of single quotes when used as apostrophes. The values of this option
|
||||||
|
are strings of text where a single quote would be used as an apostrophe (e.g.:
|
||||||
|
the "n't" of wouldn't or can't) separated by ":". Set it to an empty string to
|
||||||
|
disable this feature.
|
||||||
|
e.g.: >
|
||||||
|
let delimitMate_apostrophes = ""
|
||||||
|
au FileType tcl let delimitMate_apostrophes = ""
|
||||||
|
<
|
||||||
|
==============================================================================
|
||||||
|
3. FUNCTIONALITY *delimitMateFunctionality*
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.1 AUTOMATIC CLOSING AND EXITING *delimitMateAutoClose*
|
||||||
|
|
||||||
|
With automatic closing enabled, if an opening delimiter is inserted the plugin
|
||||||
|
inserts the closing delimiter and places the cursor between the pair. With
|
||||||
|
automatic closing disabled, no closing delimiters is inserted by delimitMate,
|
||||||
|
but when a pair of delimiters is typed, the cursor is placed in the middle.
|
||||||
|
|
||||||
|
When the cursor is inside an empty pair or located next to the left of a
|
||||||
|
closing delimiter, the cursor is placed outside the pair to the right of the
|
||||||
|
closing delimiter.
|
||||||
|
|
||||||
|
When |'delimitMate_smart_matchpairs'| is not empty and it matches the text to
|
||||||
|
the right of the cursor, delimitMate will not automatically insert the closing
|
||||||
|
pair.
|
||||||
|
|
||||||
|
Unless |'delimitMate_matchpairs'| or |'delimitMate_quotes'| are set, this
|
||||||
|
script uses the values in '&matchpairs' to identify the pairs, and ", ' and `
|
||||||
|
for quotes respectively.
|
||||||
|
|
||||||
|
<S-Tab> will jump over a single closing delimiter or quote, <C-G>g will jump
|
||||||
|
over contiguous delimiters and/or quotes.
|
||||||
|
|
||||||
|
The following table shows the behaviour, this applies to quotes too (the final
|
||||||
|
position of the cursor is represented by a "|"):
|
||||||
|
|
||||||
|
With auto-close: >
|
||||||
|
Type | You get
|
||||||
|
=======================
|
||||||
|
( | (|)
|
||||||
|
–––––––––––|–––––––––––
|
||||||
|
() | ()|
|
||||||
|
–––––––––––|–––––––––––
|
||||||
|
(<S-Tab> | ()|
|
||||||
|
–––––––––––|–––––––––––
|
||||||
|
{("<C-G>g | {("")}|
|
||||||
|
<
|
||||||
|
Without auto-close: >
|
||||||
|
|
||||||
|
Type | You get
|
||||||
|
=========================
|
||||||
|
() | (|)
|
||||||
|
–––––––––-----|––––––––––
|
||||||
|
()) | ()|
|
||||||
|
–––––––––-----|––––––––––
|
||||||
|
()<S-Tab> | ()|
|
||||||
|
––––––––––––––|–––––––––––
|
||||||
|
{}()""<C-G>g | {("")}|
|
||||||
|
<
|
||||||
|
NOTE: Abbreviations will not be expanded by delimiters used on delimitMate,
|
||||||
|
you should use <C-]> (read |i_CTRL-]|) to expand them on the go.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.2 EXPANSION OF SPACE AND CAR RETURN *delimitMateExpansion*
|
||||||
|
|
||||||
|
When the cursor is inside an empty pair of any matchpair, <Space> and <CR> can be
|
||||||
|
expanded, see |'delimitMate_expand_space'| and
|
||||||
|
|'delimitMate_expand_cr'|:
|
||||||
|
|
||||||
|
Expand <Space> to: >
|
||||||
|
|
||||||
|
You start with | You get
|
||||||
|
==============================
|
||||||
|
(|) | ( | )
|
||||||
|
<
|
||||||
|
Expand <CR> to: >
|
||||||
|
|
||||||
|
You start with | You get
|
||||||
|
==============================
|
||||||
|
(|) | (
|
||||||
|
| |
|
||||||
|
| )
|
||||||
|
<
|
||||||
|
|
||||||
|
When you have |'delimitMate_jump_expansion'| enabled, if there is an existing
|
||||||
|
closing paren/bracket/etc. on the next line, delimitMate will make the cursor
|
||||||
|
jump over any whitespace/<CR> and place it after the existing closing
|
||||||
|
delimiter instead of inserting a new one.
|
||||||
|
|
||||||
|
When |'delimitMate_expand_cr'| is set to 2, the following will also happen: >
|
||||||
|
|
||||||
|
You start with | You get
|
||||||
|
==============================
|
||||||
|
(foo|) | (foo
|
||||||
|
| |
|
||||||
|
| )
|
||||||
|
<
|
||||||
|
|
||||||
|
Since <Space> and <CR> are used everywhere, I have made the functions involved
|
||||||
|
in expansions global, so they can be used to make custom mappings. Read
|
||||||
|
|delimitMateFunctions| for more details.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.3 BACKSPACE *delimitMateBackspace*
|
||||||
|
|
||||||
|
If you press backspace inside an empty pair, both delimiters are deleted. When
|
||||||
|
expansions are enabled, <BS> will also delete the expansions.
|
||||||
|
|
||||||
|
If you type <S-BS> (shift + backspace) instead, only the closing delimiter
|
||||||
|
will be deleted. NOTE that this will not usually work when using Vim from the
|
||||||
|
terminal, see 'delimitMate#JumpAny()' below to see how to fix it.
|
||||||
|
|
||||||
|
e.g. typing at the "|": >
|
||||||
|
|
||||||
|
What | Before | After
|
||||||
|
==============================================
|
||||||
|
<BS> | call expand(|) | call expand|
|
||||||
|
---------|-------------------|-----------------
|
||||||
|
<BS> | call expand( | ) | call expand(|)
|
||||||
|
---------|-------------------|-----------------
|
||||||
|
<BS> | call expand( | call expand(|)
|
||||||
|
| | |
|
||||||
|
| ) |
|
||||||
|
---------|-------------------|-----------------
|
||||||
|
<S-BS> | call expand(|) | call expand(|
|
||||||
|
<
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.4 SMART QUOTES *delimitMateSmartQuotes*
|
||||||
|
|
||||||
|
Only one quote will be inserted following a quote, a "\", following or
|
||||||
|
preceding a keyword character, or when the number of quotes in the current
|
||||||
|
line is odd. This should cover closing quotes after a string, opening quotes
|
||||||
|
before a string, escaped quotes and apostrophes. See more details about
|
||||||
|
customizing this feature on |'delimitMate_smart_quotes'|.
|
||||||
|
|
||||||
|
e.g. typing at the "|": >
|
||||||
|
|
||||||
|
What | Before | After
|
||||||
|
=======================================
|
||||||
|
" | Text | | Text "|"
|
||||||
|
" | "String| | "String"|
|
||||||
|
" | let i = "| | let i = "|"
|
||||||
|
'm | I| | I'm|
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.4 SMART MATCHPAIRS *delimitMateSmartMatchpairs*
|
||||||
|
|
||||||
|
This is similar to "smart quotes", but applied to the characters in
|
||||||
|
|'delimitMate_matchpairs'|. The difference is that delimitMate will not
|
||||||
|
auto-close the pair when the regex matches the text on the right of the
|
||||||
|
cursor. See |'delimitMate_smart_matchpairs'| for more details.
|
||||||
|
|
||||||
|
|
||||||
|
e.g. typing at the "|": >
|
||||||
|
|
||||||
|
What | Before | After
|
||||||
|
=======================================
|
||||||
|
( | function| | function(|)
|
||||||
|
( | |var | (|var
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.5 BALANCING MATCHING PAIRS *delimitMateBalance*
|
||||||
|
|
||||||
|
When inserting an opening paren and |'delimitMate_balance_matchpairs'| is
|
||||||
|
enabled, delimitMate will try to balance the closing pairs in the current
|
||||||
|
line.
|
||||||
|
|
||||||
|
e.g. typing at the "|": >
|
||||||
|
|
||||||
|
What | Before | After
|
||||||
|
=======================================
|
||||||
|
( | | | (|)
|
||||||
|
( | |) | (|)
|
||||||
|
(( | |) | ((|))
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.6 FILE TYPE BASED CONFIGURATION *delimitMateFileType*
|
||||||
|
|
||||||
|
delimitMate options can be set globally for all buffers using global
|
||||||
|
("regular") variables in your |vimrc| file. But |:autocmd| can be used to set
|
||||||
|
options for specific file types (see |'filetype'|) using buffer variables in
|
||||||
|
the following way: >
|
||||||
|
|
||||||
|
au FileType mail,text let b:delimitMate_autoclose = 0
|
||||||
|
^ ^ ^ ^ ^
|
||||||
|
| | | | |
|
||||||
|
| | | | - Option value.
|
||||||
|
| | | - Option name.
|
||||||
|
| | - Buffer variable.
|
||||||
|
| - File types for which the option will be set.
|
||||||
|
- Don't forget to put this event.
|
||||||
|
<
|
||||||
|
NOTE that you should use buffer variables (|b:var|) only to set options with
|
||||||
|
|:autocmd|, for global options use regular variables (|g:var|) in your vimrc.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
3.7 SYNTAX AWARENESS *delimitMateSyntax*
|
||||||
|
|
||||||
|
The features of this plug-in might not be always helpful, comments and strings
|
||||||
|
usualy don't need auto-completion. delimitMate monitors which region is being
|
||||||
|
edited and if it detects that the cursor is in a comment it'll turn itself off
|
||||||
|
until the cursor leaves the comment. The excluded regions can be set using the
|
||||||
|
option |'delimitMate_excluded_regions'|. Read |group-name| for a list of
|
||||||
|
regions or syntax group names.
|
||||||
|
|
||||||
|
NOTE that this feature relies on a proper syntax file for the current file
|
||||||
|
type, if the appropiate syntax file doesn't define a region, delimitMate won't
|
||||||
|
know about it.
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
4. COMMANDS *delimitMateCommands*
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
:DelimitMateReload *:DelimitMateReload*
|
||||||
|
|
||||||
|
Re-sets all the mappings used for this script, use it if any option has been
|
||||||
|
changed or if the filetype option hasn't been set yet.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
:DelimitMateOn *:DelimitMateOn*
|
||||||
|
|
||||||
|
Enable delimitMate mappings.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
:DelimitMateOff *:DelimitMateOff*
|
||||||
|
|
||||||
|
Disable delimitMate mappings.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
:DelimitMateSwitch *:DelimitMateSwitch*
|
||||||
|
|
||||||
|
Switches the plug-in on and off.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
:DelimitMateTest *:DelimitMateTest*
|
||||||
|
|
||||||
|
This command tests every mapping set-up for this script, useful for testing
|
||||||
|
custom configurations.
|
||||||
|
|
||||||
|
The following output corresponds to the default values, it will be different
|
||||||
|
depending on your configuration. "Open & close:" represents the final result
|
||||||
|
when the closing delimiter has been inserted, either manually or
|
||||||
|
automatically, see |delimitMateExpansion|. "Delete:" typing backspace in an
|
||||||
|
empty pair, see |delimitMateBackspace|. "Exit:" typing a closing delimiter
|
||||||
|
inside a pair of delimiters, see |delimitMateAutoclose|. "Space:" the
|
||||||
|
expansion, if any, of space, see |delimitMateExpansion|. "Visual-L",
|
||||||
|
"Visual-R" and "Visual" shows visual wrapping, see
|
||||||
|
|delimitMateVisualWrapping|. "Car return:" the expansion of car return, see
|
||||||
|
|delimitMateExpansion|. The cursor's position at the end of every test is
|
||||||
|
represented by an "|": >
|
||||||
|
|
||||||
|
* AUTOCLOSE:
|
||||||
|
Open & close: (|)
|
||||||
|
Delete: |
|
||||||
|
Exit: ()|
|
||||||
|
Space: ( |)
|
||||||
|
Visual-L: (v)
|
||||||
|
Visual-R: (v)
|
||||||
|
Car return: (
|
||||||
|
|)
|
||||||
|
|
||||||
|
Open & close: {|}
|
||||||
|
Delete: |
|
||||||
|
Exit: {}|
|
||||||
|
Space: { |}
|
||||||
|
Visual-L: {v}
|
||||||
|
Visual-R: {v}
|
||||||
|
Car return: {
|
||||||
|
|}
|
||||||
|
|
||||||
|
Open & close: [|]
|
||||||
|
Delete: |
|
||||||
|
Exit: []|
|
||||||
|
Space: [ |]
|
||||||
|
Visual-L: [v]
|
||||||
|
Visual-R: [v]
|
||||||
|
Car return: [
|
||||||
|
|]
|
||||||
|
|
||||||
|
Open & close: "|"
|
||||||
|
Delete: |
|
||||||
|
Exit: ""|
|
||||||
|
Space: " |"
|
||||||
|
Visual: "v"
|
||||||
|
Car return: "
|
||||||
|
|"
|
||||||
|
|
||||||
|
Open & close: '|'
|
||||||
|
Delete: |
|
||||||
|
Exit: ''|
|
||||||
|
Space: ' |'
|
||||||
|
Visual: 'v'
|
||||||
|
Car return: '
|
||||||
|
|'
|
||||||
|
|
||||||
|
Open & close: `|`
|
||||||
|
Delete: |
|
||||||
|
Exit: ``|
|
||||||
|
Space: ` |`
|
||||||
|
Visual: `v`
|
||||||
|
Car return: `
|
||||||
|
|`
|
||||||
|
<
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
5. MAPPINGS *delimitMateMappings*
|
||||||
|
|
||||||
|
delimitMate doesn't override any existing map, so you may encounter that it
|
||||||
|
doesn't work as expected because a mapping is missing. In that case, the
|
||||||
|
conflicting mappings should be resolved by either disabling the conflicting
|
||||||
|
mapping or creating a custom mappings.
|
||||||
|
|
||||||
|
In order to make custom mappings easier and prevent overwritting existing
|
||||||
|
ones, delimitMate uses the |<Plug>| + |hasmapto()| (|usr_41.txt|) construct
|
||||||
|
for its mappings.
|
||||||
|
|
||||||
|
These are the default mappings for the extra features:
|
||||||
|
|
||||||
|
<BS> is mapped to <Plug>delimitMateBS
|
||||||
|
<S-BS> is mapped to <Plug>delimitMateS-BS
|
||||||
|
<S-Tab> is mapped to <Plug>delimitMateS-Tab
|
||||||
|
<C-G>g is mapped to <Plug>delimitMateJumpMany
|
||||||
|
|
||||||
|
The rest of the mappings correspond to parens, quotes, CR, Space, etc. and they
|
||||||
|
depend on the values of the delimitMate options, they have the following form:
|
||||||
|
|
||||||
|
<Plug>delimitMate + char
|
||||||
|
|
||||||
|
e.g.: for "(":
|
||||||
|
|
||||||
|
( is mapped to <Plug>delimitMate(
|
||||||
|
|
||||||
|
e.g.: If you have <CR> expansion enabled, you might want to skip it on pop-up
|
||||||
|
menus:
|
||||||
|
|
||||||
|
imap <expr> <CR> pumvisible()
|
||||||
|
\ ? "\<C-Y>"
|
||||||
|
\ : "<Plug>delimitMateCR"
|
||||||
|
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
6. FUNCTIONS *delimitMateFunctions*
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
delimitMate#WithinEmptyPair() *delimitMate#WithinEmptyPair()*
|
||||||
|
|
||||||
|
Returns 1 if the cursor is inside an empty pair, 0 otherwise.
|
||||||
|
e.g.: >
|
||||||
|
|
||||||
|
inoremap <expr> <CR> delimitMate#WithinEmptyPair() ?
|
||||||
|
\ "<Plug>delimitMateCR" :
|
||||||
|
\ "external_mapping"
|
||||||
|
<
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
delimitMate#ShouldJump() *delimitMate#ShouldJump()*
|
||||||
|
|
||||||
|
Returns 1 if there is a closing delimiter or a quote to the right of the
|
||||||
|
cursor, 0 otherwise.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
delimitMate#JumpAny() *delimitMate#JumpAny()*
|
||||||
|
|
||||||
|
This function returns a mapping that will make the cursor jump to the right
|
||||||
|
when delimitMate#ShouldJump() returns 1, returns the argument "key" otherwise.
|
||||||
|
e.g.: You can use this to create your own mapping to jump over any delimiter.
|
||||||
|
>
|
||||||
|
inoremap <expr> <C-Tab> delimitMate#JumpAny()
|
||||||
|
<
|
||||||
|
==============================================================================
|
||||||
|
7. AUTOCOMMANDS *delimitMateAutocmds*
|
||||||
|
|
||||||
|
delimitMate emits 2 |User| autocommands to make it easier for users to
|
||||||
|
leverage delimitMate's support for per-filetype customization.
|
||||||
|
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
delimitMate_map *delimitMate_map*
|
||||||
|
|
||||||
|
This |User| event is emittted just prior to delimitMate defining its
|
||||||
|
buffer-local key mappings. You can use this command to define your own
|
||||||
|
mappings that are disabled when delimitMate is turned off or excludes the
|
||||||
|
current filetype.
|
||||||
|
>
|
||||||
|
au User delimitMate_map call s:delimitMate_map()
|
||||||
|
function s:delimitMate_map()
|
||||||
|
imap <buffer><expr> <C-Tab> delimitMate#JumpAny()
|
||||||
|
endfunction
|
||||||
|
<
|
||||||
|
------------------------------------------------------------------------------
|
||||||
|
delimitMate_unmap *delimitMate_unmap*
|
||||||
|
|
||||||
|
This |User| event is emitted just after delimitMate clears its buffer-local
|
||||||
|
key mappings. You can use this command to clear your own mappings that you set
|
||||||
|
in response to |delimitMate_map|.
|
||||||
|
>
|
||||||
|
au User delimitMate_unmap call s:delimitMate_unmap()
|
||||||
|
function s:delimitMate_unmap()
|
||||||
|
silent! iunmap <buffer> <C-Tab>
|
||||||
|
endfunction
|
||||||
|
<
|
||||||
|
Note: This event may be emitted before |delimitMate_map|, and may be emitted
|
||||||
|
multiple times in a row without any intervening |delimitMate_map| events.
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
8. TODO LIST *delimitMateTodo*
|
||||||
|
|
||||||
|
- Automatic set-up by file type.
|
||||||
|
- Make block-wise visual wrapping work on un-even regions.
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
9. MAINTAINER *delimitMateMaintainer*
|
||||||
|
|
||||||
|
Hi there! My name is Israel Chauca F. and I can be reached at:
|
||||||
|
mailto:israelchauca@gmail.com
|
||||||
|
|
||||||
|
Feel free to send me any suggestions and/or comments about this plugin, I'll
|
||||||
|
be very pleased to read them.
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
10. CREDITS *delimitMateCredits*
|
||||||
|
|
||||||
|
Contributors: ~
|
||||||
|
|
||||||
|
- Kim Silkebækken ~
|
||||||
|
Fixed mappings being echoed in the terminal.
|
||||||
|
|
||||||
|
- Eric Van Dewoestine ~
|
||||||
|
Implemented smart matchpairs.
|
||||||
|
|
||||||
|
Some of the code that makes this script was modified or just shamelessly
|
||||||
|
copied from the following sources:
|
||||||
|
|
||||||
|
- Ian McCracken ~
|
||||||
|
Post titled: Vim, Part II: Matching Pairs:
|
||||||
|
http://concisionandconcinnity.blogspot.com/
|
||||||
|
|
||||||
|
- Aristotle Pagaltzis ~
|
||||||
|
From the comments on the previous blog post and from:
|
||||||
|
http://gist.github.com/144619
|
||||||
|
|
||||||
|
- Karl Guertin ~
|
||||||
|
AutoClose:
|
||||||
|
http://www.vim.org/scripts/script.php?script_id=1849
|
||||||
|
|
||||||
|
- Thiago Alves ~
|
||||||
|
AutoClose:
|
||||||
|
http://www.vim.org/scripts/script.php?script_id=2009
|
||||||
|
|
||||||
|
- Edoardo Vacchi ~
|
||||||
|
ClosePairs:
|
||||||
|
http://www.vim.org/scripts/script.php?script_id=2373
|
||||||
|
|
||||||
|
This script was inspired by the auto-completion of delimiters on TextMate.
|
||||||
|
|
||||||
|
==============================================================================
|
||||||
|
11. HISTORY *delimitMateHistory*
|
||||||
|
|
||||||
|
Version Date Release notes ~
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.8 2013-07-15 * Current release:
|
||||||
|
- Add :DelimitMateOn & :DelimitMateOff.
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.7 2013-07-15 * - Lots of bug fixes.
|
||||||
|
- Add delimitMate_offByDefault.
|
||||||
|
- Add delimitMate_eol_marker.
|
||||||
|
- Reduce the number of mappings.
|
||||||
|
- Stop using setline().
|
||||||
|
- Better handling of nested quotes.
|
||||||
|
- Allow a custom pattern for smart_quotes.
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.6 2011-01-14 * - Add smart_matchpairs feature.
|
||||||
|
- Add mapping to jump over contiguous delimiters.
|
||||||
|
- Fix behaviour of b:loaded_delimitMate.
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.5.1 2010-09-30 * - Remove visual wrapping. Surround.vim offers a much
|
||||||
|
better implementation.
|
||||||
|
- Minor mods to DelimitMateTest.
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.5 2010-09-22 * - Better handling of mappings.
|
||||||
|
- Add report for mappings in |:DelimitMateTest|.
|
||||||
|
- Allow the use of "|" and multi-byte characters in
|
||||||
|
|'delimitMate_quotes'| and |'delimitMate_matchpairs'|.
|
||||||
|
- Allow commands to be concatenated using |.
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.4.1 2010-07-31 * - Fix problem with <Home> and <End>.
|
||||||
|
- Add missing doc on |'delimitMate_smart_quotes'|,
|
||||||
|
|delimitMateBalance| and
|
||||||
|
|'delimitMate_balance_matchpairs'|.
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.4 2010-07-29 * - Unbalanced parens: see :help delimitMateBalance.
|
||||||
|
- Visual wrapping now works on block-wise visual
|
||||||
|
with some limitations.
|
||||||
|
- Arrow keys didn't work on terminal.
|
||||||
|
- Added option to allow nested quotes.
|
||||||
|
- Expand Smart Quotes to look for a string on the
|
||||||
|
right of the cursor.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.3.1 2010-06-06 * - Fix: an extra <Space> is inserted after <Space>
|
||||||
|
expansion.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.3 2010-06-06 * - Syntax aware: Will turn off when editing comments
|
||||||
|
or other regions, customizable.
|
||||||
|
- Changed format of most mappings.
|
||||||
|
- Fix: <CR> expansion doesn't break automatic
|
||||||
|
indentation adjustments anymore.
|
||||||
|
- Fix: Arrow keys would insert A, B, C or D instead
|
||||||
|
of moving the cursor when using Vim on a terminal.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.2 2010-05-16 * - Added command to switch the plug-in on and off.
|
||||||
|
- Fix: some problems with <Left>, <Right> and <CR>.
|
||||||
|
- Fix: A small problem when inserting a delimiter at
|
||||||
|
the beginning of the line.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.1 2010-05-10 * - Most of the functions have been moved to an
|
||||||
|
autoload script to avoid loading unnecessary ones.
|
||||||
|
- Fixed a problem with the redo command.
|
||||||
|
- Many small fixes.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
2.0 2010-04-01 * New features:
|
||||||
|
- All features are redo/undo-wise safe.
|
||||||
|
- A single quote typed after an alphanumeric
|
||||||
|
character is considered an apostrophe and one
|
||||||
|
single quote is inserted.
|
||||||
|
- A quote typed after another quote inserts a single
|
||||||
|
quote and the cursor jumps to the middle.
|
||||||
|
- <S-Tab> jumps out of any empty pair.
|
||||||
|
- <CR> and <Space> expansions are fixed, but the
|
||||||
|
functions used for it are global and can be used in
|
||||||
|
custom mappings. The previous system is still
|
||||||
|
active if you have any of the expansion options
|
||||||
|
set.
|
||||||
|
- <S-Backspace> deletes the closing delimiter.
|
||||||
|
* Fixed bug:
|
||||||
|
- s:vars were being used to store buffer options.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
1.6 2009-10-10 * Now delimitMate tries to fix the balancing of single
|
||||||
|
quotes when used as apostrophes. You can read
|
||||||
|
|delimitMate_apostrophes| for details.
|
||||||
|
Fixed an error when |b:delimitMate_expand_space|
|
||||||
|
wasn't set but |delimitMate_expand_space| wasn't.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
1.5 2009-10-05 * Fix: delimitMate should work correctly for files
|
||||||
|
passed as arguments to Vim. Thanks to Ben Beuchler
|
||||||
|
for helping to nail this bug.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
1.4 2009-09-27 * Fix: delimitMate is now enabled on new buffers even
|
||||||
|
if they don't have set the file type option or were
|
||||||
|
opened directly from the terminal.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
1.3 2009-09-24 * Now local options can be used along with autocmd
|
||||||
|
for specific file type configurations.
|
||||||
|
Fixes:
|
||||||
|
- Unnamed register content is not lost on visual
|
||||||
|
mode.
|
||||||
|
- Use noremap where appropiate.
|
||||||
|
- Wrapping a single empty line works as expected.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
1.2 2009-09-07 * Fixes:
|
||||||
|
- When inside nested empty pairs, deleting the
|
||||||
|
innermost left delimiter would delete all right
|
||||||
|
contiguous delimiters.
|
||||||
|
- When inside an empty pair, inserting a left
|
||||||
|
delimiter wouldn't insert the right one, instead
|
||||||
|
the cursor would jump to the right.
|
||||||
|
- New buffer inside the current window wouldn't
|
||||||
|
have the mappings set.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
1.1 2009-08-25 * Fixed an error that ocurred when mapleader wasn't
|
||||||
|
set and added support for GetLatestScripts
|
||||||
|
auto-detection.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
1.0 2009-08-23 * Initial upload.
|
||||||
|
|
||||||
|
|---------|------------|-----------------------------------------------------|
|
||||||
|
|
||||||
|
|
||||||
|
`\|||/´ MMM \|/ www __^__ ~
|
||||||
|
(o o) (o o) @ @ (O-O) /(o o)\\ ~
|
||||||
|
ooO_(_)_Ooo__ ooO_(_)_Ooo___oOO_(_)_OOo___oOO__(_)__OOo___oOO__(_)__OOo_____ ~
|
||||||
|
_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|____ ~
|
||||||
|
__|_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|_ ~
|
||||||
|
_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|_____|____ ~
|
||||||
|
|
||||||
|
vim:tw=78:et:ts=8:sw=2:ft=help:norl:formatoptions+=tcroqn:autoindent:
|
||||||
22
plugin/delimitMate.vim
Normal file
22
plugin/delimitMate.vim
Normal file
@@ -0,0 +1,22 @@
|
|||||||
|
if exists("g:loaded_delimitMate") || &cp || !exists('##InsertCharPre')
|
||||||
|
finish
|
||||||
|
endif
|
||||||
|
let g:loaded_delimitMate = 1
|
||||||
|
let save_cpo = &cpo
|
||||||
|
set cpo&vim
|
||||||
|
|
||||||
|
command! -bar -bang DelimitMateSwitch call delimitMate#ex_cmd(<bang>0, 'switch' )
|
||||||
|
command! -bar -bang DelimitMateOn call delimitMate#ex_cmd(<bang>0, 'enable' )
|
||||||
|
command! -bar -bang DelimitMateOff call delimitMate#ex_cmd(<bang>0, 'disable')
|
||||||
|
|
||||||
|
augroup delimitMate
|
||||||
|
au!
|
||||||
|
au InsertCharPre * call delimitMate#InsertCharPre(v:char)
|
||||||
|
au TextChangedI * call delimitMate#TextChangedI()
|
||||||
|
au InsertEnter * call delimitMate#InsertEnter()
|
||||||
|
au CursorMovedI * call delimitMate#CursorMovedI()
|
||||||
|
augroup END
|
||||||
|
|
||||||
|
let &cpo = save_cpo
|
||||||
|
" GetLatestVimScripts: 2754 1 :AutoInstall: delimitMate.vim
|
||||||
|
" vim: sw=2 et
|
||||||
14
test/Makefile
Normal file
14
test/Makefile
Normal file
@@ -0,0 +1,14 @@
|
|||||||
|
test_files := $(wildcard *.test)
|
||||||
|
|
||||||
|
.PHONY: all monitor $(test_files)
|
||||||
|
|
||||||
|
all:
|
||||||
|
time tclsh all.tcl
|
||||||
|
|
||||||
|
$(test_files):
|
||||||
|
time tclsh $@
|
||||||
|
printf "\a"
|
||||||
|
|
||||||
|
monitor:
|
||||||
|
fswatch -o ../autoload/*.vim ../plugin/*.vim *.test \
|
||||||
|
| xargs -n1 -I\{\} time tclsh all.tcl || printf "\a"
|
||||||
18
test/README.md
Normal file
18
test/README.md
Normal file
@@ -0,0 +1,18 @@
|
|||||||
|
# Automatic test setup
|
||||||
|
You can use `make` (or `make test` from the top level directory) to run the
|
||||||
|
tests.
|
||||||
|
|
||||||
|
# Manual test setup instructions
|
||||||
|
The plugins [runVimTests](http://www.vim.org/scripts/script.php?script_id=2565)
|
||||||
|
and [VimTAP](http://www.vim.org/scripts/script.php?script_id=2213) are needed
|
||||||
|
to run these tests.
|
||||||
|
|
||||||
|
Besides the `_setup.vim` configuration file present in this repo you need to
|
||||||
|
create a global one and place it in the same dir where the runVimTests
|
||||||
|
executable is located. Assuming the executable is at '~/bin/runVimTests' this
|
||||||
|
global configuration file should be '~/bin/runVimTestsSetup.vim' and should
|
||||||
|
have something like the following lines inside of it:
|
||||||
|
|
||||||
|
" Prepend tests repos to &rtp
|
||||||
|
let &runtimepath = '/path/to/runVimTests_dir,' . &rtp
|
||||||
|
let &runtimepath = '/path/to/vimTAP_dir,' . &rtp
|
||||||
11
test/_setup.vim
Normal file
11
test/_setup.vim
Normal file
@@ -0,0 +1,11 @@
|
|||||||
|
set bs=2
|
||||||
|
set hidden
|
||||||
|
set noshowmode
|
||||||
|
set whichwrap=[]
|
||||||
|
set noswapfile
|
||||||
|
let &hl = join(map(split(&hl, ','), 'substitute(v:val, '':.\+'', ''n'', ''g'')'), ',')
|
||||||
|
let &rtp = expand('<sfile>:p:h:h') . ',' . &rtp . ',' . expand('<sfile>:p:h:h') . '/after'
|
||||||
|
let g:delimitMate_pairs = ['()','{}','[]','<>','¿?','¡!',',:']
|
||||||
|
let g:delimitMate_quotes = ['"', "'", '`', '«', '|']
|
||||||
|
ru plugin/delimitMate.vim
|
||||||
|
au VimEnter * echom 'Start test'
|
||||||
18
test/all.tcl
Normal file
18
test/all.tcl
Normal file
@@ -0,0 +1,18 @@
|
|||||||
|
package require tcltest 2
|
||||||
|
namespace import -force ::tcltest::*
|
||||||
|
configure {*}$argv -testdir [file dir [info script]]
|
||||||
|
|
||||||
|
# Hook to determine if any of the tests failed. Then we can exit with
|
||||||
|
# proper exit code: 0=all passed, 1=one or more failed
|
||||||
|
proc tcltest::cleanupTestsHook {} {
|
||||||
|
variable numTests
|
||||||
|
upvar 2 testFileFailures crashed
|
||||||
|
set ::exitCode [expr {$numTests(Failed) > 0}]
|
||||||
|
if {[info exists crashed]} {
|
||||||
|
set ::exitCode [expr {$::exitCode || [llength $crashed]}]
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
runAllTests
|
||||||
|
puts "\a"
|
||||||
|
exit $exitCode
|
||||||
49
test/eol_marker.test
Normal file
49
test/eol_marker.test
Normal file
@@ -0,0 +1,49 @@
|
|||||||
|
# singleTest name desc setup input result vimCmds? skipScript?
|
||||||
|
#
|
||||||
|
# - desc can be empty and input would be used.
|
||||||
|
# - vimCmds is a list of ex commands.
|
||||||
|
# - skipScript will be evaluated in the scope of the function "single" and it
|
||||||
|
# should return a keywowd such as toDo, badTest or other as listed in the
|
||||||
|
# docs for tcltest. e.g.:
|
||||||
|
# {expr "[string first {i'} \"${input}\"] > -1 ? {emptyTest} : {}"}
|
||||||
|
# see tcltest documentation for other values.
|
||||||
|
|
||||||
|
# Get some help:
|
||||||
|
source helper.tcl
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 1}]
|
||||||
|
lappend vimCmds {let g:delimitMate_eol_marker = ';'}
|
||||||
|
lappend vimCmds {let g:delimitMate_insert_eol_marker = 0}
|
||||||
|
|
||||||
|
single ins_eol_marker_0-1 {} "" "i(" "()" ${vimCmds}
|
||||||
|
|
||||||
|
single ins_eol_marker_0-2 {} "" "i(\rx" "(\nx\n)" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 1}]
|
||||||
|
lappend vimCmds {let g:delimitMate_eol_marker = ';'}
|
||||||
|
lappend vimCmds {let g:delimitMate_insert_eol_marker = 1}
|
||||||
|
single ins_eol_marker_1-1 {} "" "i(" "();" ${vimCmds}
|
||||||
|
|
||||||
|
single ins_eol_marker_1-2 {} " a" "0i(" "() a" ${vimCmds}
|
||||||
|
|
||||||
|
single ins_eol_marker_1-3 {} "" "i(\rx" "(\nx\n);" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 1}]
|
||||||
|
lappend vimCmds {let g:delimitMate_eol_marker = ';'}
|
||||||
|
lappend vimCmds {let g:delimitMate_insert_eol_marker = 2}
|
||||||
|
single ins_eol_marker_2-1 {} "" "i(" "()" ${vimCmds}
|
||||||
|
|
||||||
|
single ins_eol_marker_2-2 {} "" "i(\rx" "(\nx\n);" ${vimCmds}
|
||||||
|
|
||||||
|
# Issue #195
|
||||||
|
single issue_195-1 {} "" "i{(\rx" "{(\nx\n)}" ${vimCmds}
|
||||||
|
|
||||||
|
# Issue #195
|
||||||
|
single issue_195-2 {} ";" "I{(\rx" "{(\nx\n)};" ${vimCmds}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
################################################################
|
||||||
|
# This gives nice statistics and cleans up the mess left behind.
|
||||||
|
cleanupTests
|
||||||
|
# vim: set filetype=tcl et sw=2 sts=0 ts=8:
|
||||||
92
test/expand_cr.test
Normal file
92
test/expand_cr.test
Normal file
@@ -0,0 +1,92 @@
|
|||||||
|
# singleTest name desc setup input result vimCmds? skipScript?
|
||||||
|
#
|
||||||
|
# - desc can be empty and input would be used.
|
||||||
|
# - vimCmds is a list of ex commands.
|
||||||
|
# - skipScript will be evaluated in the scope of the function "single" and it
|
||||||
|
# should return a keywowd such as toDo, badTest or other as listed in the
|
||||||
|
# docs for tcltest. e.g.:
|
||||||
|
# {expr "[string first {i'} \"${input}\"] > -1 ? {emptyTest} : {}"}
|
||||||
|
# see tcltest documentation for other values.
|
||||||
|
|
||||||
|
# Get some help:
|
||||||
|
source helper.tcl
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 1}]
|
||||||
|
#"let g:delimitMate_eol_marker = ';'
|
||||||
|
lappend vimCmds {filetype indent on}
|
||||||
|
lappend vimCmds {set bs=2 et sts=4 sw=4 ft=javascript}
|
||||||
|
single javascript-1 {} "\$(document).ready(function() {})" "f{a\rx" \
|
||||||
|
"\$(document).ready(function() {\n x\n})" ${vimCmds}
|
||||||
|
|
||||||
|
# Issue #95
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 1}]
|
||||||
|
lappend vimCmds {let b:delimitMate_jump_expansion = 1}
|
||||||
|
set skipScript {string cat toDo}
|
||||||
|
single issue_95 {} "" "i(\rtest)x" "(\ntest\n)x" ${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
# Remove CR expansion on BS
|
||||||
|
set skipScript {string cat toDo}
|
||||||
|
single bs {} "" "i(\r\bx" "(x)" ${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
# Consider indentation with BS inside an empty CR expansion.
|
||||||
|
single bs_indentation {} "" "i( \r\b\bx" "(x)" ${vimCmds}
|
||||||
|
|
||||||
|
# Conflict with indentation settings (cindent). Issue #95
|
||||||
|
lappend vimCmds {se cindent}
|
||||||
|
single issue_95 {} "sub foo {\n while (1) {\n\n }\n}" "3Gi\bx" \
|
||||||
|
"sub foo {\n while (1) {x}\n}" ${vimCmds}
|
||||||
|
|
||||||
|
single nested_expansion-1 {} "sub foo {\n while (1) {\n bar\n }\n}" \
|
||||||
|
"3GA}x" "sub foo {\n while (1) {\n bar\n }x\n}" ${vimCmds}
|
||||||
|
|
||||||
|
single nested_expansion-2 {} "sub foo {\n while (1) {\n bar\n }\n}" \
|
||||||
|
"3GA{x" "sub foo {\n while (1) {\n bar{x}\n }\n}" ${vimCmds}
|
||||||
|
|
||||||
|
single bracketed {} "\"{bracketed}" "\033A\"x" "\"{bracketed}\"x" ${vimCmds}
|
||||||
|
|
||||||
|
# Syntax folding enabled by autocmd breaks expansion.
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 1}]
|
||||||
|
lappend vimCmds {se cindent}
|
||||||
|
lappend vimCmds {set bs=2 et sts=4 sw=4}
|
||||||
|
lappend vimCmds {autocmd InsertEnter <buffer> let w:fdm=&foldmethod \
|
||||||
|
| setl foldmethod=manual}
|
||||||
|
lappend vimCmds {autocmd InsertLeave <buffer> let &foldmethod = w:fdm}
|
||||||
|
lappend vimCmds {set foldmethod=marker}
|
||||||
|
lappend vimCmds {set foldmarker={,}}
|
||||||
|
lappend vimCmds {set foldlevel=0}
|
||||||
|
lappend vimCmds {set backspace=2}
|
||||||
|
single folding {} "" "iabc {\rx" "abc {\n x\n}" ${vimCmds}
|
||||||
|
|
||||||
|
# expand_cr != 2}
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 1}]
|
||||||
|
lappend vimCmds {se cindent}
|
||||||
|
lappend vimCmds {set bs=2 et sts=4 sw=4 ft=javascript}
|
||||||
|
lappend vimCmds {let b:delimitMate_jump_expansion = 1}
|
||||||
|
single axpand_cr_no_2 {} "abc(def)" "\$i\rx" "abc(def\n x)" ${vimCmds}
|
||||||
|
|
||||||
|
# expand_cr == 2
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 2}]
|
||||||
|
lappend vimCmds {se cindent}
|
||||||
|
lappend vimCmds {set bs=2 et sts=4 sw=4 ft=javascript}
|
||||||
|
lappend vimCmds {let b:delimitMate_jump_expansion = 1}
|
||||||
|
single expand_cr_2 {} "abc(def)" "\$i\rx" "abc(def\n x\n )" ${vimCmds}
|
||||||
|
|
||||||
|
# Play nice with smartindent
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_cr = 2}]
|
||||||
|
lappend vimCmds {let b:delimitMate_jump_expansion = 1}
|
||||||
|
lappend vimCmds {set smartindent}
|
||||||
|
single smartindent-1 {} "" "i{\rx" "{\n x\n}" ${vimCmds}
|
||||||
|
|
||||||
|
single quotes-1 {} "" "i\" x" {" x"} ${vimCmds}
|
||||||
|
|
||||||
|
single quotes-2 {} "" "i\"\rx" "\"\nx\"" ${vimCmds}
|
||||||
|
|
||||||
|
lappend vimCmds {let g:delimitMate_expand_inside_quotes = 1}
|
||||||
|
single quotes-3 {} "" "i\"\nx" "\"\nx\n\"" ${vimCmds}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
################################################################
|
||||||
|
# This gives nice statistics and cleans up the mess left behind.
|
||||||
|
cleanupTests
|
||||||
|
# vim: set filetype=tcl et sw=2 sts=0 ts=8:
|
||||||
48
test/expand_space.test
Normal file
48
test/expand_space.test
Normal file
@@ -0,0 +1,48 @@
|
|||||||
|
# singleTest name desc setup input result vimCmds? skipScript?
|
||||||
|
#
|
||||||
|
# - desc can be empty and input would be used.
|
||||||
|
# - vimCmds is a list of ex commands.
|
||||||
|
# - skipScript will be evaluated in the scope of the function "single" and it
|
||||||
|
# should return a keywowd such as toDo, badTest or other as listed in the
|
||||||
|
# docs for tcltest. e.g.:
|
||||||
|
# {expr "[string first {i'} \"${input}\"] > -1 ? {emptyTest} : {}"}
|
||||||
|
# see tcltest documentation for other values.
|
||||||
|
|
||||||
|
# Get some help:
|
||||||
|
source helper.tcl
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_expand_space = 1}]
|
||||||
|
lappend vimCmds {let g:delimitMate_autoclose = 1}
|
||||||
|
|
||||||
|
pairs pairs-1 {} "" "i( x" "( x )" ${vimCmds}
|
||||||
|
|
||||||
|
pairs pairs-2 {} "( )" "la\bx" "(x)" ${vimCmds}
|
||||||
|
|
||||||
|
pairs pairs-3 {} "" "iabc x" "abc x" ${vimCmds}
|
||||||
|
|
||||||
|
quotes quotes-1 {} "" "i' x" "' x'" ${vimCmds}
|
||||||
|
|
||||||
|
lappend vimCmds {let g:delimitMate_expand_inside_quotes = 1}
|
||||||
|
quotes quotes-2 {} "" "i' x" "' x '" ${vimCmds}
|
||||||
|
|
||||||
|
quotes quotes-3 {} "" "i' \bx" "'x'" ${vimCmds}
|
||||||
|
|
||||||
|
set skipScript {string cat quoteBug}
|
||||||
|
lappend vimCmds {let g:delimitMate_autoclose = 0}
|
||||||
|
quotes quotes-4 {} "abc\\" "A'' x" "abc\\'' x '" ${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
# Issue #95
|
||||||
|
lappend vimCmds {let b:delimitMate_jump_expansion = 1}
|
||||||
|
set skipScript {string cat toDo}
|
||||||
|
pairs issue_95 {} "" "i( test)x" "( test )x" ${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
pairs pairs-4 {} "" "i() \bx" "(x)" ${vimCmds}
|
||||||
|
|
||||||
|
quotes quotes-5 {} "" "i'' \bx" "'x'" ${vimCmds}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
################################################################
|
||||||
|
# This gives nice statistics and cleans up the mess left behind.
|
||||||
|
cleanupTests
|
||||||
|
# vim: set filetype=tcl et sw=2 sts=0 ts=8:
|
||||||
125
test/helper.tcl
Normal file
125
test/helper.tcl
Normal file
@@ -0,0 +1,125 @@
|
|||||||
|
if {[lsearch [namespace children] ::tcltest] == -1} {
|
||||||
|
package require tcltest 2
|
||||||
|
namespace import -force ::tcltest::*
|
||||||
|
}
|
||||||
|
|
||||||
|
configure -verbose {body error skip}
|
||||||
|
#configure -verbose {start msec pass body error skip}
|
||||||
|
|
||||||
|
set charMap [list \
|
||||||
|
"\"" "\\\"" \
|
||||||
|
"\$" "\\$" \
|
||||||
|
"\[" "\\\[" \
|
||||||
|
"\]" "\\\]" \
|
||||||
|
"\\" "\\\\" \
|
||||||
|
"{" "\\{" \
|
||||||
|
"}" "\\}" \
|
||||||
|
]
|
||||||
|
|
||||||
|
# In order to skip a test pass a script that, when evaluated, returns emptyTest
|
||||||
|
# for tests that can not pass, or knownBug for ToDo features. e.g.:
|
||||||
|
# {expr "[string first {i'} \"${input}\"] > -1 ? {emptyTest} : {}"}
|
||||||
|
# see tcltest documentation for other values.
|
||||||
|
|
||||||
|
proc single {name desc setup input result \
|
||||||
|
{vimCmds {}} \
|
||||||
|
{constr {}} \
|
||||||
|
} {
|
||||||
|
set fnamePrefix "test_${name}"
|
||||||
|
global charMap
|
||||||
|
makeFile ${setup} "${fnamePrefix}.in"
|
||||||
|
makeFile {} "${fnamePrefix}.out"
|
||||||
|
makeFile [join ${vimCmds} "\n"] "${fnamePrefix}.vim"
|
||||||
|
set input [string map ${charMap} ${input}]
|
||||||
|
#puts [lindex ${vimCmds} 0]
|
||||||
|
set optCharMap [list {[} {\[} {]} {\]}]
|
||||||
|
set vimArgs [lmap option ${vimCmds} \
|
||||||
|
{string cat " -c \"[string map $charMap ${option}]\""}]
|
||||||
|
set body [string cat "
|
||||||
|
exec -- ./test.exp \"${fnamePrefix}\" \"${input}\"
|
||||||
|
return \[viewFile \"${fnamePrefix}.out\"\]
|
||||||
|
" ]
|
||||||
|
#puts ${body}
|
||||||
|
if {[string length ${desc}] eq 0} {
|
||||||
|
set desc ${input}
|
||||||
|
}
|
||||||
|
if {[string length ${constr}] ne 0} {
|
||||||
|
#puts ${constr}
|
||||||
|
set constr [eval ${constr}]
|
||||||
|
#puts ${constr}
|
||||||
|
}
|
||||||
|
set name "${name}: \"${setup}\", \"${desc}\" ->"
|
||||||
|
#puts $desc
|
||||||
|
#puts $name
|
||||||
|
test ${name} \
|
||||||
|
${desc} \
|
||||||
|
-body ${body} \
|
||||||
|
-constraints ${constr} \
|
||||||
|
-result ${result}
|
||||||
|
}
|
||||||
|
|
||||||
|
proc multi {items evalScript name desc setup input result \
|
||||||
|
{vimCmds {}} \
|
||||||
|
{constr {}} \
|
||||||
|
} {
|
||||||
|
global charMap
|
||||||
|
set minor 0
|
||||||
|
foreach item $items {
|
||||||
|
incr minor
|
||||||
|
eval ${evalScript}
|
||||||
|
foreach var {desc setup input result} {
|
||||||
|
set "the_${var}" [string map ${aCharMap} [expr "$${var}"]]
|
||||||
|
}
|
||||||
|
set the_name "${name}.${minor}"
|
||||||
|
single \
|
||||||
|
${the_name} \
|
||||||
|
${the_desc} \
|
||||||
|
${the_setup} \
|
||||||
|
${the_input} \
|
||||||
|
${the_result} \
|
||||||
|
${vimCmds} \
|
||||||
|
${constr} \
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
proc quotes {name desc setup input result \
|
||||||
|
{vimCmds {}} \
|
||||||
|
{constr {}} \
|
||||||
|
} {
|
||||||
|
set quotes [list {'} \" {`} {«} {|}]
|
||||||
|
set mapScript {set aCharMap [list "'" ${item}]}
|
||||||
|
multi \
|
||||||
|
${quotes} \
|
||||||
|
${mapScript} \
|
||||||
|
${name} \
|
||||||
|
${desc} \
|
||||||
|
${setup} \
|
||||||
|
${input} \
|
||||||
|
${result} \
|
||||||
|
${vimCmds} \
|
||||||
|
${constr} \
|
||||||
|
}
|
||||||
|
|
||||||
|
proc pairs {name desc setup input result \
|
||||||
|
{vimCmds {}} \
|
||||||
|
{constr {}} \
|
||||||
|
} {
|
||||||
|
set pairs [list () \{\} \[\] <> ¿? ¡! ,:]
|
||||||
|
set mapScript {
|
||||||
|
set left [string index ${item} 0]
|
||||||
|
set right [string index ${item} 1]
|
||||||
|
set aCharMap [list ( ${left} ) ${right}]
|
||||||
|
}
|
||||||
|
multi \
|
||||||
|
${pairs} \
|
||||||
|
${mapScript} \
|
||||||
|
${name} \
|
||||||
|
${desc} \
|
||||||
|
${setup} \
|
||||||
|
${input} \
|
||||||
|
${result} \
|
||||||
|
${vimCmds} \
|
||||||
|
${constr} \
|
||||||
|
}
|
||||||
|
|
||||||
|
# vim: set filetype=tcl et sw=2 sts=0 ts=8:
|
||||||
153
test/pairs.test
Normal file
153
test/pairs.test
Normal file
@@ -0,0 +1,153 @@
|
|||||||
|
# singleTest name desc setup input result vimCmds? skipScript?
|
||||||
|
#
|
||||||
|
# - desc can be empty and input would be used.
|
||||||
|
# - vimCmds is a list of ex commands.
|
||||||
|
# - skipScript will be evaluated in the scope of the function "single" and it
|
||||||
|
# should return a keywowd such as toDo, badTest or other as listed in the
|
||||||
|
# docs for tcltest. e.g.:
|
||||||
|
# {expr "[string first {i'} \"${input}\"] > -1 ? {emptyTest} : {}"}
|
||||||
|
# see tcltest documentation for other values.
|
||||||
|
|
||||||
|
# Get some help:
|
||||||
|
source helper.tcl
|
||||||
|
|
||||||
|
set vimCmds [list ]
|
||||||
|
pairs autoclose-1 {} {} "i(" "()"
|
||||||
|
|
||||||
|
pairs autoclose-2 {} {()} "a\b" ""
|
||||||
|
|
||||||
|
pairs autoclose-3 {} "()" "a)x" "()x"
|
||||||
|
|
||||||
|
set skipScript {string cat {toDo}}
|
||||||
|
single jump_all {} "" "((<magic>x" "(())x" {} ${skipScript}
|
||||||
|
|
||||||
|
pairs undo {} "" "i(x\033u" ""
|
||||||
|
|
||||||
|
pairs autoclose-4 {} "" "i@(x" "@(x)"
|
||||||
|
|
||||||
|
pairs autoclose-5 {} "@#" "a(x" "@(x)#"
|
||||||
|
|
||||||
|
pairs autoclose-6 {} "\\" "a(x" "\\(x"
|
||||||
|
|
||||||
|
pairs autoclose-7 {} "(\\)" "la)x" "(\\)x)"
|
||||||
|
|
||||||
|
pairs autoclose-8 {} {"abc"} "ifoo(" "foo(\"abc\""
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_autoclose = 0}]
|
||||||
|
pairs noautoclose-1 {} "" "i(x" "(x" ${vimCmds}
|
||||||
|
|
||||||
|
pairs noautoclose-2 {} "" "i()x" "(x)" ${vimCmds}
|
||||||
|
|
||||||
|
pairs noautoclose-3 {} "" "i())x" "()x" ${vimCmds}
|
||||||
|
|
||||||
|
pairs noautoclose-4 {} "" "i()\bx" "x" ${vimCmds}
|
||||||
|
|
||||||
|
pairs noautoclose-5 {} "" "i@()x" "@(x)" ${vimCmds}
|
||||||
|
|
||||||
|
pairs noautoclose-6 {} "@#" "a()x" "@(x)#" ${vimCmds}
|
||||||
|
|
||||||
|
#" Handle backspace gracefully.
|
||||||
|
set vimCmds [list {set backspace=}]
|
||||||
|
pairs bad_bs {} "" "i(\033a\bx" "(x)" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list ]
|
||||||
|
|
||||||
|
# closing parens removes characters. #133
|
||||||
|
pairs autoclose-9 {} "(a)" "a)" "()a)" ${vimCmds}
|
||||||
|
|
||||||
|
# Expand iabbreviations
|
||||||
|
set vimCmds [list {iabb def ghi}]
|
||||||
|
# Not sure how to make it work on the test
|
||||||
|
pairs iabbr {} "" "idef(" "ghi()" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list ]
|
||||||
|
|
||||||
|
pairs autoclose-10 {} {abc а} {$i(} {abc (а} ${vimCmds}
|
||||||
|
|
||||||
|
pairs autoclose-11 {} "abc ñ" "\$i(" "abc (ñ" ${vimCmds}
|
||||||
|
|
||||||
|
pairs autoclose-12 {} "abc \$" "\$i(" "abc (\$" ${vimCmds}
|
||||||
|
|
||||||
|
pairs autoclose-13 {} "abc £" "\$i(" "abc (£" ${vimCmds}
|
||||||
|
|
||||||
|
pairs autoclose-14 {} "abc d" "\$i(" "abc (d" ${vimCmds}
|
||||||
|
|
||||||
|
pairs autoclose-15 {} "abc ." "\$i(" "abc ()." ${vimCmds}
|
||||||
|
|
||||||
|
pairs autoclose-16 {} "abc " "\$i(" "abc () " ${vimCmds}
|
||||||
|
|
||||||
|
pairs autoclose-17 {} "abc (" "\$i(" "abc ((" ${vimCmds}
|
||||||
|
|
||||||
|
# Play nice with undo.
|
||||||
|
pairs undo {} "" "ia\007u(c)b\033u" "a" ${vimCmds}
|
||||||
|
|
||||||
|
# TODO: way to jump over one or several closing chars
|
||||||
|
set skipScript {string cat {toDo}}
|
||||||
|
single jump_to {} "()" "a\<magic>x" "()x" ${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
single jump_to {} "{()}" "la\\<magic>x" "{()}x" ${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_balance_pairs = 0}]
|
||||||
|
pairs no_balance_pairs-1 {} "ab cd)" "la(x" "ab(x) cd)" ${vimCmds}
|
||||||
|
|
||||||
|
# Issue #229
|
||||||
|
pairs issue_229-1 {} "((ab cd)" "\$i)x" "((ab cd)x" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list ]
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_balance_pairs = 1}]
|
||||||
|
pairs issue_229-2 {} "ab cd)" "la(x" "ab(x cd)" ${vimCmds}
|
||||||
|
|
||||||
|
# Issue #229
|
||||||
|
pairs issue_229-3 {} "((ab cd)" "\$i)x" "((ab cd)x)" ${vimCmds}
|
||||||
|
|
||||||
|
# Issue #220
|
||||||
|
set vimCmds [list {let g:delimitMate_jump_next = 0}]
|
||||||
|
pairs issue_220-1 {} "()" "a)" "())" ${vimCmds}
|
||||||
|
|
||||||
|
# Issues #207 and #223
|
||||||
|
set vimCmds [list {let g:delimitMate_jump_long = 1}]
|
||||||
|
pairs jump_long-1 {} "{\[(foobar)\]}" "fbi)x" "{\[(foobar)x\]}" ${vimCmds}
|
||||||
|
|
||||||
|
# Issues #207 and #223
|
||||||
|
set skipScript {expr "[string first {[[foobar]]} \"${setup}\"] > -1 \
|
||||||
|
? {badTest} : {}"}
|
||||||
|
single jump_long-2 {} "{\[(foobar)\]}" "fbi\]x" "{\[(foobar)\]x}" ${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
# Issues #207 and #223
|
||||||
|
set skipScript {string cat {toDo}}
|
||||||
|
set vimCmds [list {let g:delimitMate_jump_all = 1}]
|
||||||
|
single issues_207_223 {} "{\[(foobar)\]}" "fbi<magic>x" "{\[(foobar)\]}x" \
|
||||||
|
${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_jump_back = 1}]
|
||||||
|
pairs jump_back {} "" "i()x" "()x" ${vimCmds}
|
||||||
|
|
||||||
|
# Disable on syntax groups
|
||||||
|
set vimCmds [list {syntax on}]
|
||||||
|
lappend vimCmds {set ft=vim}
|
||||||
|
lappend vimCmds {let g:delimitMate_excluded_regions = ['String']}
|
||||||
|
pairs ignore_syntax {} {echo " "} "f\"la(" {echo " ( "} ${vimCmds}
|
||||||
|
|
||||||
|
#" Issue #160
|
||||||
|
set vimCmds [list {filetype indent plugin on}]
|
||||||
|
lappend vimCmds {set ft=php}
|
||||||
|
set skipScript {string cat {toDo}}
|
||||||
|
single issue_160 {} "<?php incl" "A\x18\x0F\x19" "<?php include()" \
|
||||||
|
${vimCmds} ${skipScript}
|
||||||
|
|
||||||
|
set vimCmds [list ]
|
||||||
|
|
||||||
|
# Play nice with redo
|
||||||
|
pairs redo {} "abc " "Afoo(x\033." "abc foo(x)foo(x)" ${vimCmds}
|
||||||
|
|
||||||
|
pairs smart {} {""} "0a(x" {"(x"}
|
||||||
|
|
||||||
|
pairs smart {} {""} "0a()x" {"(x)"}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
################################################################
|
||||||
|
# This gives nice statistics and cleans up the mess left behind.
|
||||||
|
cleanupTests
|
||||||
|
# vim: set filetype=tcl et sw=2 sts=0 ts=8:
|
||||||
107
test/quotes.test
Normal file
107
test/quotes.test
Normal file
@@ -0,0 +1,107 @@
|
|||||||
|
# singleTest name desc setup input result vimCmds? skipScript?
|
||||||
|
#
|
||||||
|
# - desc can be empty and input would be used.
|
||||||
|
# - vimCmds is a list of ex commands.
|
||||||
|
# - skipScript will be evaluated in the scope of the function "single" and it
|
||||||
|
# should return a keywowd such as toDo, badTest or other as listed in the
|
||||||
|
# docs for tcltest. e.g.:
|
||||||
|
# {expr "[string first {i'} \"${input}\"] > -1 ? {emptyTest} : {}"}
|
||||||
|
# see tcltest documentation for other values.
|
||||||
|
|
||||||
|
# Get some help:
|
||||||
|
source helper.tcl
|
||||||
|
|
||||||
|
quotes autoclose-1 {} {} "i'x" "'x'"
|
||||||
|
|
||||||
|
quotes autoclose-2 {} {} "i'x\033u" {}
|
||||||
|
|
||||||
|
quotes autoclose-3 {} {} {i''x} {''x}
|
||||||
|
|
||||||
|
quotes autoclose-4 {} {''} "a\bx" {x}
|
||||||
|
|
||||||
|
set skipScript {expr "[string first {i\"} \"${input}\"] > -1 ? {badTest} : {}"}
|
||||||
|
quotes autoclose-5 {} "" "i'x\"" "'x\"'" {} ${skipScript}
|
||||||
|
|
||||||
|
quotes autoclose-6 {} {} "i@'x" "@'x'"
|
||||||
|
|
||||||
|
quotes autoclose-7 {} {@#} "a'x" "@'x'#"
|
||||||
|
|
||||||
|
#quotes autoclose-8 {} {} "'\<S-Tab>x" "''x"
|
||||||
|
|
||||||
|
single autoclose-8 {} {abc'} "A'" "abc'" {} {string cat toDo}
|
||||||
|
|
||||||
|
quotes autoclose-9 {} "abc\\" "A'x" {abc\'x}
|
||||||
|
|
||||||
|
quotes autoclose-10 {} {} "au'Привет'" "u'Привет'"
|
||||||
|
|
||||||
|
quotes autoclose-11 {} {} "au'string'" "u'string'"
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_autoclose = 0}]
|
||||||
|
quotes noautoclose-1 {} {} "a'x" "'x" ${vimCmds}
|
||||||
|
|
||||||
|
quotes noautoclose-2 {} {} "a''x" "'x'" ${vimCmds}
|
||||||
|
|
||||||
|
quotes noautoclose-3 {} {} "a'''x" "''x" ${vimCmds}
|
||||||
|
|
||||||
|
quotes noautoclose-4 {} {} "a''\bx" "x" ${vimCmds}
|
||||||
|
|
||||||
|
quotes noautoclose-5 {} {} "a@''x" "@'x'" ${vimCmds}
|
||||||
|
|
||||||
|
quotes noautoclose-6 {} "@#" "a''x" "@'x'#" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list {let g:delimitMate_autoclose = 1}]
|
||||||
|
# Handle backspace gracefully.
|
||||||
|
lappend vimCmds {set backspace=}
|
||||||
|
quotes badBS-1 {} {} "a'\033a\bx" "'x'" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list {set cpo=ces$}]
|
||||||
|
quotes cpo {} {} "a'x" "'x'" ${vimCmds}
|
||||||
|
|
||||||
|
# Make sure smart quote works beyond first column.
|
||||||
|
quotes beyond_first_column {} { } "a'x" " 'x'"
|
||||||
|
|
||||||
|
# smart quote, check fo char on the right.
|
||||||
|
quotes smart_quote-1 {} "a b" "la'" "a 'b"
|
||||||
|
|
||||||
|
# Make sure we jump over a quote on the right. #89.
|
||||||
|
quotes autoclose-12 {} {} "a('test'x" "('test'x)"
|
||||||
|
|
||||||
|
# Duplicate whole line when inserting quote at bol #105
|
||||||
|
quotes autoclose-13 {} "}" "i'" "''}"
|
||||||
|
|
||||||
|
quotes autoclose-14 {} "'abc " "A'" "'abc '"
|
||||||
|
|
||||||
|
quotes autoclose-15 {} "''abc " "A'" "''abc ''"
|
||||||
|
|
||||||
|
# Nesting quotes:
|
||||||
|
set vimCmds [list {let g:delimitMate_nesting_quotes = delimitMate#option('quotes')}]
|
||||||
|
quotes nesting-1 {} "''" "A'x" "'''x'''" ${vimCmds}
|
||||||
|
|
||||||
|
quotes nesting-2 {} "'''" "A'x" "''''x''''" ${vimCmds}
|
||||||
|
|
||||||
|
quotes nesting-3 {} {} "i''x" "''x" ${vimCmds}
|
||||||
|
|
||||||
|
quotes nesting-4 {} {} "i'x" "'x'" ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list]
|
||||||
|
|
||||||
|
# expand iabbreviations
|
||||||
|
set vimCmds [list {iabb def ghi}]
|
||||||
|
single iabbr {} {} {idef"} {ghi"} ${vimCmds}
|
||||||
|
|
||||||
|
set vimCmds [list]
|
||||||
|
|
||||||
|
quotes autoclose-16 {} {} "i'\n\b" "''"
|
||||||
|
|
||||||
|
# Double quote starts a comment in viml
|
||||||
|
set vimCmds [list {set ft=vim}]
|
||||||
|
single vim_comment {} {} {i"} {"} ${vimCmds}
|
||||||
|
|
||||||
|
#" Allow quote to exit from string when disabled by syntax group.
|
||||||
|
set vimCmds [list {syntax on}]
|
||||||
|
quotes disabled_syntax {} "'abc'" "\$i'x" "'abc'x" ${vimCmds}
|
||||||
|
|
||||||
|
# --------
|
||||||
|
# This gives nice statistics and cleans up the mess left behind.
|
||||||
|
cleanupTests
|
||||||
|
# vim: set filetype=tcl et sw=2 sts=0 ts=8:
|
||||||
20
test/test.exp
Executable file
20
test/test.exp
Executable file
@@ -0,0 +1,20 @@
|
|||||||
|
#!/usr/bin/env expect -f
|
||||||
|
|
||||||
|
set testName [lindex $argv 0]
|
||||||
|
set filein "${testName}.in"
|
||||||
|
set fileout "${testName}.out"
|
||||||
|
set input [lindex $argv 1]
|
||||||
|
|
||||||
|
set timeout 2
|
||||||
|
spawn env TERM=dumb vim -N -i NONE -u _setup.vim -S "${testName}.vim" -- ${filein}
|
||||||
|
match_max 100000
|
||||||
|
expect -exact "Start test"
|
||||||
|
foreach char [split ${input} {}] {
|
||||||
|
send -- "${char}"
|
||||||
|
sleep .01
|
||||||
|
}
|
||||||
|
send -- " "
|
||||||
|
sleep .01
|
||||||
|
send -- ":w! ${fileout}\r"
|
||||||
|
send -- ":qa!\r"
|
||||||
|
expect eof
|
||||||
Reference in New Issue
Block a user