vim: src/testdir/test_mapping.vim annotate

annotate src/testdir/test_mapping.vim @ 26356:0884f2be6c2a v8.2.3709

patch 8.2.3709: Vim9: backtick expression expanded when not desired Commit: https://github.com/vim/vim/commit/fad2742d538123abb9b384a053fd581f2acf6bb0 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Nov 30 21:58:19 2021 +0000 patch 8.2.3709: Vim9: backtick expression expanded when not desired Problem: Vim9: backtick expression expanded when not desired. Solution: Only expand a backtick expression for commands that expand their argument. Remove a few outdated TODO comments.

author	Bram Moolenaar <Bram@vim.org>
date	Tue, 30 Nov 2021 23:00:04 +0100
parents	a5a772dace5b
children	3f209f13883d

rev	line source
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Tests for mappings and abbreviations
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	2
15659 8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	3 source shared.vim
17657 0da9bc55c31a patch 8.1.1826: tests use hand coded feature and option checks Bram Moolenaar <Bram@vim.org> parents: 17249 diff changeset	4 source check.vim
18689 8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	5 source screendump.vim
22862 6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	6 source term_util.vim
15659 8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	7
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	8 func Test_abbreviation()
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	9 " abbreviation with 0x80 should work
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	10 inoreab чкпр vim
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	11 call feedkeys("Goчкпр \<Esc>", "xt")
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	12 call assert_equal('vim ', getline('$'))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	13 iunab чкпр
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	14 set nomodified
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	15 endfunc
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	16
16389 fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	17 func Test_abclear()
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	18 abbrev foo foobar
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	19 iabbrev fooi foobari
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	20 cabbrev fooc foobarc
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	21 call assert_equal("\n\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	22 \ .. "c fooc foobarc\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	23 \ .. "i fooi foobari\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	24 \ .. "! foo foobar", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	25
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	26 iabclear
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	27 call assert_equal("\n\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	28 \ .. "c fooc foobarc\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	29 \ .. "c foo foobar", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	30 abbrev foo foobar
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	31 iabbrev fooi foobari
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	32
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	33 cabclear
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	34 call assert_equal("\n\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	35 \ .. "i fooi foobari\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	36 \ .. "i foo foobar", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	37 abbrev foo foobar
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	38 cabbrev fooc foobarc
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	39
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	40 abclear
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	41 call assert_equal("\n\nNo abbreviation found", execute('abbrev'))
19407 2f4be7ca1b1b patch 8.2.0261: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19370 diff changeset	42 call assert_fails('%abclear', 'E481:')
16389 fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	43 endfunc
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	44
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	45 func Test_abclear_buffer()
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	46 abbrev foo foobar
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	47 new X1
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	48 abbrev <buffer> foo1 foobar1
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	49 new X2
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	50 abbrev <buffer> foo2 foobar2
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	51
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	52 call assert_equal("\n\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	53 \ .. "! foo2 @foobar2\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	54 \ .. "! foo foobar", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	55
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	56 abclear <buffer>
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	57 call assert_equal("\n\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	58 \ .. "! foo foobar", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	59
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	60 b X1
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	61 call assert_equal("\n\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	62 \ .. "! foo1 @foobar1\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	63 \ .. "! foo foobar", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	64 abclear <buffer>
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	65 call assert_equal("\n\n"
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	66 \ .. "! foo foobar", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	67
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	68 abclear
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	69 call assert_equal("\n\nNo abbreviation found", execute('abbrev'))
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	70
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	71 %bwipe
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	72 endfunc
fb7cf38a1c7a patch 8.1.1199: no test for :abclear Bram Moolenaar <Bram@vim.org> parents: 16101 diff changeset	73
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	74 func Test_map_ctrl_c_insert()
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	75 " mapping of ctrl-c in Insert mode
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	76 set cpo-=< cpo-=k
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	77 inoremap <c-c> <ctrl-c>
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	78 cnoremap <c-c> dummy
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	79 cunmap <c-c>
20627 8bce783af0cb patch 8.2.0867: using {xxx} for encoding a modifier is not nice Bram Moolenaar <Bram@vim.org> parents: 20603 diff changeset	80 call feedkeys("GoTEST2: CTRL-C \|\<*C-C>A\|\<Esc>", "xt")
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	81 call assert_equal('TEST2: CTRL-C \|<ctrl-c>A\|', getline('$'))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	82 unmap! <c-c>
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	83 set nomodified
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	84 endfunc
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	85
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	86 func Test_map_ctrl_c_visual()
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	87 " mapping of ctrl-c in Visual mode
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	88 vnoremap <c-c> :<C-u>$put ='vmap works'
20627 8bce783af0cb patch 8.2.0867: using {xxx} for encoding a modifier is not nice Bram Moolenaar <Bram@vim.org> parents: 20603 diff changeset	89 call feedkeys("GV\<*C-C>\<CR>", "xt")
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	90 call assert_equal('vmap works', getline('$'))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	91 vunmap <c-c>
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	92 set nomodified
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	93 endfunc
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	94
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	95 func Test_map_langmap()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 20627 diff changeset	96 CheckFeature langmap
9925 3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	97
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	98 " check langmap applies in normal mode
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	99 set langmap=+- nolangremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	100 new
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	101 call setline(1, ['a', 'b', 'c'])
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	102 2
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	103 call assert_equal('b', getline('.'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	104 call feedkeys("+", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	105 call assert_equal('a', getline('.'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	106
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	107 " check no remapping
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	108 map x +
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	109 2
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	110 call feedkeys("x", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	111 call assert_equal('c', getline('.'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	112
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	113 " check with remapping
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	114 set langremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	115 2
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	116 call feedkeys("x", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	117 call assert_equal('a', getline('.'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	118
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	119 unmap x
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	120 bwipe!
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	121
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	122 " 'langnoremap' follows 'langremap' and vise versa
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	123 set langremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	124 set langnoremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	125 call assert_equal(0, &langremap)
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	126 set langremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	127 call assert_equal(0, &langnoremap)
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	128 set nolangremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	129 call assert_equal(1, &langnoremap)
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	130
10070 09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	131 " check default values
09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	132 set langnoremap&
09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	133 call assert_equal(0, &langnoremap)
09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	134 call assert_equal(1, &langremap)
09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	135 set langremap&
09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	136 call assert_equal(0, &langnoremap)
09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	137 call assert_equal(1, &langremap)
09c7df6f8dd3 commit https://github.com/vim/vim/commit/da9ce2cde11ddd0e16cdfbab6d4ac4e8110218e1 Christian Brabandt <cb@256bit.org> parents: 9925 diff changeset	138
9925 3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	139 " langmap should not apply in insert mode, 'langremap' doesn't matter
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	140 set langmap=+{ nolangremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	141 call feedkeys("Go+\<Esc>", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	142 call assert_equal('+', getline('$'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	143 set langmap=+{ langremap
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	144 call feedkeys("Go+\<Esc>", "xt")
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	145 call assert_equal('+', getline('$'))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	146
9925 3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	147 " langmap used for register name in insert mode.
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	148 call setreg('a', 'aaaa')
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	149 call setreg('b', 'bbbb')
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	150 call setreg('c', 'cccc')
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	151 set langmap=ab langremap
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	152 call feedkeys("Go\<C-R>a\<Esc>", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	153 call assert_equal('bbbb', getline('$'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	154 call feedkeys("Go\<C-R>\<C-R>a\<Esc>", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	155 call assert_equal('bbbb', getline('$'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	156 " mapping does not apply
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	157 imap c a
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	158 call feedkeys("Go\<C-R>c\<Esc>", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	159 call assert_equal('cccc', getline('$'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	160 imap a c
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	161 call feedkeys("Go\<C-R>a\<Esc>", "xt")
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	162 call assert_equal('bbbb', getline('$'))
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	163
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	164 " langmap should not apply in Command-line mode
3fba3e8326a7 commit https://github.com/vim/vim/commit/920694c1b60fac8017b8909efcc24f189804a9bb Christian Brabandt <cb@256bit.org> parents: 9869 diff changeset	165 set langmap=+{ nolangremap
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	166 call feedkeys(":call append(line('$'), '+')\<CR>", "xt")
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	167 call assert_equal('+', getline('$'))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	168
10787 09926123316b patch 8.0.0283: mode() does not indicate Insert mode completion Christian Brabandt <cb@256bit.org> parents: 10070 diff changeset	169 iunmap a
09926123316b patch 8.0.0283: mode() does not indicate Insert mode completion Christian Brabandt <cb@256bit.org> parents: 10070 diff changeset	170 iunmap c
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	171 set nomodified
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	172 endfunc
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	173
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	174 func Test_map_feedkeys()
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	175 " issue #212 (feedkeys insert mapping at current position)
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	176 nnoremap . :call feedkeys(".", "in")<cr>
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	177 call setline('$', ['a b c d', 'a b c d'])
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	178 $-1
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	179 call feedkeys("0qqdw.ifoo\<Esc>qj0@q\<Esc>", "xt")
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	180 call assert_equal(['fooc d', 'fooc d'], getline(line('$') - 1, line('$')))
10787 09926123316b patch 8.0.0283: mode() does not indicate Insert mode completion Christian Brabandt <cb@256bit.org> parents: 10070 diff changeset	181 nunmap .
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	182 set nomodified
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	183 endfunc
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	184
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	185 func Test_map_cursor()
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	186 " <c-g>U<cursor> works only within a single line
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	187 imapclear
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	188 imap ( ()<c-g>U<left>
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	189 call feedkeys("G2o\<Esc>ki\<CR>Test1: text with a (here some more text\<Esc>k.", "xt")
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	190 call assert_equal('Test1: text with a (here some more text)', getline(line('$') - 2))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	191 call assert_equal('Test1: text with a (here some more text)', getline(line('$') - 1))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	192
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	193 " test undo
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	194 call feedkeys("G2o\<Esc>ki\<CR>Test2: text wit a (here some more text [und undo]\<C-G>u\<Esc>k.u", "xt")
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	195 call assert_equal('', getline(line('$') - 2))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	196 call assert_equal('Test2: text wit a (here some more text [und undo])', getline(line('$') - 1))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	197 set nomodified
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	198 imapclear
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	199 endfunc
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	200
16101 5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	201 func Test_map_cursor_ctrl_gU()
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	202 " <c-g>U<cursor> works only within a single line
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	203 nnoremap c<* *Ncgn<C-r>"<C-G>U<S-Left>
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	204 call setline(1, ['foo', 'foobar', '', 'foo'])
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	205 call cursor(1,2)
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	206 call feedkeys("c<*PREFIX\<esc>.", 'xt')
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	207 call assert_equal(['PREFIXfoo', 'foobar', '', 'PREFIXfoo'], getline(1,'$'))
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	208 " break undo manually
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	209 set ul=1000
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	210 exe ":norm! uu"
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	211 call assert_equal(['foo', 'foobar', '', 'foo'], getline(1,'$'))
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	212
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	213 " Test that it does not work if the cursor moves to the previous line
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	214 " 2 times <S-Left> move to the previous line
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	215 nnoremap c<* *Ncgn<C-r>"<C-G>U<S-Left><C-G>U<S-Left>
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	216 call setline(1, ['', ' foo', 'foobar', '', 'foo'])
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	217 call cursor(2,3)
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	218 call feedkeys("c<*PREFIX\<esc>.", 'xt')
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	219 call assert_equal(['PREFIXPREFIX', ' foo', 'foobar', '', 'foo'], getline(1,'$'))
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	220 nmapclear
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	221 endfunc
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	222
5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	223
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	224 " This isn't actually testing a mapping, but similar use of CTRL-G U as above.
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	225 func Test_break_undo()
16101 5c5d211bd5a8 patch 8.1.1055: CTRL-G U in Insert mode doesn't work for shift-Left Bram Moolenaar <Bram@vim.org> parents: 15687 diff changeset	226 set whichwrap=<,>,[,]
9867 86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	227 call feedkeys("G4o2k", "xt")
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	228 exe ":norm! iTest3: text with a (parenthesis here\<C-G>U\<Right>new line here\<esc>\<up>\<up>."
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	229 call assert_equal('new line here', getline(line('$') - 3))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	230 call assert_equal('Test3: text with a (parenthesis here', getline(line('$') - 2))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	231 call assert_equal('new line here', getline(line('$') - 1))
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	232 set nomodified
86f73f026a9a commit https://github.com/vim/vim/commit/2d1a248762f069e470acde389ff4686a45d2f817 Christian Brabandt <cb@256bit.org> parents: diff changeset	233 endfunc
9869 989d44d35a66 commit https://github.com/vim/vim/commit/35a4cfa200917dd171b1fff3cd5b6cee9add673d Christian Brabandt <cb@256bit.org> parents: 9867 diff changeset	234
989d44d35a66 commit https://github.com/vim/vim/commit/35a4cfa200917dd171b1fff3cd5b6cee9add673d Christian Brabandt <cb@256bit.org> parents: 9867 diff changeset	235 func Test_map_meta_quotes()
989d44d35a66 commit https://github.com/vim/vim/commit/35a4cfa200917dd171b1fff3cd5b6cee9add673d Christian Brabandt <cb@256bit.org> parents: 9867 diff changeset	236 imap <M-"> foo
20627 8bce783af0cb patch 8.2.0867: using {xxx} for encoding a modifier is not nice Bram Moolenaar <Bram@vim.org> parents: 20603 diff changeset	237 call feedkeys("Go-\<*M-\">-\<Esc>", "xt")
9869 989d44d35a66 commit https://github.com/vim/vim/commit/35a4cfa200917dd171b1fff3cd5b6cee9add673d Christian Brabandt <cb@256bit.org> parents: 9867 diff changeset	238 call assert_equal("-foo-", getline('$'))
989d44d35a66 commit https://github.com/vim/vim/commit/35a4cfa200917dd171b1fff3cd5b6cee9add673d Christian Brabandt <cb@256bit.org> parents: 9867 diff changeset	239 set nomodified
989d44d35a66 commit https://github.com/vim/vim/commit/35a4cfa200917dd171b1fff3cd5b6cee9add673d Christian Brabandt <cb@256bit.org> parents: 9867 diff changeset	240 iunmap <M-">
989d44d35a66 commit https://github.com/vim/vim/commit/35a4cfa200917dd171b1fff3cd5b6cee9add673d Christian Brabandt <cb@256bit.org> parents: 9867 diff changeset	241 endfunc
11295 d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	242
17720 844f470532b6 patch 8.1.1857: cannot use modifier with multi-byte character Bram Moolenaar <Bram@vim.org> parents: 17657 diff changeset	243 func Test_map_meta_multibyte()
844f470532b6 patch 8.1.1857: cannot use modifier with multi-byte character Bram Moolenaar <Bram@vim.org> parents: 17657 diff changeset	244 imap <M-á> foo
17722 bf807c68ac80 patch 8.1.1858: test for multi-byte mapping fails on some systems Bram Moolenaar <Bram@vim.org> parents: 17720 diff changeset	245 call assert_match('i <M-á>\s*foo', execute('imap'))
17720 844f470532b6 patch 8.1.1857: cannot use modifier with multi-byte character Bram Moolenaar <Bram@vim.org> parents: 17657 diff changeset	246 iunmap <M-á>
844f470532b6 patch 8.1.1857: cannot use modifier with multi-byte character Bram Moolenaar <Bram@vim.org> parents: 17657 diff changeset	247 endfunc
844f470532b6 patch 8.1.1857: cannot use modifier with multi-byte character Bram Moolenaar <Bram@vim.org> parents: 17657 diff changeset	248
11295 d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	249 func Test_abbr_after_line_join()
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	250 new
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	251 abbr foo bar
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	252 set backspace=indent,eol,start
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	253 exe "normal o\<BS>foo "
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	254 call assert_equal("bar ", getline(1))
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	255 bwipe!
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	256 unabbr foo
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	257 set backspace&
d772bf077b3f patch 8.0.0533: abbreviation doesn't work after backspacing newline Christian Brabandt <cb@256bit.org> parents: 10787 diff changeset	258 endfunc
11403 74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	259
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	260 func Test_map_timeout()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 20627 diff changeset	261 CheckFeature timers
11403 74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	262 nnoremap aaaa :let got_aaaa = 1<CR>
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	263 nnoremap bb :let got_bb = 1<CR>
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	264 nmap b aaa
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	265 new
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	266 func ExitInsert(timer)
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	267 let g:line = getline(1)
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	268 call feedkeys("\<Esc>", "t")
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	269 endfunc
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	270 set timeout timeoutlen=200
15659 8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	271 let timer = timer_start(300, 'ExitInsert')
11403 74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	272 " After the 'b' Vim waits for another character to see if it matches 'bb'.
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	273 " When it times out it is expanded to "aaa", but there is no wait for
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	274 " "aaaa". Can't check that reliably though.
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	275 call feedkeys("b", "xt!")
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	276 call assert_equal("aa", g:line)
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	277 call assert_false(exists('got_aaa'))
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	278 call assert_false(exists('got_bb'))
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	279
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	280 bwipe!
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	281 nunmap aaaa
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	282 nunmap bb
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	283 nunmap b
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	284 set timeoutlen&
74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	285 delfunc ExitInsert
15659 8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	286 call timer_stop(timer)
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	287 endfunc
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	288
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	289 func Test_map_timeout_with_timer_interrupt()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 20627 diff changeset	290 CheckFeature job
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 20627 diff changeset	291 CheckFeature timers
25969 a5a772dace5b patch 8.2.3518: Test_xrestore sometimes fails Bram Moolenaar <Bram@vim.org> parents: 24914 diff changeset	292 let g:test_is_flaky = 1
15659 8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	293
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	294 " Confirm the timer invoked in exit_cb of the job doesn't disturb mapped key
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	295 " sequence.
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	296 new
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	297 let g:val = 0
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	298 nnoremap \12 :let g:val = 1<CR>
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	299 nnoremap \123 :let g:val = 2<CR>
17726 586558396b7e patch 8.1.1860: map timeout test is flaky Bram Moolenaar <Bram@vim.org> parents: 17722 diff changeset	300 set timeout timeoutlen=200
15659 8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	301
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	302 func ExitCb(job, status)
15687 cb501b3c9fb5 patch 8.1.0851: feedkeys() with "L" does not work properly Bram Moolenaar <Bram@vim.org> parents: 15659 diff changeset	303 let g:timer = timer_start(1, {-> feedkeys("3\<Esc>", 't')})
15659 8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	304 endfunc
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	305
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	306 call job_start([&shell, &shellcmdflag, 'echo'], {'exit_cb': 'ExitCb'})
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	307 call feedkeys('\12', 'xt!')
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	308 call assert_equal(2, g:val)
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	309
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	310 bwipe!
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	311 nunmap \12
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	312 nunmap \123
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	313 set timeoutlen&
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	314 call WaitFor({-> exists('g:timer')})
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	315 call timer_stop(g:timer)
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	316 unlet g:timer
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	317 unlet g:val
8513d9864f7e patch 8.1.0837: timer interrupting cursorhold and mapping not tested Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	318 delfunc ExitCb
11403 74a40efb39ea patch 8.0.0586: no test for mapping timing out Christian Brabandt <cb@256bit.org> parents: 11295 diff changeset	319 endfunc
13788 a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	320
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	321 func Test_abbreviation_CR()
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	322 new
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	323 func Eatchar(pat)
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	324 let c = nr2char(getchar(0))
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	325 return (c =~ a:pat) ? '' : c
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	326 endfunc
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	327 iabbrev <buffer><silent> ~~7 <c-r>=repeat('~', 7)<CR><c-r>=Eatchar('\s')<cr>
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	328 call feedkeys("GA~~7 \<esc>", 'xt')
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	329 call assert_equal('~~~~~~~', getline('$'))
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	330 %d
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	331 call feedkeys("GA~~7\<cr>\<esc>", 'xt')
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	332 call assert_equal(['~~~~~~~', ''], getline(1,'$'))
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	333 delfunc Eatchar
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	334 bw!
a27d380b257f patch 8.0.1766: expanding abbreviation doesn't work Christian Brabandt <cb@256bit.org> parents: 11403 diff changeset	335 endfunc
13933 bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	336
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	337 func Test_cabbr_visual_mode()
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	338 cabbr s su
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	339 call feedkeys(":s \<c-B>\"\<CR>", 'itx')
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	340 call assert_equal('"su ', getreg(':'))
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	341 call feedkeys(":'<,'>s \<c-B>\"\<CR>", 'itx')
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	342 let expected = '"'. "'<,'>su "
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	343 call assert_equal(expected, getreg(':'))
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	344 call feedkeys(": '<,'>s \<c-B>\"\<CR>", 'itx')
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	345 let expected = '" '. "'<,'>su "
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	346 call assert_equal(expected, getreg(':'))
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	347 call feedkeys(":'a,'bs \<c-B>\"\<CR>", 'itx')
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	348 let expected = '"'. "'a,'bsu "
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	349 call assert_equal(expected, getreg(':'))
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	350 cunabbr s
bea665293ea0 patch 8.0.1837: one character cmdline abbreviation not triggered after '<,'> Christian Brabandt <cb@256bit.org> parents: 13788 diff changeset	351 endfunc
15279 54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	352
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	353 func Test_motionforce_omap()
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	354 func GetCommand()
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	355 let g:m=mode(1)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	356 let [g:lnum1, g:col1] = searchpos('-', 'Wb')
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	357 if g:lnum1 == 0
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	358 return "\<Esc>"
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	359 endif
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	360 let [g:lnum2, g:col2] = searchpos('-', 'W')
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	361 if g:lnum2 == 0
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	362 return "\<Esc>"
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	363 endif
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	364 return ":call Select()\<CR>"
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	365 endfunc
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	366 func Select()
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	367 call cursor([g:lnum1, g:col1])
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	368 exe "normal! 1 ". (strlen(g:m) == 2 ? 'v' : g:m[2])
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	369 call cursor([g:lnum2, g:col2])
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	370 execute "normal! \<BS>"
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	371 endfunc
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	372 new
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	373 onoremap <buffer><expr> i- GetCommand()
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	374 " 1) default omap mapping
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	375 %d_
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	376 call setline(1, ['aaa - bbb', 'x', 'ddd - eee'])
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	377 call cursor(2, 1)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	378 norm di-
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	379 call assert_equal('no', g:m)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	380 call assert_equal(['aaa -- eee'], getline(1, '$'))
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	381 " 2) forced characterwise operation
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	382 %d_
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	383 call setline(1, ['aaa - bbb', 'x', 'ddd - eee'])
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	384 call cursor(2, 1)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	385 norm dvi-
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	386 call assert_equal('nov', g:m)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	387 call assert_equal(['aaa -- eee'], getline(1, '$'))
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	388 " 3) forced linewise operation
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	389 %d_
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	390 call setline(1, ['aaa - bbb', 'x', 'ddd - eee'])
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	391 call cursor(2, 1)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	392 norm dVi-
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	393 call assert_equal('noV', g:m)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	394 call assert_equal([''], getline(1, '$'))
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	395 " 4) forced blockwise operation
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	396 %d_
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	397 call setline(1, ['aaa - bbb', 'x', 'ddd - eee'])
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	398 call cursor(2, 1)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	399 exe "norm d\<C-V>i-"
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	400 call assert_equal("no\<C-V>", g:m)
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	401 call assert_equal(['aaabbb', 'x', 'dddeee'], getline(1, '$'))
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	402 bwipe!
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	403 delfunc Select
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	404 delfunc GetCommand
54457fc4af0b patch 8.1.0648: custom operators can't act upon a forced motion Bram Moolenaar <Bram@vim.org> parents: 13933 diff changeset	405 endfunc
17184 a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	406
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	407 func Test_error_in_map_expr()
17657 0da9bc55c31a patch 8.1.1826: tests use hand coded feature and option checks Bram Moolenaar <Bram@vim.org> parents: 17249 diff changeset	408 " Unlike CheckRunVimInTerminal this does work in a win32 console
0da9bc55c31a patch 8.1.1826: tests use hand coded feature and option checks Bram Moolenaar <Bram@vim.org> parents: 17249 diff changeset	409 CheckFeature terminal
0da9bc55c31a patch 8.1.1826: tests use hand coded feature and option checks Bram Moolenaar <Bram@vim.org> parents: 17249 diff changeset	410 if has('win32') && has('gui_running')
17184 a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	411 throw 'Skipped: cannot run Vim in a terminal window'
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	412 endif
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	413
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	414 let lines =<< trim [CODE]
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	415 func Func()
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	416 " fail to create list
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	417 let x = [
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	418 endfunc
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	419 nmap <expr> ! Func()
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	420 set updatetime=50
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	421 [CODE]
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	422 call writefile(lines, 'Xtest.vim')
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	423
17249 3e2e998ce0db patch 8.1.1624: when testing in the GUI may try to run gvim in a terminal Bram Moolenaar <Bram@vim.org> parents: 17239 diff changeset	424 let buf = term_start(GetVimCommandCleanTerm() .. ' -S Xtest.vim', {'term_rows': 8})
17184 a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	425 let job = term_getjob(buf)
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	426 call WaitForAssert({-> assert_notequal('', term_getline(buf, 8))})
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	427
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	428 " GC must not run during map-expr processing, which can make Vim crash.
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	429 call term_sendkeys(buf, '!')
19954 c087099e9163 patch 8.2.0533: tests using term_wait() can still be flaky Bram Moolenaar <Bram@vim.org> parents: 19407 diff changeset	430 call TermWait(buf, 50)
17184 a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	431 call term_sendkeys(buf, "\<CR>")
19954 c087099e9163 patch 8.2.0533: tests using term_wait() can still be flaky Bram Moolenaar <Bram@vim.org> parents: 19407 diff changeset	432 call TermWait(buf, 50)
17184 a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	433 call assert_equal('run', job_status(job))
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	434
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	435 call term_sendkeys(buf, ":qall!\<CR>")
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	436 call WaitFor({-> job_status(job) ==# 'dead'})
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	437 if has('unix')
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	438 call assert_equal('', job_info(job).termsig)
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	439 endif
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	440
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	441 call delete('Xtest.vim')
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	442 exe buf .. 'bwipe!'
a5c3d374e1d3 patch 8.1.1591: on error garbage collection may free memory in use Bram Moolenaar <Bram@vim.org> parents: 16389 diff changeset	443 endfunc
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	444
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	445 func Test_list_mappings()
18346 5b12fd0c39c3 patch 8.1.2167: mapping test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 18341 diff changeset	446 " Remove default mappings
5b12fd0c39c3 patch 8.1.2167: mapping test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 18341 diff changeset	447 imapclear
18341 a9d518b1271b patch 8.1.2165: mapping test fails on Mac Bram Moolenaar <Bram@vim.org> parents: 18329 diff changeset	448
24375 fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	449 " reset 'isident' to check it isn't used
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	450 set isident=
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	451 inoremap <C-m> CtrlM
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	452 inoremap <A-S> AltS
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	453 inoremap <S-/> ShiftSlash
24375 fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	454 set isident&
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	455 call assert_equal([
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	456 \ 'i <S-/> * ShiftSlash',
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	457 \ 'i <M-S> * AltS',
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	458 \ 'i <C-M> * CtrlM',
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	459 \], execute('imap')->trim()->split("\n"))
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	460 iunmap <C-M>
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	461 iunmap <A-S>
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	462 call assert_equal(['i <S-/> * ShiftSlash'], execute('imap')->trim()->split("\n"))
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	463 iunmap <S-/>
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	464 call assert_equal(['No mapping found'], execute('imap')->trim()->split("\n"))
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	465
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	466 " List global, buffer local and script local mappings
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	467 nmap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	468 nmap <buffer> ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	469 nmap <script> ,fs /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	470 call assert_equal(['n ,f @/^\k\+ (<CR>',
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	471 \ 'n ,fs & /^\k\+ (<CR>',
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	472 \ 'n ,f /^\k\+ (<CR>'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	473 \ execute('nmap ,f')->trim()->split("\n"))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	474
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	475 " List <Nop> mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	476 nmap ,n <Nop>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	477 call assert_equal(['n ,n <Nop>'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	478 \ execute('nmap ,n')->trim()->split("\n"))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	479
19178 f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	480 " verbose map
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	481 call assert_match("\tLast set from .*/test_mapping.vim line \\d\\+$",
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	482 \ execute('verbose map ,n')->trim()->split("\n")[1])
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	483
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	484 " map to CTRL-V
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	485 exe "nmap ,k \<C-V>"
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	486 call assert_equal(['n ,k <Nop>'],
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	487 \ execute('nmap ,k')->trim()->split("\n"))
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	488
24914 1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	489 " map with space at the beginning
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	490 exe "nmap \<C-V> w <Nop>"
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	491 call assert_equal(['n <Space>w <Nop>'],
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	492 \ execute("nmap \<C-V> w")->trim()->split("\n"))
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	493
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	494 nmapclear
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 17726 diff changeset	495 endfunc
18689 8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	496
24142 34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	497 func Test_expr_map_gets_cursor()
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	498 new
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	499 call setline(1, ['one', 'some w!rd'])
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	500 func StoreColumn()
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	501 let g:exprLine = line('.')
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	502 let g:exprCol = col('.')
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	503 return 'x'
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	504 endfunc
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	505 nnoremap <expr> x StoreColumn()
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	506 2
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	507 nmap ! f!<Ignore>x
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	508 call feedkeys("!", 'xt')
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	509 call assert_equal('some wrd', getline(2))
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	510 call assert_equal(2, g:exprLine)
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	511 call assert_equal(7, g:exprCol)
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	512
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	513 bwipe!
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	514 unlet g:exprLine
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	515 unlet g:exprCol
24144 dffac5e62db5 patch 8.2.2613: new test throws exception Bram Moolenaar <Bram@vim.org> parents: 24142 diff changeset	516 delfunc StoreColumn
24142 34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	517 nunmap x
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	518 nunmap !
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	519 endfunc
34acfef7f60c patch 8.2.2612: col('.') may get outdated column value Bram Moolenaar <Bram@vim.org> parents: 23031 diff changeset	520
18689 8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	521 func Test_expr_map_restore_cursor()
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	522 CheckScreendump
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	523
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	524 let lines =<< trim END
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	525 call setline(1, ['one', 'two', 'three'])
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	526 2
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	527 set ls=2
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	528 hi! link StatusLine ErrorMsg
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	529 noremap <expr> <C-B> Func()
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	530 func Func()
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	531 let g:on = !get(g:, 'on', 0)
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	532 redraws
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	533 return ''
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	534 endfunc
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	535 func Status()
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	536 return get(g:, 'on', 0) ? '[on]' : ''
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	537 endfunc
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	538 set stl=%{Status()}
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	539 END
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	540 call writefile(lines, 'XtestExprMap')
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	541 let buf = RunVimInTerminal('-S XtestExprMap', #{rows: 10})
19954 c087099e9163 patch 8.2.0533: tests using term_wait() can still be flaky Bram Moolenaar <Bram@vim.org> parents: 19407 diff changeset	542 call TermWait(buf)
18689 8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	543 call term_sendkeys(buf, "\<C-B>")
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	544 call VerifyScreenDump(buf, 'Test_map_expr_1', {})
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	545
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	546 " clean up
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	547 call StopVimInTerminal(buf)
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	548 call delete('XtestExprMap')
8cc12c8d7842 patch 8.1.2336: when an expr mapping moves the cursor it is not restored Bram Moolenaar <Bram@vim.org> parents: 18346 diff changeset	549 endfunc
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	550
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	551 " Test for mapping errors
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	552 func Test_map_error()
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	553 call assert_fails('unmap', 'E474:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	554 call assert_fails("exe 'map ' .. repeat('a', 51) .. ' :ls'", 'E474:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	555 call assert_fails('unmap abc', 'E31:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	556 call assert_fails('unabbr abc', 'E24:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	557 call assert_equal('', maparg(''))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	558 call assert_fails('echo maparg("abc", [])', 'E730:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	559
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	560 " unique map
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	561 map ,w /[#&!]<CR>
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	562 call assert_fails("map <unique> ,w /[#&!]<CR>", 'E227:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	563 " unique buffer-local map
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	564 call assert_fails("map <buffer> <unique> ,w /[.,;]<CR>", 'E225:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	565 unmap ,w
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	566
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	567 " unique abbreviation
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	568 abbr SP special
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	569 call assert_fails("abbr <unique> SP special", 'E226:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	570 " unique buffer-local map
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	571 call assert_fails("abbr <buffer> <unique> SP special", 'E224:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	572 unabbr SP
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	573
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	574 call assert_fails('mapclear abc', 'E474:')
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	575 call assert_fails('abclear abc', 'E474:')
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	576 call assert_fails('abbr $xyz abc', 'E474:')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	577
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	578 " space character in an abbreviation
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	579 call assert_fails('abbr ab<space> ABC', 'E474:')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	580
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	581 " invalid <expr> map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	582 map <expr> ,f abc
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	583 call assert_fails('normal ,f', 'E121:')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	584 unmap <expr> ,f
19370 02111977dd05 patch 8.2.0243: insufficient code coverage for ex_docmd.c functions Bram Moolenaar <Bram@vim.org> parents: 19178 diff changeset	585
02111977dd05 patch 8.2.0243: insufficient code coverage for ex_docmd.c functions Bram Moolenaar <Bram@vim.org> parents: 19178 diff changeset	586 " Recursive use of :normal in a map
02111977dd05 patch 8.2.0243: insufficient code coverage for ex_docmd.c functions Bram Moolenaar <Bram@vim.org> parents: 19178 diff changeset	587 set maxmapdepth=100
02111977dd05 patch 8.2.0243: insufficient code coverage for ex_docmd.c functions Bram Moolenaar <Bram@vim.org> parents: 19178 diff changeset	588 map gq :normal gq<CR>
02111977dd05 patch 8.2.0243: insufficient code coverage for ex_docmd.c functions Bram Moolenaar <Bram@vim.org> parents: 19178 diff changeset	589 call assert_fails('normal gq', 'E192:')
02111977dd05 patch 8.2.0243: insufficient code coverage for ex_docmd.c functions Bram Moolenaar <Bram@vim.org> parents: 19178 diff changeset	590 unmap gq
02111977dd05 patch 8.2.0243: insufficient code coverage for ex_docmd.c functions Bram Moolenaar <Bram@vim.org> parents: 19178 diff changeset	591 set maxmapdepth&
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	592 endfunc
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	593
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	594 " Test for <special> key mapping
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	595 func Test_map_special()
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	596 new
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	597 let old_cpo = &cpo
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	598 set cpo+=<
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	599 imap <F12> Blue
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	600 call feedkeys("i\<F12>", "x")
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	601 call assert_equal("<F12>", getline(1))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	602 call feedkeys("ddi<F12>", "x")
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	603 call assert_equal("Blue", getline(1))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	604 iunmap <F12>
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	605 imap <special> <F12> Green
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	606 call feedkeys("ddi\<F12>", "x")
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	607 call assert_equal("Green", getline(1))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	608 call feedkeys("ddi<F12>", "x")
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	609 call assert_equal("<F12>", getline(1))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	610 iunmap <special> <F12>
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	611 let &cpo = old_cpo
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	612 %bwipe!
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	613 endfunc
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	614
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	615 " Test for hasmapto()
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	616 func Test_hasmapto()
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	617 call assert_equal(0, hasmapto('/^\k\+ ('))
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	618 map ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	619 call assert_equal(1, hasmapto('/^\k\+ ('))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	620 unmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	621
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	622 " Insert mode mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	623 call assert_equal(0, hasmapto('/^\k\+ (', 'i'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	624 imap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	625 call assert_equal(1, hasmapto('/^\k\+ (', 'i'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	626 iunmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	627
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	628 " Normal mode mapping
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	629 call assert_equal(0, hasmapto('/^\k\+ (', 'n'))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	630 nmap ,f /^\k\+ (<CR>
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	631 call assert_equal(1, hasmapto('/^\k\+ ('))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	632 call assert_equal(1, hasmapto('/^\k\+ (', 'n'))
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	633 nunmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	634
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	635 " Visual and Select mode mapping
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	636 call assert_equal(0, hasmapto('/^\k\+ (', 'v'))
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	637 call assert_equal(0, hasmapto('/^\k\+ (', 'x'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	638 call assert_equal(0, hasmapto('/^\k\+ (', 's'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	639 vmap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	640 call assert_equal(1, hasmapto('/^\k\+ (', 'v'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	641 call assert_equal(1, hasmapto('/^\k\+ (', 'x'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	642 call assert_equal(1, hasmapto('/^\k\+ (', 's'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	643 vunmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	644
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	645 " Visual mode mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	646 call assert_equal(0, hasmapto('/^\k\+ (', 'x'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	647 xmap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	648 call assert_equal(1, hasmapto('/^\k\+ (', 'v'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	649 call assert_equal(1, hasmapto('/^\k\+ (', 'x'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	650 call assert_equal(0, hasmapto('/^\k\+ (', 's'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	651 xunmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	652
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	653 " Select mode mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	654 call assert_equal(0, hasmapto('/^\k\+ (', 's'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	655 smap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	656 call assert_equal(1, hasmapto('/^\k\+ (', 'v'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	657 call assert_equal(0, hasmapto('/^\k\+ (', 'x'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	658 call assert_equal(1, hasmapto('/^\k\+ (', 's'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	659 sunmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	660
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	661 " Operator-pending mode mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	662 call assert_equal(0, hasmapto('/^\k\+ (', 'o'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	663 omap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	664 call assert_equal(1, hasmapto('/^\k\+ (', 'o'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	665 ounmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	666
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	667 " Language mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	668 call assert_equal(0, hasmapto('/^\k\+ (', 'l'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	669 lmap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	670 call assert_equal(1, hasmapto('/^\k\+ (', 'l'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	671 lunmap ,f
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	672
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	673 " Cmdline mode mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	674 call assert_equal(0, hasmapto('/^\k\+ (', 'c'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	675 cmap ,f /^\k\+ (<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	676 call assert_equal(1, hasmapto('/^\k\+ (', 'c'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	677 cunmap ,f
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	678
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	679 call assert_equal(0, hasmapto('/^\k\+ (', 'n', 1))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	680 endfunc
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	681
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	682 " Test for command-line completion of maps
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	683 func Test_mapcomplete()
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	684 call assert_equal(['<buffer>', '<expr>', '<nowait>', '<script>',
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	685 \ '<silent>', '<special>', '<unique>'],
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	686 \ getcompletion('', 'mapping'))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	687 call assert_equal([], getcompletion(',d', 'mapping'))
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	688
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	689 call feedkeys(":unmap <buf\<C-A>\<C-B>\"\<CR>", 'tx')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	690 call assert_equal('"unmap <buffer>', @:)
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	691
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	692 call feedkeys(":unabbr <buf\<C-A>\<C-B>\"\<CR>", 'tx')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	693 call assert_equal('"unabbr <buffer>', @:)
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	694
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	695 call feedkeys(":abbr! \<C-A>\<C-B>\"\<CR>", 'tx')
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	696 call assert_equal("\"abbr! \x01", @:)
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	697
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	698 " Multiple matches for a map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	699 nmap ,f /H<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	700 omap ,f /H<CR>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	701 call feedkeys(":map ,\<C-A>\<C-B>\"\<CR>", 'tx')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	702 call assert_equal('"map ,f', @:)
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	703 mapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	704 endfunc
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	705
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	706 " Test for <expr> in abbreviation
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	707 func Test_expr_abbr()
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	708 new
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	709 iabbr <expr> teh "the"
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	710 call feedkeys("iteh ", "tx")
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	711 call assert_equal('the ', getline(1))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	712 iabclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	713 call setline(1, '')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	714
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	715 " invalid <expr> abbreviation
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	716 abbr <expr> hte GetAbbr()
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	717 call assert_fails('normal ihte ', 'E117:')
22742 f7f2d73ff85e patch 8.2.1919: assert_fails() setting emsg_silent changes normal execution Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	718 call assert_equal('', getline(1))
19170 ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	719 unabbr <expr> hte
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	720
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	721 close!
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	722 endfunc
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	723
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	724 " Test for storing mappings in different modes in a vimrc file
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	725 func Test_mkvimrc_mapmodes()
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	726 map a1 /a1
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	727 nmap a2 /a2
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	728 vmap a3 /a3
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	729 smap a4 /a4
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	730 xmap a5 /a5
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	731 omap a6 /a6
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	732 map! a7 /a7
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	733 imap a8 /a8
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	734 lmap a9 /a9
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	735 cmap a10 /a10
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	736 tmap a11 /a11
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	737 " Normal + Visual map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	738 map a12 /a12
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	739 sunmap a12
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	740 ounmap a12
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	741 " Normal + Selectmode map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	742 map a13 /a13
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	743 xunmap a13
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	744 ounmap a13
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	745 " Normal + OpPending map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	746 map a14 /a14
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	747 vunmap a14
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	748 " Visual + Selectmode map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	749 map a15 /a15
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	750 nunmap a15
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	751 ounmap a15
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	752 " Visual + OpPending map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	753 map a16 /a16
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	754 nunmap a16
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	755 sunmap a16
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	756 " Selectmode + OpPending map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	757 map a17 /a17
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	758 nunmap a17
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	759 xunmap a17
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	760 " Normal + Visual + Selectmode map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	761 map a18 /a18
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	762 ounmap a18
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	763 " Normal + Visual + OpPending map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	764 map a19 /a19
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	765 sunmap a19
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	766 " Normal + Selectmode + OpPending map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	767 map a20 /a20
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	768 xunmap a20
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	769 " Visual + Selectmode + OpPending map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	770 map a21 /a21
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	771 nunmap a21
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	772 " Mapping to Nop
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	773 map a22 <Nop>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	774 " Script local mapping
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	775 map <script> a23 /a23
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	776
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	777 " Newline in {lhs} and {rhs} of a map
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	778 exe "map a24\<C-V>\<C-J> ia24\<C-V>\<C-J><Esc>"
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	779
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	780 " Abbreviation
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	781 abbr a25 A25
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	782 cabbr a26 A26
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	783 iabbr a27 A27
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	784
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	785 mkvimrc! Xvimrc
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	786 let l = readfile('Xvimrc')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	787 call assert_equal(['map a1 /a1'], filter(copy(l), 'v:val =~ " a1 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	788 call assert_equal(['nmap a2 /a2'], filter(copy(l), 'v:val =~ " a2 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	789 call assert_equal(['vmap a3 /a3'], filter(copy(l), 'v:val =~ " a3 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	790 call assert_equal(['smap a4 /a4'], filter(copy(l), 'v:val =~ " a4 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	791 call assert_equal(['xmap a5 /a5'], filter(copy(l), 'v:val =~ " a5 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	792 call assert_equal(['omap a6 /a6'], filter(copy(l), 'v:val =~ " a6 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	793 call assert_equal(['map! a7 /a7'], filter(copy(l), 'v:val =~ " a7 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	794 call assert_equal(['imap a8 /a8'], filter(copy(l), 'v:val =~ " a8 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	795 call assert_equal(['lmap a9 /a9'], filter(copy(l), 'v:val =~ " a9 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	796 call assert_equal(['cmap a10 /a10'], filter(copy(l), 'v:val =~ " a10 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	797 call assert_equal(['tmap a11 /a11'], filter(copy(l), 'v:val =~ " a11 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	798 call assert_equal(['nmap a12 /a12', 'xmap a12 /a12'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	799 \ filter(copy(l), 'v:val =~ " a12 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	800 call assert_equal(['nmap a13 /a13', 'smap a13 /a13'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	801 \ filter(copy(l), 'v:val =~ " a13 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	802 call assert_equal(['nmap a14 /a14', 'omap a14 /a14'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	803 \ filter(copy(l), 'v:val =~ " a14 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	804 call assert_equal(['vmap a15 /a15'], filter(copy(l), 'v:val =~ " a15 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	805 call assert_equal(['xmap a16 /a16', 'omap a16 /a16'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	806 \ filter(copy(l), 'v:val =~ " a16 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	807 call assert_equal(['smap a17 /a17', 'omap a17 /a17'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	808 \ filter(copy(l), 'v:val =~ " a17 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	809 call assert_equal(['nmap a18 /a18', 'vmap a18 /a18'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	810 \ filter(copy(l), 'v:val =~ " a18 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	811 call assert_equal(['nmap a19 /a19', 'xmap a19 /a19', 'omap a19 /a19'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	812 \ filter(copy(l), 'v:val =~ " a19 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	813 call assert_equal(['nmap a20 /a20', 'smap a20 /a20', 'omap a20 /a20'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	814 \ filter(copy(l), 'v:val =~ " a20 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	815 call assert_equal(['vmap a21 /a21', 'omap a21 /a21'],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	816 \ filter(copy(l), 'v:val =~ " a21 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	817 call assert_equal(['map a22 <Nop>'], filter(copy(l), 'v:val =~ " a22 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	818 call assert_equal([], filter(copy(l), 'v:val =~ " a23 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	819 call assert_equal(["map a24<NL> ia24<NL>\x16\e"],
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	820 \ filter(copy(l), 'v:val =~ " a24"'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	821
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	822 call assert_equal(['abbr a25 A25'], filter(copy(l), 'v:val =~ " a25 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	823 call assert_equal(['cabbr a26 A26'], filter(copy(l), 'v:val =~ " a26 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	824 call assert_equal(['iabbr a27 A27'], filter(copy(l), 'v:val =~ " a27 "'))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	825 call delete('Xvimrc')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	826
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	827 mapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	828 nmapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	829 vmapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	830 xmapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	831 smapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	832 omapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	833 imapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	834 lmapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	835 cmapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	836 tmapclear
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	837 endfunc
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	838
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	839 " Test for recursive mapping ('maxmapdepth')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	840 func Test_map_recursive()
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	841 map x y
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	842 map y x
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	843 call assert_fails('normal x', 'E223:')
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	844 unmap x
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	845 unmap y
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	846 endfunc
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	847
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	848 " Test for removing an abbreviation using {rhs} and with space after {lhs}
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	849 func Test_abbr_remove()
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	850 abbr foo bar
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	851 let d = maparg('foo', 'i', 1, 1)
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	852 call assert_equal(['foo', 'bar', '!'], [d.lhs, d.rhs, d.mode])
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	853 unabbr bar
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	854 call assert_equal({}, maparg('foo', 'i', 1, 1))
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	855
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	856 abbr foo bar
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	857 unabbr foo<space><tab>
ad40333f2ec0 patch 8.2.0144: some mapping code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 19149 diff changeset	858 call assert_equal({}, maparg('foo', 'i', 1, 1))
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	859 endfunc
643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	860
19178 f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	861 " Trigger an abbreviation using a special key
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	862 func Test_abbr_trigger_special()
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	863 new
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	864 iabbr teh the
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	865 call feedkeys("iteh\<F2>\<Esc>", 'xt')
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	866 call assert_equal('the<F2>', getline(1))
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	867 iunab teh
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	868 close!
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	869 endfunc
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	870
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	871 " Test for '<' in 'cpoptions'
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	872 func Test_map_cpo_special_keycode()
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	873 set cpo-=<
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	874 imap x<Bslash>k Test
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	875 let d = maparg('x<Bslash>k', 'i', 0, 1)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	876 call assert_equal(['x\k', 'Test', 'i'], [d.lhs, d.rhs, d.mode])
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	877 call feedkeys(":imap x\<C-A>\<C-B>\"\<CR>", 'tx')
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	878 call assert_equal('"imap x\k', @:)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	879 iunmap x<Bslash>k
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	880 set cpo+=<
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	881 imap x<Bslash>k Test
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	882 let d = maparg('x<Bslash>k', 'i', 0, 1)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	883 call assert_equal(['x<Bslash>k', 'Test', 'i'], [d.lhs, d.rhs, d.mode])
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	884 call feedkeys(":imap x\<C-A>\<C-B>\"\<CR>", 'tx')
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	885 call assert_equal('"imap x<Bslash>k', @:)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	886 iunmap x<Bslash>k
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	887 set cpo-=<
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	888 " Modifying 'cpo' above adds some default mappings, remove them
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	889 mapclear
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	890 mapclear!
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	891 endfunc
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19170 diff changeset	892
22862 6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	893 " Test for <Cmd> key in maps to execute commands
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	894 func Test_map_cmdkey()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	895 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	896
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	897 " Error cases
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	898 let x = 0
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	899 noremap <F3> <Cmd><Cmd>let x = 1<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	900 call assert_fails('call feedkeys("\<F3>", "xt")', 'E1136:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	901 call assert_equal(0, x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	902
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	903 noremap <F3> <Cmd><F3>let x = 2<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	904 call assert_fails('call feedkeys("\<F3>", "xt")', 'E1137:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	905 call assert_equal(0, x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	906
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	907 noremap <F3> <Cmd>let x = 3
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	908 call assert_fails('call feedkeys("\<F3>", "xt!")', 'E1135:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	909 call assert_equal(0, x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	910
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	911 " works in various modes and sees the correct mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	912 noremap <F3> <Cmd>let m = mode(1)<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	913 noremap! <F3> <Cmd>let m = mode(1)<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	914
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	915 " normal mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	916 call feedkeys("\<F3>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	917 call assert_equal('n', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	918
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	919 " visual mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	920 call feedkeys("v\<F3>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	921 call assert_equal('v', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	922 " shouldn't leave the visual mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	923 call assert_equal('v', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	924 call feedkeys("\<Esc>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	925 call assert_equal('n', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	926
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	927 " visual mapping in select mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	928 call feedkeys("gh\<F3>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	929 call assert_equal('v', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	930 " shouldn't leave select mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	931 call assert_equal('s', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	932 call feedkeys("\<Esc>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	933 call assert_equal('n', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	934
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	935 " select mode mapping
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	936 snoremap <F3> <Cmd>let m = mode(1)<cr>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	937 call feedkeys("gh\<F3>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	938 call assert_equal('s', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	939 " shouldn't leave select mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	940 call assert_equal('s', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	941 call feedkeys("\<Esc>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	942 call assert_equal('n', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	943
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	944 " operator-pending mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	945 call feedkeys("d\<F3>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	946 call assert_equal('no', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	947 " leaves the operator-pending mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	948 call assert_equal('n', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	949
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	950 " insert mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	951 call feedkeys("i\<F3>abc", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	952 call assert_equal('i', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	953 call assert_equal('abc', getline('.'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	954
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	955 " replace mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	956 call feedkeys("0R\<F3>two", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	957 call assert_equal('R', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	958 call assert_equal('two', getline('.'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	959
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	960 " virtual replace mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	961 call setline('.', "one\ttwo")
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	962 call feedkeys("4\|gR\<F3>xxx", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	963 call assert_equal('Rv', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	964 call assert_equal("onexxx\ttwo", getline('.'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	965
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	966 " cmdline mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	967 call feedkeys(":\<F3>\"xxx\<CR>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	968 call assert_equal('c', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	969 call assert_equal('"xxx', @:)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	970
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	971 " terminal mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	972 if CanRunVimInTerminal()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	973 tnoremap <F3> <Cmd>let m = mode(1)<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	974 let buf = Run_shell_in_terminal({})
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	975 call feedkeys("\<F3>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	976 call assert_equal('t', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	977 call assert_equal('t', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	978 call StopShellInTerminal(buf)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	979 call TermWait(buf)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	980 close!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	981 tunmap <F3>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	982 endif
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	983
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	984 " invoke cmdline mode recursively
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	985 noremap! <F2> <Cmd>norm! :foo<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	986 %d
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	987 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	988 call feedkeys(":bar\<F2>x\<C-B>\"\r", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	989 call assert_equal('"barx', @:)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	990 unmap! <F2>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	991
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	992 " test for calling a <SID> function
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	993 let lines =<< trim END
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	994 map <F2> <Cmd>call <SID>do_it()<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	995 func s:do_it()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	996 let g:x = 32
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	997 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	998 END
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	999 call writefile(lines, 'Xscript')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1000 source Xscript
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1001 call feedkeys("\<F2>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1002 call assert_equal(32, g:x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1003 call delete('Xscript')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1004
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1005 unmap <F3>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1006 unmap! <F3>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1007 %bw!
23031 b68313ee7002 patch 8.2.2062: <Cmd> does not handle CTRL-V Bram Moolenaar <Bram@vim.org> parents: 22916 diff changeset	1008
b68313ee7002 patch 8.2.2062: <Cmd> does not handle CTRL-V Bram Moolenaar <Bram@vim.org> parents: 22916 diff changeset	1009 " command line ending in "0" is handled without errors
b68313ee7002 patch 8.2.2062: <Cmd> does not handle CTRL-V Bram Moolenaar <Bram@vim.org> parents: 22916 diff changeset	1010 onoremap ix <cmd>eval 0<cr>
b68313ee7002 patch 8.2.2062: <Cmd> does not handle CTRL-V Bram Moolenaar <Bram@vim.org> parents: 22916 diff changeset	1011 call feedkeys('dix.', 'xt')
b68313ee7002 patch 8.2.2062: <Cmd> does not handle CTRL-V Bram Moolenaar <Bram@vim.org> parents: 22916 diff changeset	1012 ounmap ix
22862 6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1013 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1014
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1015 " text object enters visual mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1016 func TextObj()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1017 if mode() !=# "v"
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1018 normal! v
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1019 end
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1020 call cursor(1, 3)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1021 normal! o
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1022 call cursor(2, 4)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1023 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1024
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1025 func s:cmdmap(lhs, rhs)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1026 exe 'noremap ' .. a:lhs .. ' <Cmd>' .. a:rhs .. '<CR>'
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1027 exe 'noremap! ' .. a:lhs .. ' <Cmd>' .. a:rhs .. '<CR>'
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1028 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1029
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1030 func s:cmdunmap(lhs)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1031 exe 'unmap ' .. a:lhs
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1032 exe 'unmap! ' .. a:lhs
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1033 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1034
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1035 " Map various <Fx> keys used by the <Cmd> key tests
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1036 func s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1037 call s:cmdmap('<F3>', 'let m = mode(1)')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1038 call s:cmdmap('<F4>', 'normal! ww')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1039 call s:cmdmap('<F5>', 'normal! "ay')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1040 call s:cmdmap('<F6>', 'throw "very error"')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1041 call s:cmdmap('<F7>', 'call TextObj()')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1042 call s:cmdmap('<F8>', 'startinsert')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1043 call s:cmdmap('<F9>', 'stopinsert')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1044 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1045
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1046 " Remove the mappings setup by setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1047 func s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1048 call s:cmdunmap('<F3>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1049 call s:cmdunmap('<F4>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1050 call s:cmdunmap('<F5>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1051 call s:cmdunmap('<F6>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1052 call s:cmdunmap('<F7>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1053 call s:cmdunmap('<F8>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1054 call s:cmdunmap('<F9>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1055 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1056
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1057 " Test for <Cmd> mapping in normal mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1058 func Test_map_cmdkey_normal_mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1059 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1060 call s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1061
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1062 " check v:count and v:register works
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1063 call s:cmdmap('<F2>', 'let s = [mode(1), v:count, v:register]')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1064 call feedkeys("\<F2>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1065 call assert_equal(['n', 0, '"'], s)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1066 call feedkeys("7\<F2>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1067 call assert_equal(['n', 7, '"'], s)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1068 call feedkeys("\"e\<F2>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1069 call assert_equal(['n', 0, 'e'], s)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1070 call feedkeys("5\"k\<F2>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1071 call assert_equal(['n', 5, 'k'], s)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1072 call s:cmdunmap('<F2>')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1073
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1074 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1075 call feedkeys("\<F7>y", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1076 call assert_equal("me short lines\nof t", @")
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1077 call assert_equal('v', getregtype('"'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1078 call assert_equal([0, 1, 3, 0], getpos("'<"))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1079 call assert_equal([0, 2, 4, 0], getpos("'>"))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1080
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1081 " startinsert
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1082 %d
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1083 call feedkeys("\<F8>abc", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1084 call assert_equal('abc', getline(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1085
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1086 " feedkeys are not executed immediately
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1087 noremap ,a <Cmd>call feedkeys("aalpha") \\| let g:a = getline(2)<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1088 %d
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1089 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1090 call cursor(2, 3)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1091 call feedkeys(",a\<F3>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1092 call assert_equal('of test text', g:a)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1093 call assert_equal('n', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1094 call assert_equal(['some short lines', 'of alphatest text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1095 nunmap ,a
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1096
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1097 " feedkeys(..., 'x') is executed immediately, but insert mode is aborted
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1098 noremap ,b <Cmd>call feedkeys("abeta", 'x') \\| let g:b = getline(2)<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1099 call feedkeys(",b\<F3>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1100 call assert_equal('n', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1101 call assert_equal('of alphabetatest text', g:b)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1102 nunmap ,b
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1103
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1104 call s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1105 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1106 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1107
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1108 " Test for <Cmd> mapping with the :normal command
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1109 func Test_map_cmdkey_normal_cmd()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1110 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1111 noremap ,x <Cmd>call append(1, "xx") \\| call append(1, "aa")<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1112 noremap ,f <Cmd>nosuchcommand<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1113 noremap ,e <Cmd>throw "very error" \\| call append(1, "yy")<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1114 noremap ,m <Cmd>echoerr "The message." \\| call append(1, "zz")<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1115 noremap ,w <Cmd>for i in range(5) \\| if i==1 \\| echoerr "Err" \\| endif \\| call append(1, i) \\| endfor<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1116
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1117 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1118 exe "norm ,x\r"
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1119 call assert_equal(['some short lines', 'aa', 'xx', 'of test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1120
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1121 call assert_fails('norm ,f', 'E492:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1122 call assert_fails('norm ,e', 'very error')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1123 call assert_fails('norm ,m', 'The message.')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1124 call assert_equal(['some short lines', 'aa', 'xx', 'of test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1125
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1126 %d
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1127 let caught_err = 0
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1128 try
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1129 exe "normal ,w"
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1130 catch /Vim(echoerr):Err/
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1131 let caught_err = 1
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1132 endtry
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1133 call assert_equal(1, caught_err)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1134 call assert_equal(['', '0'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1135
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1136 %d
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1137 call assert_fails('normal ,w', 'Err')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1138 call assert_equal(['', '4', '3', '2' ,'1', '0'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1139 call assert_equal(1, line('.'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1140
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1141 nunmap ,x
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1142 nunmap ,f
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1143 nunmap ,e
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1144 nunmap ,m
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1145 nunmap ,w
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1146 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1147 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1148
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1149 " Test for <Cmd> mapping in visual mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1150 func Test_map_cmdkey_visual_mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1151 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1152 set showmode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1153 call s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1154
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1155 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1156 call feedkeys("v\<F4>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1157 call assert_equal(['v', 1, 12], [mode(1), col('v'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1158
25969 a5a772dace5b patch 8.2.3518: Test_xrestore sometimes fails Bram Moolenaar <Bram@vim.org> parents: 24914 diff changeset	1159 " can invoke an operator, ending the visual mode
22862 6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1160 let @a = ''
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1161 call feedkeys("\<F5>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1162 call assert_equal('n', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1163 call assert_equal('some short l', @a)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1164
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1165 " error doesn't interrupt visual mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1166 call assert_fails('call feedkeys("ggvw\<F6>", "xt!")', 'E605:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1167 call assert_equal(['v', 1, 6], [mode(1), col('v'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1168 call feedkeys("\<F7>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1169 call assert_equal(['v', 1, 3, 2, 4], [mode(1), line('v'), col('v'), line('.'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1170
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1171 " startinsert gives "-- (insert) VISUAL --" mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1172 call feedkeys("\<F8>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1173 call assert_equal(['v', 1, 3, 2, 4], [mode(1), line('v'), col('v'), line('.'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1174 redraw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1175 call assert_match('^-- (insert) VISUAL --', Screenline(&lines))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1176 call feedkeys("\<Esc>new ", 'x')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1177 call assert_equal(['some short lines', 'of new test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1178
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1179 call s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1180 set showmode&
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1181 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1182 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1183
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1184 " Test for <Cmd> mapping in select mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1185 func Test_map_cmdkey_select_mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1186 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1187 set showmode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1188 call s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1189
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1190 snoremap <F1> <cmd>throw "very error"<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1191 snoremap <F2> <cmd>normal! <c-g>"by<CR>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1192 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1193
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1194 call feedkeys("gh\<F4>", "xt!")
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1195 call assert_equal(['s', 1, 12], [mode(1), col('v'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1196 redraw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1197 call assert_match('^-- SELECT --', Screenline(&lines))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1198
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1199 " visual mapping in select mode restarts select mode after operator
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1200 let @a = ''
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1201 call feedkeys("\<F5>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1202 call assert_equal('s', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1203 call assert_equal('some short l', @a)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1204
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1205 " select mode mapping works, and does not restart select mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1206 let @b = ''
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1207 call feedkeys("\<F2>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1208 call assert_equal('n', mode(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1209 call assert_equal('some short l', @b)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1210
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1211 " error doesn't interrupt temporary visual mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1212 call assert_fails('call feedkeys("\<Esc>ggvw\<C-G>\<F6>", "xt!")', 'E605:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1213 redraw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1214 call assert_match('^-- VISUAL --', Screenline(&lines))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1215 " quirk: restoration of select mode is not performed
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1216 call assert_equal(['v', 1, 6], [mode(1), col('v'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1217
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1218 " error doesn't interrupt select mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1219 call assert_fails('call feedkeys("\<Esc>ggvw\<C-G>\<F1>", "xt!")', 'E605:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1220 redraw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1221 call assert_match('^-- SELECT --', Screenline(&lines))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1222 call assert_equal(['s', 1, 6], [mode(1), col('v'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1223
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1224 call feedkeys("\<F7>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1225 redraw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1226 call assert_match('^-- SELECT --', Screenline(&lines))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1227 call assert_equal(['s', 1, 3, 2, 4], [mode(1), line('v'), col('v'), line('.'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1228
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1229 " startinsert gives "-- SELECT (insert) --" mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1230 call feedkeys("\<F8>", 'xt!')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1231 redraw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1232 call assert_match('^-- (insert) SELECT --', Screenline(&lines))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1233 call assert_equal(['s', 1, 3, 2, 4], [mode(1), line('v'), col('v'), line('.'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1234 call feedkeys("\<Esc>new ", 'x')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1235 call assert_equal(['some short lines', 'of new test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1236
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1237 sunmap <F1>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1238 sunmap <F2>
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1239 call s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1240 set showmode&
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1241 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1242 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1243
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1244 " Test for <Cmd> mapping in operator-pending mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1245 func Test_map_cmdkey_op_pending_mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1246 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1247 call s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1248
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1249 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1250 call feedkeys("d\<F4>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1251 call assert_equal(['lines', 'of test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1252 call assert_equal(['some short '], getreg('"', 1, 1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1253 " create a new undo point
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1254 let &undolevels = &undolevels
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1255
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1256 call feedkeys(".", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1257 call assert_equal(['test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1258 call assert_equal(['lines', 'of '], getreg('"', 1, 1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1259 " create a new undo point
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1260 let &undolevels = &undolevels
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1261
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1262 call feedkeys("uu", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1263 call assert_equal(['some short lines', 'of test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1264
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1265 " error aborts operator-pending, operator not performed
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1266 call assert_fails('call feedkeys("d\<F6>", "xt")', 'E605:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1267 call assert_equal(['some short lines', 'of test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1268
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1269 call feedkeys("\"bd\<F7>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1270 call assert_equal(['soest text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1271 call assert_equal(['me short lines', 'of t'], getreg('b', 1, 1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1272
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1273 " startinsert aborts operator
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1274 call feedkeys("d\<F8>cc", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1275 call assert_equal(['soccest text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1276
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1277 call s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1278 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1279 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1280
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1281 " Test for <Cmd> mapping in insert mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1282 func Test_map_cmdkey_insert_mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1283 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1284 call s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1285
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1286 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1287 " works the same as <C-O>w<C-O>w
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1288 call feedkeys("iindeed \<F4>little ", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1289 call assert_equal(['indeed some short little lines', 'of test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1290 call assert_fails('call feedkeys("i\<F6> 2", "xt")', 'E605:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1291 call assert_equal(['indeed some short little 2 lines', 'of test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1292
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1293 " Note when entering visual mode from InsertEnter autocmd, an async event,
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1294 " or a <Cmd> mapping, vim ends up in undocumented "INSERT VISUAL" mode.
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1295 call feedkeys("i\<F7>stuff ", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1296 call assert_equal(['indeed some short little 2 lines', 'of stuff test text'], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1297 call assert_equal(['v', 1, 3, 2, 9], [mode(1), line('v'), col('v'), line('.'), col('.')])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1298
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1299 call feedkeys("\<F5>", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1300 call assert_equal(['deed some short little 2 lines', 'of stuff '], getreg('a', 1, 1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1301
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1302 " also works as part of abbreviation
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1303 abbr foo <Cmd>let g:y = 17<CR>bar
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1304 exe "normal i\<space>foo "
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1305 call assert_equal(17, g:y)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1306 call assert_equal('in bar deed some short little 2 lines', getline(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1307 unabbr foo
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1308
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1309 " :startinsert does nothing
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1310 call setline(1, 'foo bar')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1311 call feedkeys("ggi\<F8>vim", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1312 call assert_equal('vimfoo bar', getline(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1313
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1314 " :stopinsert works
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1315 call feedkeys("ggi\<F9>Abc", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1316 call assert_equal('vimfoo barbc', getline(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1317
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1318 call s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1319 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1320 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1321
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1322 " Test for <Cmd> mapping in insert-completion mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1323 func Test_map_cmdkey_insert_complete_mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1324 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1325 call s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1326
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1327 call setline(1, 'some short lines')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1328 call feedkeys("os\<C-X>\<C-N>\<F3>\<C-N> ", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1329 call assert_equal('ic', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1330 call assert_equal(['some short lines', 'short '], getline(1, '$'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1331
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1332 call s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1333 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1334 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1335
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1336 " Test for <Cmd> mapping in cmdline mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1337 func Test_map_cmdkey_cmdline_mode()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1338 new
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1339 call s:setupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1340
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1341 call setline(1, ['some short lines', 'of test text'])
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1342 let x = 0
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1343 call feedkeys(":let x\<F3>= 10\r", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1344 call assert_equal('c', m)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1345 call assert_equal(10, x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1346
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1347 " exception doesn't leave cmdline mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1348 call assert_fails('call feedkeys(":let x\<F6>= 20\r", "xt")', 'E605:')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1349 call assert_equal(20, x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1350
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1351 " move cursor in the buffer from cmdline mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1352 call feedkeys(":let x\<F4>= 30\r", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1353 call assert_equal(30, x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1354 call assert_equal(12, col('.'))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1355
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1356 " :startinsert takes effect after leaving cmdline mode
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1357 call feedkeys(":let x\<F8>= 40\rnew ", 'xt')
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1358 call assert_equal(40, x)
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1359 call assert_equal('some short new lines', getline(1))
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1360
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1361 call s:cleanupMaps()
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1362 %bw!
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1363 endfunc
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated Bram Moolenaar <Bram@vim.org> parents: 22742 diff changeset	1364
22916 1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1365 func Test_map_cmdkey_redo()
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1366 func SelectDash()
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1367 call search('^---\n\zs', 'bcW')
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1368 norm! V
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1369 call search('\n\ze---$', 'W')
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1370 endfunc
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1371
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1372 let text =<< trim END
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1373 ---
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1374 aaa
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1375 ---
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1376 bbb
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1377 bbb
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1378 ---
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1379 ccc
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1380 ccc
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1381 ccc
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1382 ---
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1383 END
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1384 new Xcmdtext
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1385 call setline(1, text)
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1386
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1387 onoremap <silent> i- <Cmd>call SelectDash()<CR>
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1388 call feedkeys('2Gdi-', 'xt')
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1389 call assert_equal(['---', '---'], getline(1, 2))
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1390 call feedkeys('j.', 'xt')
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1391 call assert_equal(['---', '---', '---'], getline(1, 3))
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1392 call feedkeys('j.', 'xt')
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1393 call assert_equal(['---', '---', '---', '---'], getline(1, 4))
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1394
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1395 bwipe!
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1396 call delete('Xcmdtext')
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1397 delfunc SelectDash
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1398 ounmap i-
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1399 endfunc
1fe53aae3ba0 patch 8.2.2005: redoing a mapping with <Cmd> doesn't work properly Bram Moolenaar <Bram@vim.org> parents: 22862 diff changeset	1400
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1401 " Test for using <script> with a map to remap characters in rhs
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1402 func Test_script_local_remap()
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1403 new
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1404 inoremap <buffer> <SID>xyz mno
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1405 inoremap <buffer> <script> abc st<SID>xyzre
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1406 normal iabc
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1407 call assert_equal('stmnore', getline(1))
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1408 bwipe!
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1409 endfunc
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24144 diff changeset	1410
24559 839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1411 func Test_abbreviate_multi_byte()
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1412 new
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1413 iabbrev foo bar
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1414 call feedkeys("ifoo…\<Esc>", 'xt')
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1415 call assert_equal("bar…", getline(1))
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1416 iunabbrev foo
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1417 bwipe!
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1418 endfunc
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	1419
24914 1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1420 " Test for abbreviations with 'latin1' encoding
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1421 func Test_abbreviate_latin1_encoding()
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1422 set encoding=latin1
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1423 call assert_fails('abbr ab#$c ABC', 'E474:')
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1424 new
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1425 iabbr <buffer> #i #include
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1426 iabbr <buffer> ## #enddef
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1427 exe "normal i#i\<C-]>"
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1428 call assert_equal('#include', getline(1))
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1429 exe "normal 0Di##\<C-]>"
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1430 call assert_equal('#enddef', getline(1))
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1431 %bw!
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1432 set encoding=utf-8
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1433 endfunc
1186160ecf57 patch 8.2.2994: various code is not fully tested Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1434
19149 643c6c3c0da4 patch 8.2.0134: some map functionality not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18689 diff changeset	1435 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_mapping.vim @ 26356:0884f2be6c2a v8.2.3709