vim: src/testdir/test_edit.vim annotate

annotate src/testdir/test_edit.vim @ 26743:c2c40cefc17b v8.2.3900

patch 8.2.3900: it is not easy to use a script-local function for an option Commit: https://github.com/vim/vim/commit/8bb65f230d3025037f34021a72616038da0601ee Author: Yegappan Lakshmanan <yegappan@yahoo.com> Date: Sun Dec 26 10:51:39 2021 +0000 patch 8.2.3900: it is not easy to use a script-local function for an option Problem: It is not easy to use a script-local function for an option. Solution: recognize s: and <SID> at the start of the expression. (Yegappan Lakshmanan, closes #9401)

author	Bram Moolenaar <Bram@vim.org>
date	Sun, 26 Dec 2021 12:00:04 +0100
parents	9f445e07f766
children	b975b7c16ba1

rev	line source
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Test for edit functions
18538 c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	2
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	3 if exists("+t_kD")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	4 let &t_kD="[3;*~"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	5 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	6
18538 c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	7 source check.vim
c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	8
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	9 " Needed for testing basic rightleft: Test_edit_rightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	10 source view_util.vim
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	11
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	12 " Needs to come first until the bug in getchar() is
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	13 " fixed: https://groups.google.com/d/msg/vim_dev/fXL9yme4H4c/bOR-U6_bAQAJ
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	14 func Test_edit_00b()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	15 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	16 call setline(1, ['abc '])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	17 inoreabbr <buffer> h here some more
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	18 call cursor(1, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	19 " <c-l> expands the abbreviation and ends insertmode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	20 call feedkeys(":set im\<cr> h\<c-l>:set noim\<cr>", 'tix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	21 call assert_equal(['abc here some more '], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	22 iunabbr <buffer> h
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	23 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	24 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	25
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	26 func Test_edit_01()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	27 " set for Travis CI?
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	28 " set nocp noesckeys
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	29 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	30 " 1) empty buffer
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	31 call assert_equal([''], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	32 " 2) delete in an empty line
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	33 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	34 call assert_equal([''], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	35 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	36 " 3) delete one character
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	37 call setline(1, 'a')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	38 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	39 call assert_equal([''], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	40 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	41 " 4) delete a multibyte character
15607 2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	42 call setline(1, "\u0401")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	43 call feedkeys("i\<del>\<esc>", 'tnix')
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	44 call assert_equal([''], getline(1,'$'))
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	45 %d
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	46 " 5.1) delete linebreak with 'bs' option containing eol
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	47 let _bs=&bs
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	48 set bs=eol
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	49 call setline(1, ["abc def", "ghi jkl"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	50 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	51 call feedkeys("A\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	52 call assert_equal(['abc defghi jkl'], getline(1, 2))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	53 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	54 " 5.2) delete linebreak with backspace option w/out eol
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	55 set bs=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	56 call setline(1, ["abc def", "ghi jkl"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	57 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	58 call feedkeys("A\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	59 call assert_equal(["abc def", "ghi jkl"], getline(1, 2))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	60 let &bs=_bs
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	61 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	62 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	63
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	64 func Test_edit_02()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	65 " Change cursor position in InsertCharPre command
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	66 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	67 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	68 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	69 fu! DoIt(...)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	70 call cursor(1, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	71 if len(a:000)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	72 let v:char=a:1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	73 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	74 endfu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	75 au InsertCharPre <buffer> :call DoIt('y')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	76 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	77 call assert_equal(['abcy'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	78 " Setting <Enter> in InsertCharPre
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	79 au! InsertCharPre <buffer> :call DoIt("\n")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	80 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	81 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	82 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	83 call assert_equal(['abc', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	84 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	85 au! InsertCharPre
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	86 " Change cursor position in InsertEnter command
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	87 " 1) when setting v:char, keeps changed cursor position
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	88 au! InsertEnter <buffer> :call DoIt('y')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	89 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	90 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	91 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	92 call assert_equal(['abxc'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	93 " 2) when not setting v:char, restores changed cursor position
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	94 au! InsertEnter <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	95 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	96 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	97 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	98 call assert_equal(['xabc'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	99 au! InsertEnter
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	100 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	101 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	102 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	103
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	104 func Test_edit_03()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	105 " Change cursor after <c-o> command to end of line
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	106 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	107 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	108 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	109 call feedkeys("i\<c-o>$y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	110 call assert_equal(['abcy'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	111 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	112 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	113 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	114 call feedkeys("i\<c-o>80\|y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	115 call assert_equal(['abcy'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	116 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	117 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	118 call feedkeys("Ad\<c-o>:s/$/efg/\<cr>hij", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	119 call assert_equal(['hijabcdefg'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	120 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	121 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	122
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	123 func Test_edit_04()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	124 " test for :stopinsert
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	125 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	126 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	127 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	128 call feedkeys("i\<c-o>:stopinsert\<cr>$", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	129 call feedkeys("aX\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	130 call assert_equal(['abcX'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	131 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	132 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	133 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	134
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	135 func Test_edit_05()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	136 " test for folds being opened
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	137 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	138 call setline(1, ['abcX', 'abcX', 'zzzZ'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	139 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	140 set foldmethod=manual foldopen+=insert
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	141 " create fold for those two lines
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	142 norm! Vjzf
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	143 call feedkeys("$ay\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	144 call assert_equal(['abcXy', 'abcX', 'zzzZ'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	145 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	146 call setline(1, ['abcX', 'abcX', 'zzzZ'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	147 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	148 set foldmethod=manual foldopen-=insert
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	149 " create fold for those two lines
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	150 norm! Vjzf
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	151 call feedkeys("$ay\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	152 call assert_equal(['abcXy', 'abcX', 'zzzZ'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	153 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	154 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	155 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	156
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	157 func Test_edit_06()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	158 " Test in diff mode
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	159 CheckFeature diff
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	160 CheckExecutable diff
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	161 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	162 call setline(1, ['abc', 'xxx', 'yyy'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	163 vnew
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	164 call setline(1, ['abc', 'zzz', 'xxx', 'yyy'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	165 wincmd p
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	166 diffthis
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	167 wincmd p
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	168 diffthis
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	169 wincmd p
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	170 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	171 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	172 call feedkeys("Ozzz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	173 call assert_equal(['abc', 'zzz', 'xxx', 'yyy'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	174 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	175 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	176 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	177
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	178 func Test_edit_07()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	179 " 1) Test with completion <c-l> when popupmenu is visible
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	180 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	181 call setline(1, 'J')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	182
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	183 func! ListMonths()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	184 call complete(col('.')-1, ['January', 'February', 'March',
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	185 \ 'April', 'May', 'June', 'July', 'August', 'September',
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	186 \ 'October', 'November', 'December'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	187 return ''
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	188 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	189 inoremap <buffer> <F5> <C-R>=ListMonths()<CR>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	190
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	191 call feedkeys("A\<f5>\<c-p>". repeat("\<down>", 6)."\<c-l>\<down>\<c-l>\<cr>", 'tx')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	192 call assert_equal(['July'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	193 " 1) Test completion when InsertCharPre kicks in
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	194 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	195 call setline(1, 'J')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	196 fu! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	197 if v:char=='u'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	198 let v:char='an'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	199 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	200 endfu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	201 au InsertCharPre <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	202 call feedkeys("A\<f5>\<c-p>u\<cr>\<c-l>\<cr>", 'tx')
17857 4935244c1128 patch 8.1.1925: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16692 diff changeset	203 call assert_equal(["Jan\<c-l>",''], 1->getline('$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	204 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	205 call setline(1, 'J')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	206 call feedkeys("A\<f5>\<c-p>u\<down>\<c-l>\<cr>", 'tx')
17857 4935244c1128 patch 8.1.1925: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16692 diff changeset	207 call assert_equal(["January"], 1->getline('$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	208
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	209 delfu ListMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	210 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	211 iunmap <buffer> <f5>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	212 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	213 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	214
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	215 func Test_edit_08()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	216 " reset insertmode from i_ctrl-r_=
12696 6daad7ef16be patch 8.0.1226: edit and popup tests failing Christian Brabandt <cb@256bit.org> parents: 12654 diff changeset	217 let g:bufnr = bufnr('%')
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	218 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	219 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	220 call cursor(1, 4)
12696 6daad7ef16be patch 8.0.1226: edit and popup tests failing Christian Brabandt <cb@256bit.org> parents: 12654 diff changeset	221 call feedkeys(":set im\<cr>ZZZ\<c-r>=setbufvar(g:bufnr,'&im', 0)\<cr>",'tnix')
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	222 call assert_equal(['abZZZc'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	223 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	224 call assert_false(0, '&im')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	225 bw!
12696 6daad7ef16be patch 8.0.1226: edit and popup tests failing Christian Brabandt <cb@256bit.org> parents: 12654 diff changeset	226 unlet g:bufnr
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	227 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	228
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	229 func Test_edit_09()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	230 " test i_CTRL-\ combinations
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	231 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	232 call setline(1, ['abc', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	233 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	234 " 1) CTRL-\ CTLR-N
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	235 call feedkeys(":set im\<cr>\<c-\>\<c-n>ccABC\<c-l>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	236 call assert_equal(['ABC', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	237 call setline(1, ['ABC', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	238 " 2) CTRL-\ CTLR-G
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	239 call feedkeys("j0\<c-\>\<c-g>ZZZ\<cr>\<c-l>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	240 call assert_equal(['ABC', 'ZZZ', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	241 call feedkeys("I\<c-\>\<c-g>YYY\<c-l>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	242 call assert_equal(['ABC', 'ZZZ', 'YYYdef', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	243 set noinsertmode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	244 " 3) CTRL-\ CTRL-O
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	245 call setline(1, ['ABC', 'ZZZ', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	246 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	247 call feedkeys("A\<c-o>ix", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	248 call assert_equal(['ABxC', 'ZZZ', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	249 call feedkeys("A\<c-\>\<c-o>ix", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	250 call assert_equal(['ABxCx', 'ZZZ', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	251 " 4) CTRL-\ a (should be inserted literally, not special after <c-\>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	252 call setline(1, ['ABC', 'ZZZ', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	253 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	254 call feedkeys("A\<c-\>a", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	255 call assert_equal(["ABC\<c-\>a", 'ZZZ', 'def', 'ghi'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	256 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	257 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	258
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	259 func Test_edit_11()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	260 " Test that indenting kicks in
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	261 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	262 set cindent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	263 call setline(1, ['{', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	264 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	265 call feedkeys("i\<c-f>int c;\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	266 call cursor(3, 1)
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	267 call feedkeys("\<Insert>/* comment */", 'tnix')
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	268 call assert_equal(['{', "\<tab>int c;", "/* comment */"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	269 " added changed cindentkeys slightly
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	270 set cindent cinkeys+=*/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	271 call setline(1, ['{', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	272 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	273 call feedkeys("i\<c-f>int c;\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	274 call cursor(3, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	275 call feedkeys("i/* comment */", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	276 call assert_equal(['{', "\<tab>int c;", "\<tab>/* comment */"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	277 set cindent cinkeys+==end
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	278 call feedkeys("oend\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	279 call assert_equal(['{', "\<tab>int c;", "\<tab>/* comment */", "\tend", ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	280 set cinkeys-==end
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	281 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	282 " Use indentexpr instead of cindenting
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	283 func! Do_Indent()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	284 if v:lnum == 3
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	285 return 3*shiftwidth()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	286 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	287 return 2*shiftwidth()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	288 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	289 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	290 setl indentexpr=Do_Indent() indentkeys+=*/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	291 call setline(1, ['{', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	292 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	293 call feedkeys("i\<c-f>int c;\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	294 call cursor(3, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	295 call feedkeys("i/* comment */", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	296 call assert_equal(['{', "\<tab>\<tab>int c;", "\<tab>\<tab>\<tab>/* comment */"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	297 set cinkeys&vim indentkeys&vim
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	298 set nocindent indentexpr=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	299 delfu Do_Indent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	300 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	301 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	302
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	303 func Test_edit_11_indentexpr()
12551 a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	304 " Test that indenting kicks in
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	305 new
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	306 " Use indentexpr instead of cindenting
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	307 func! Do_Indent()
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	308 let pline=prevnonblank(v:lnum)
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	309 if empty(getline(v:lnum))
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	310 if getline(pline) =~ 'if\\|then'
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	311 return shiftwidth()
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	312 else
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	313 return 0
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	314 endif
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	315 else
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	316 return 0
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	317 endif
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	318 endfunc
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	319 setl indentexpr=Do_Indent() indentkeys+=0=then,0=fi
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	320 call setline(1, ['if [ $this ]'])
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	321 call cursor(1, 1)
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	322 call feedkeys("othen\<cr>that\<cr>fi", 'tnix')
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	323 call assert_equal(['if [ $this ]', "then", "\<tab>that", "fi"], getline(1, '$'))
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	324 set cinkeys&vim indentkeys&vim
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	325 set nocindent indentexpr=
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	326 delfu Do_Indent
26743 c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	327
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	328 " Using a script-local function
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	329 func s:NewIndentExpr()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	330 endfunc
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	331 set indentexpr=s:NewIndentExpr()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	332 call assert_equal(expand('<SID>') .. 'NewIndentExpr()', &indentexpr)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	333 set indentexpr=<SID>NewIndentExpr()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	334 call assert_equal(expand('<SID>') .. 'NewIndentExpr()', &indentexpr)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	335 set indentexpr&
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	336
12551 a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	337 bw!
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	338 endfunc
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	339
20285 bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	340 " Test changing indent in replace mode
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	341 func Test_edit_12()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	342 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	343 call setline(1, ["\tabc", "\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	344 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	345 call feedkeys("R^\<c-d>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	346 call assert_equal(["\tabc", "def"], getline(1, '$'))
17857 4935244c1128 patch 8.1.1925: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16692 diff changeset	347 call assert_equal([0, 2, 2, 0], '.'->getpos())
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	348 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	349 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	350 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	351 call feedkeys("R^\<c-d>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	352 call assert_equal(["\tabc", "def"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	353 call assert_equal([0, 2, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	354 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	355 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	356 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	357 call feedkeys("R\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	358 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	359 call assert_equal([0, 2, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	360 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	361 10vnew
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	362 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	363 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	364 call feedkeys("R\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	365 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	366 call assert_equal([0, 2, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	367 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	368 set sw=4
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	369 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	370 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	371 call feedkeys("R\<c-t>\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	372 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	373 call assert_equal([0, 2, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	374 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	375 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	376 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	377 call feedkeys("R\<c-t>\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	378 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	379 call assert_equal([0, 2, 2, 0], getpos('.'))
20285 bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	380 set sw&
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	381
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	382 " In replace mode, after hitting enter in a line with tab characters,
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	383 " pressing backspace should restore the tab characters.
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	384 %d
20285 bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	385 setlocal autoindent backspace=2
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	386 call setline(1, "\tone\t\ttwo")
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	387 exe "normal ggRred\<CR>six" .. repeat("\<BS>", 8)
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	388 call assert_equal(["\tone\t\ttwo"], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	389 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	390 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	391
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	392 func Test_edit_13()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	393 " Test smartindenting
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	394 if exists("+smartindent")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	395 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	396 set smartindent autoindent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	397 call setline(1, ["\tabc"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	398 call feedkeys("A {\<cr>more\<cr>}\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	399 call assert_equal(["\tabc {", "\t\tmore", "\t}"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	400 set smartindent& autoindent&
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	401 bwipe!
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	402 endif
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	403
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	404 " Test autoindent removing indent of blank line.
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	405 new
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	406 call setline(1, ' foo bar baz')
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	407 set autoindent
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	408 exe "normal 0eea\<CR>\<CR>\<Esc>"
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	409 call assert_equal(" foo bar", getline(1))
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	410 call assert_equal("", getline(2))
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	411 call assert_equal(" baz", getline(3))
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	412 set autoindent&
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	413
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	414 " pressing <C-U> to erase line should keep the indent with 'autoindent'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	415 set backspace=2 autoindent
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	416 %d
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	417 exe "normal i\tone\<CR>three\<C-U>two"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	418 call assert_equal(["\tone", "\ttwo"], getline(1, '$'))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	419 set backspace& autoindent&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	420
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	421 bwipe!
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	422 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	423
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	424 " Test for autoindent removing indent when insert mode is stopped. Some parts
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	425 " of the code is exercised only when interactive mode is used. So use Vim in a
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	426 " terminal.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	427 func Test_autoindent_remove_indent()
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	428 CheckRunVimInTerminal
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	429 let buf = RunVimInTerminal('-N Xfile', {'rows': 6, 'cols' : 20})
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	430 call TermWait(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	431 call term_sendkeys(buf, ":set autoindent\n")
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	432 " leaving insert mode in a new line with indent added by autoindent, should
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	433 " remove the indent.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	434 call term_sendkeys(buf, "i\<Tab>foo\<CR>\<Esc>")
26211 485c7c4afeb7 patch 8.2.3637: typos in test files Bram Moolenaar <Bram@vim.org> parents: 26157 diff changeset	435 " Need to delay for some time, otherwise the code in getchar.c will not be
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	436 " exercised.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	437 call TermWait(buf, 50)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	438 " when a line is wrapped and the cursor is at the start of the second line,
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	439 " leaving insert mode, should move the cursor back to the first line.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	440 call term_sendkeys(buf, "o" .. repeat('x', 20) .. "\<Esc>")
26211 485c7c4afeb7 patch 8.2.3637: typos in test files Bram Moolenaar <Bram@vim.org> parents: 26157 diff changeset	441 " Need to delay for some time, otherwise the code in getchar.c will not be
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	442 " exercised.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	443 call TermWait(buf, 50)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	444 call term_sendkeys(buf, ":w\n")
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	445 call TermWait(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	446 call StopVimInTerminal(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	447 call assert_equal(["\tfoo", '', repeat('x', 20)], readfile('Xfile'))
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	448 call delete('Xfile')
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	449 endfunc
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	450
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	451 func Test_edit_CR()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	452 " Test for <CR> in insert mode
26211 485c7c4afeb7 patch 8.2.3637: typos in test files Bram Moolenaar <Bram@vim.org> parents: 26157 diff changeset	453 " basically only in quickfix mode it's tested, the rest
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	454 " has been taken care of by other tests
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	455 CheckFeature quickfix
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	456 botright new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	457 call writefile(range(1, 10), 'Xqflist.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	458 call setqflist([{'filename': 'Xqflist.txt', 'lnum': 2}])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	459 copen
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	460 set modifiable
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	461 call feedkeys("A\<cr>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	462 call assert_equal('Xqflist.txt', bufname(''))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	463 call assert_equal(2, line('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	464 cclose
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	465 botright new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	466 call setloclist(0, [{'filename': 'Xqflist.txt', 'lnum': 10}])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	467 lopen
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	468 set modifiable
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	469 call feedkeys("A\<cr>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	470 call assert_equal('Xqflist.txt', bufname(''))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	471 call assert_equal(10, line('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	472 call feedkeys("A\<Enter>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	473 call feedkeys("A\<kEnter>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	474 call feedkeys("A\n", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	475 call feedkeys("A\r", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	476 call assert_equal(map(range(1, 10), 'string(v:val)') + ['', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	477 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	478 lclose
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	479 call delete('Xqflist.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	480 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	481
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	482 func Test_edit_CTRL_()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	483 CheckFeature rightleft
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	484 " disabled for Windows builds, why?
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	485 CheckNotMSWindows
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	486 let _encoding=&encoding
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	487 set encoding=utf-8
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	488 " Test for CTRL-_
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	489 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	490 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	491 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	492 call feedkeys("i\<c-_>xyz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	493 call assert_equal(["\<C-_>xyzabc"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	494 call assert_false(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	495 set ari
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	496 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	497 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	498 call feedkeys("i\<c-_>xyz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	499 call assert_equal(["æèñabc"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	500 call assert_true(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	501 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	502 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	503 call feedkeys("i\<c-_>xyz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	504 call assert_equal(["xyzabc"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	505 call assert_false(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	506 set noari
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	507 let &encoding=_encoding
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	508 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	509 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	510
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	511 " needs to come first, to have the @. register empty
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	512 func Test_edit_00a_CTRL_A()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	513 " Test pressing CTRL-A
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	514 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	515 call setline(1, repeat([''], 5))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	516 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	517 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	518 call feedkeys("A\<NUL>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	519 catch /^Vim\%((\a\+)\)\=:E29/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	520 call assert_true(1, 'E29 error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	521 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	522 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	523 call feedkeys("Afoobar \<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	524 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	525 call feedkeys("A\<c-a>more\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	526 call cursor(3, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	527 call feedkeys("A\<NUL>and more\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	528 call assert_equal(['foobar ', 'foobar more', 'foobar morend more', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	529 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	530 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	531
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	532 func Test_edit_CTRL_EY()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	533 " Ctrl-E/ Ctrl-Y in insert mode completion to scroll
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	534 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	535 call setline(1, range(1, 100))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	536 call cursor(30, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	537 norm! z.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	538 call feedkeys("A\<c-x>\<c-e>\<c-e>\<c-e>\<c-e>\<c-e>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	539 call assert_equal(30, winsaveview()['topline'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	540 call assert_equal([0, 30, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	541 call feedkeys("A\<c-x>\<c-e>\<c-e>\<c-e>\<c-e>\<c-e>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	542 call feedkeys("A\<c-x>".repeat("\<c-y>", 10), 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	543 call assert_equal(21, winsaveview()['topline'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	544 call assert_equal([0, 30, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	545 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	546 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	547
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	548 func Test_edit_CTRL_G()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	549 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	550 call setline(1, ['foobar', 'foobar', 'foobar'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	551 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	552 call feedkeys("ioooooooo\<c-g>k\<c-r>.\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	553 call assert_equal(['foooooooooobar', 'foooooooooobar', 'foobar'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	554 call assert_equal([0, 1, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	555 call feedkeys("i\<c-g>k\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	556 call assert_equal([0, 1, 10, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	557 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	558 call feedkeys("i\<c-g>jzzzz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	559 call assert_equal(['foooooooooobar', 'foooooooooobar', 'foozzzzbar'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	560 call assert_equal([0, 3, 7, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	561 call feedkeys("i\<c-g>j\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	562 call assert_equal([0, 3, 6, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	563 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	564 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	565
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	566 func Test_edit_CTRL_I()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	567 " Tab in completion mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	568 let path=expand("%:p:h")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	569 new
14039 acb2dc112b06 patch 8.1.0037: cannot easily append lines to another buffer Christian Brabandt <cb@256bit.org> parents: 14033 diff changeset	570 call setline(1, [path. "/", ''])
11171 7fc6afa998be patch 8.0.0472: when a test fails another test may also fail Christian Brabandt <cb@256bit.org> parents: 11105 diff changeset	571 call feedkeys("Arunt\<c-x>\<c-f>\<tab>\<cr>\<esc>", 'tnix')
7fc6afa998be patch 8.0.0472: when a test fails another test may also fail Christian Brabandt <cb@256bit.org> parents: 11105 diff changeset	572 call assert_match('runtest\.vim', getline(1))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	573 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	574 call writefile(['one', 'two', 'three'], 'Xinclude.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	575 let include='#include Xinclude.txt'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	576 call setline(1, [include, ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	577 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	578 call feedkeys("A\<c-x>\<tab>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	579 call assert_equal([include, 'one', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	580 call feedkeys("2ggC\<c-x>\<tab>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	581 call assert_equal([include, 'two', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	582 call feedkeys("2ggC\<c-x>\<tab>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	583 call assert_equal([include, 'three', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	584 call feedkeys("2ggC\<c-x>\<tab>\<down>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	585 call assert_equal([include, '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	586 call delete("Xinclude.txt")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	587 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	588 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	589
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	590 func Test_edit_CTRL_K()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	591 " Test pressing CTRL-K (basically only dictionary completion and digraphs
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	592 " the rest is already covered
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	593 call writefile(['A', 'AA', 'AAA', 'AAAA'], 'Xdictionary.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	594 set dictionary=Xdictionary.txt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	595 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	596 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	597 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	598 call feedkeys("A\<c-x>\<c-k>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	599 call assert_equal(['AA', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	600 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	601 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	602 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	603 call feedkeys("A\<c-x>\<c-k>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	604 call assert_equal(['AAA'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	605 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	606 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	607 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	608 call feedkeys("A\<c-x>\<c-k>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	609 call assert_equal(['AAAA'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	610 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	611 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	612 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	613 call feedkeys("A\<c-x>\<c-k>\<down>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	614 call assert_equal(['A'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	615 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	616 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	617 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	618 call feedkeys("A\<c-x>\<c-k>\<down>\<down>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	619 call assert_equal(['AA'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	620
19195 2ef19eed524a patch 8.2.0156: various typos in source files and tests Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	621 " press an unexpected key after dictionary completion
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	622 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	623 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	624 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	625 call feedkeys("A\<c-x>\<c-k>\<c-]>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	626 call assert_equal(['AA', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	627 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	628 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	629 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	630 call feedkeys("A\<c-x>\<c-k>\<c-s>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	631 call assert_equal(["AA\<c-s>", ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	632 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	633 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	634 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	635 call feedkeys("A\<c-x>\<c-k>\<c-f>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	636 call assert_equal(["AA\<c-f>", ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	637
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	638 set dictionary=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	639 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	640 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	641 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	642 let v:testing = 1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	643 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	644 call feedkeys("A\<c-x>\<c-k>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	645 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	646 " error sleeps 2 seconds, when v:testing is not set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	647 let v:testing = 0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	648 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	649 call delete('Xdictionary.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	650
15607 2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	651 call test_override("char_avail", 1)
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	652 set showcmd
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	653 %d
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	654 call feedkeys("A\<c-k>a:\<esc>", 'tnix')
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	655 call assert_equal(['ä'], getline(1, '$'))
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	656 call test_override("char_avail", 0)
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	657 set noshowcmd
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	658
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	659 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	660 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	661
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	662 func Test_edit_CTRL_L()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	663 " Test Ctrl-X Ctrl-L (line completion)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	664 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	665 set complete=.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	666 call setline(1, ['one', 'two', 'three', '', '', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	667 call cursor(4, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	668 call feedkeys("A\<c-x>\<c-l>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	669 call assert_equal(['one', 'two', 'three', 'three', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	670 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	671 call assert_equal(['one', 'two', 'three', 't', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	672 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<c-n>\<esc>", 'tnix')
13215 ae5f855a64be patch 8.0.1482: using feedkeys() does not work to test completion Christian Brabandt <cb@256bit.org> parents: 12696 diff changeset	673 call assert_equal(['one', 'two', 'three', 'two', '', '', ''], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	674 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<c-n>\<c-n>\<esc>", 'tnix')
13215 ae5f855a64be patch 8.0.1482: using feedkeys() does not work to test completion Christian Brabandt <cb@256bit.org> parents: 12696 diff changeset	675 call assert_equal(['one', 'two', 'three', 'three', '', '', ''], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	676 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<c-n>\<c-n>\<c-n>\<esc>", 'tnix')
13215 ae5f855a64be patch 8.0.1482: using feedkeys() does not work to test completion Christian Brabandt <cb@256bit.org> parents: 12696 diff changeset	677 call assert_equal(['one', 'two', 'three', 't', '', '', ''], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	678 call feedkeys("cct\<c-x>\<c-l>\<c-p>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	679 call assert_equal(['one', 'two', 'three', 'two', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	680 call feedkeys("cct\<c-x>\<c-l>\<c-p>\<c-p>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	681 call assert_equal(['one', 'two', 'three', 't', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	682 call feedkeys("cct\<c-x>\<c-l>\<c-p>\<c-p>\<c-p>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	683 call assert_equal(['one', 'two', 'three', 'three', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	684 set complete=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	685 call cursor(5, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	686 call feedkeys("A\<c-x>\<c-l>\<c-p>\<c-n>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	687 call assert_equal(['one', 'two', 'three', 'three', "\<c-l>\<c-p>\<c-n>", '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	688 set complete&
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	689 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	690 if has("conceal") && has("syntax")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	691 call setline(1, ['foo', 'bar', 'foobar'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	692 call test_override("char_avail", 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	693 set conceallevel=2 concealcursor=n
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	694 syn on
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	695 syn match ErrorMsg "^bar"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	696 call matchadd("Conceal", 'oo', 10, -1, {'conceal': 'X'})
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	697 func! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	698 let g:change=1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	699 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	700 au! TextChangedI <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	701
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	702 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	703 call assert_false(exists("g:change"))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	704 call feedkeys("A \<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	705 call assert_equal(['foo', 'bar ', 'foobar'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	706 call assert_equal(1, g:change)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	707
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	708 call test_override("char_avail", 0)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	709 call clearmatches()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	710 syn off
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	711 au! TextChangedI
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	712 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	713 unlet! g:change
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	714 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	715 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	716 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	717
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	718 func Test_edit_CTRL_N()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	719 " Check keyword completion
23984 e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	720 for e in ['latin1', 'utf-8']
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	721 exe 'set encoding=' .. e
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	722 new
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	723 set complete=.
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	724 call setline(1, ['INFER', 'loWER', '', '', ])
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	725 call cursor(3, 1)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	726 call feedkeys("Ai\<c-n>\<cr>\<esc>", "tnix")
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	727 call feedkeys("ILO\<c-n>\<cr>\<esc>", 'tnix')
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	728 call assert_equal(['INFER', 'loWER', 'i', 'LO', '', ''], getline(1, '$'), e)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	729 %d
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	730 call setline(1, ['INFER', 'loWER', '', '', ])
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	731 call cursor(3, 1)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	732 set ignorecase infercase
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	733 call feedkeys("Ii\<c-n>\<cr>\<esc>", "tnix")
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	734 call feedkeys("ILO\<c-n>\<cr>\<esc>", 'tnix')
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	735 call assert_equal(['INFER', 'loWER', 'infer', 'LOWER', '', ''], getline(1, '$'), e)
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	736
23984 e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	737 set noignorecase noinfercase complete&
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	738 bw!
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	739 endfor
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	740 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	741
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	742 func Test_edit_CTRL_O()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	743 " Check for CTRL-O in insert mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	744 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	745 inoreabbr <buffer> h here some more
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	746 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	747 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	748 " Ctrl-O after an abbreviation
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	749 exe "norm A h\<c-o>:set nu\<cr> text"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	750 call assert_equal(['abc here some more text', 'def'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	751 call assert_true(&nu)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	752 set nonu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	753 iunabbr <buffer> h
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	754 " Ctrl-O at end of line with 've'=onemore
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	755 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	756 call feedkeys("A\<c-o>:let g:a=getpos('.')\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	757 call assert_equal([0, 1, 23, 0], g:a)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	758 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	759 set ve=onemore
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	760 call feedkeys("A\<c-o>:let g:a=getpos('.')\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	761 call assert_equal([0, 1, 24, 0], g:a)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	762 set ve=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	763 unlet! g:a
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	764 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	765 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	766
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	767 func Test_edit_CTRL_R()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	768 " Insert Register
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	769 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	770 call test_override("ALL", 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	771 set showcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	772 call feedkeys("AFOOBAR eins zwei\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	773 call feedkeys("O\<c-r>.", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	774 call feedkeys("O\<c-r>=10*500\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	775 call feedkeys("O\<c-r>=getreg('=', 1)\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	776 call assert_equal(["getreg('=', 1)", '5000', "FOOBAR eins zwei", "FOOBAR eins zwei"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	777 call test_override("ALL", 0)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	778 set noshowcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	779 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	780 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	781
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	782 func Test_edit_CTRL_S()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	783 " Test pressing CTRL-S (basically only spellfile completion)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	784 " the rest is already covered
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	785 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	786 if !has("spell")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	787 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	788 call feedkeys("A\<c-x>ss\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	789 call assert_equal(['vims', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	790 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	791 return
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	792 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	793 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	794 " spell option not yet set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	795 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	796 call feedkeys("A\<c-x>\<c-s>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	797 catch /^Vim\%((\a\+)\)\=:E756/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	798 call assert_true(1, 'error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	799 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	800 call assert_equal(['vim', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	801 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	802 setl spell spelllang=en
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	803 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	804 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	805 call feedkeys("A\<c-x>\<c-s>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	806 call assert_equal(['Vim', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	807 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	808 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	809 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	810 call feedkeys("A\<c-x>\<c-s>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	811 call assert_equal(['Aim'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	812 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	813 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	814 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	815 call feedkeys("A\<c-x>\<c-s>\<c-p>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	816 call assert_equal(['vim', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	817 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	818 " empty buffer
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	819 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	820 call feedkeys("A\<c-x>\<c-s>\<c-p>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	821 call assert_equal(['', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	822 setl nospell
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	823 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	824 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	825
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	826 func Test_edit_CTRL_T()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	827 " Check for CTRL-T and CTRL-X CTRL-T in insert mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	828 " 1) increase indent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	829 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	830 call setline(1, "abc")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	831 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	832 call feedkeys("A\<c-t>xyz", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	833 call assert_equal(["\<tab>abcxyz"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	834 " 2) also when paste option is set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	835 set paste
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	836 call setline(1, "abc")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	837 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	838 call feedkeys("A\<c-t>xyz", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	839 call assert_equal(["\<tab>abcxyz"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	840 set nopaste
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	841 " CTRL-X CTRL-T (thesaurus complete)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	842 call writefile(['angry furious mad enraged'], 'Xthesaurus')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	843 set thesaurus=Xthesaurus
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	844 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	845 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	846 call feedkeys("A\<c-x>\<c-t>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	847 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	848 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	849 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	850 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	851 call feedkeys("A\<c-x>\<c-t>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	852 call assert_equal(['angry', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	853 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	854 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	855 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	856 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	857 call assert_equal(['furious', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	858 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	859 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	860 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	861 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	862 call assert_equal(['enraged', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	863 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	864 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	865 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	866 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	867 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	868 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	869 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	870 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	871 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<c-n>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	872 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	873 " Using <c-p> <c-n> when 'complete' is empty
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	874 set complete=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	875 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	876 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	877 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	878 call feedkeys("A\<c-x>\<c-t>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	879 call assert_equal(['angry', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	880 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	881 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	882 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	883 call feedkeys("A\<c-x>\<c-t>\<c-p>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	884 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	885 set complete&
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	886
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	887 set thesaurus=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	888 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	889 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	890 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	891 let v:testing = 1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	892 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	893 call feedkeys("A\<c-x>\<c-t>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	894 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	895 " error sleeps 2 seconds, when v:testing is not set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	896 let v:testing = 0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	897 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	898 call assert_equal(['mad'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	899 call delete('Xthesaurus')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	900 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	901 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	902
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	903 " Test 'thesaurusfunc'
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	904 func MyThesaurus(findstart, base)
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	905 let mythesaurus = [
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	906 \ #{word: "happy",
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	907 \ synonyms: "cheerful,blissful,flying high,looking good,peppy"},
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	908 \ #{word: "kind",
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	909 \ synonyms: "amiable,bleeding-heart,heart in right place"}]
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	910 if a:findstart
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	911 " locate the start of the word
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	912 let line = getline('.')
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	913 let start = col('.') - 1
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	914 while start > 0 && line[start - 1] =~ '\a'
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	915 let start -= 1
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	916 endwhile
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	917 return start
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	918 else
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	919 " find strings matching with "a:base"
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	920 let res = []
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	921 for w in mythesaurus
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	922 if w.word =~ '^' . a:base
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	923 call add(res, w.word)
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	924 call extend(res, split(w.synonyms, ","))
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	925 endif
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	926 endfor
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	927 return res
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	928 endif
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	929 endfunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	930
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	931 func Test_thesaurus_func()
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	932 new
25990 ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	933 set thesaurus=notused
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	934 set thesaurusfunc=NotUsed
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	935 setlocal thesaurusfunc=MyThesaurus
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	936 call setline(1, "an ki")
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	937 call cursor(1, 1)
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	938 call feedkeys("A\<c-x>\<c-t>\<c-n>\<cr>\<esc>", 'tnix')
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	939 call assert_equal(['an amiable', ''], getline(1, '$'))
25990 ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	940
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	941 setlocal thesaurusfunc=NonExistingFunc
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	942 call assert_fails("normal $a\<C-X>\<C-T>", 'E117:')
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	943
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	944 setlocal thesaurusfunc=
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	945 set thesaurusfunc=NonExistingFunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	946 call assert_fails("normal $a\<C-X>\<C-T>", 'E117:')
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	947 %bw!
25990 ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	948
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	949 set thesaurusfunc=
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	950 set thesaurus=
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	951 endfunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	952
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	953 func Test_edit_CTRL_U()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	954 " Test 'completefunc'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	955 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	956 " -1, -2 and -3 are special return values
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	957 let g:special=0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	958 fun! CompleteMonths(findstart, base)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	959 if a:findstart
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	960 " locate the start of the word
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	961 return g:special
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	962 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	963 " find months matching with "a:base"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	964 let res = []
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	965 for m in split("Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	966 if m =~ '^\c'.a:base
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	967 call add(res, {'word': m, 'abbr': m.' Month', 'icase': 0})
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	968 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	969 endfor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	970 return {'words': res, 'refresh': 'always'}
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	971 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	972 endfun
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	973 set completefunc=CompleteMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	974 call setline(1, ['', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	975 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	976 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	977 call assert_equal(['X', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	978 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	979 let g:special=-1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	980 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	981 call assert_equal(['XJan', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	982 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	983 let g:special=-2
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	984 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	985 call assert_equal(['X', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	986 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	987 let g:special=-3
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	988 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	989 call assert_equal(['X', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	990 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	991 let g:special=0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	992 call feedkeys("AM\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	993 call assert_equal(['Mar', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	994 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	995 call feedkeys("AM\<c-x>\<c-u>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	996 call assert_equal(['May', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	997 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	998 call feedkeys("AM\<c-x>\<c-u>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	999 call assert_equal(['M', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1000 delfu CompleteMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1001 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1002 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1003 call feedkeys("A\<c-x>\<c-u>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1004 call assert_fails(1, 'unknown completion function')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1005 catch /^Vim\%((\a\+)\)\=:E117/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1006 call assert_true(1, 'E117 error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1007 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1008 set completefunc=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1009 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1010 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1011
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1012 func Test_edit_completefunc_delete()
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1013 func CompleteFunc(findstart, base)
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1014 if a:findstart == 1
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1015 return col('.') - 1
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1016 endif
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1017 normal dd
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1018 return ['a', 'b']
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1019 endfunc
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1020 new
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1021 set completefunc=CompleteFunc
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1022 call setline(1, ['', 'abcd', ''])
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1023 2d
20229 06a1dd50463e patch 8.2.0670: cannot change window when evaluating 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 20187 diff changeset	1024 call assert_fails("normal 2G$a\<C-X>\<C-U>", 'E578:')
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1025 bwipe!
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1026 endfunc
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1027
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1028
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1029 func Test_edit_CTRL_Z()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1030 " Ctrl-Z when insertmode is not set inserts it literally
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1031 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1032 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1033 call feedkeys("A\<c-z>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1034 call assert_equal(["abc\<c-z>"], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1035 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1036 " TODO: How to Test Ctrl-Z in insert mode, e.g. suspend?
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1037 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1038
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1039 func Test_edit_DROP()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1040 CheckFeature dnd
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1041 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1042 call setline(1, ['abc def ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1043 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1044 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1045 call feedkeys("i\<Drop>\<Esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1046 call assert_fails(1, 'Invalid register name')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1047 catch /^Vim\%((\a\+)\)\=:E353/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1048 call assert_true(1, 'error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1049 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1050 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1051 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1052
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1053 func Test_edit_CTRL_V()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1054 CheckFeature ebcdic
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1055 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1056 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1057 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1058 " force some redraws
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1059 set showmode showcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1060 "call test_override_char_avail(1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1061 call test_override('ALL', 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1062 call feedkeys("A\<c-v>\<c-n>\<c-v>\<c-l>\<c-v>\<c-b>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1063 call assert_equal(["abc\x0e\x0c\x02"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1064
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1065 if has("rightleft") && exists("+rl")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1066 set rl
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1067 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1068 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1069 call feedkeys("A\<c-v>\<c-n>\<c-v>\<c-l>\<c-v>\<c-b>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1070 call assert_equal(["abc\x0e\x0c\x02"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1071 set norl
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1072 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1073
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1074 call test_override('ALL', 0)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1075 set noshowmode showcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1076 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1077 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1078
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1079 func Test_edit_F1()
18767 068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18538 diff changeset	1080 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18538 diff changeset	1081
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1082 " Pressing <f1>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1083 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1084 call feedkeys(":set im\<cr>\<f1>\<c-l>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1085 set noinsertmode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1086 call assert_equal('help', &buftype)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1087 bw
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1088 bw
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1089 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1090
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1091 func Test_edit_F21()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1092 " Pressing <f21>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1093 " sends a netbeans command
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1094 CheckFeature netbeans_intg
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1095 new
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1096 " I have no idea what this is supposed to do :)
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1097 call feedkeys("A\<F21>\<F1>\<esc>", 'tnix')
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1098 bw
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1099 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1100
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1101 func Test_edit_HOME_END()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1102 " Test Home/End Keys
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1103 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1104 set foldopen+=hor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1105 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1106 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1107 call feedkeys("AX\<Home>Y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1108 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1109 call feedkeys("iZ\<End>Y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1110 call assert_equal(['YabcX', 'ZdefY'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1111
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1112 set foldopen-=hor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1113 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1114 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1115
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1116 func Test_edit_INS()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1117 " Test for Pressing <Insert>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1118 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1119 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1120 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1121 call feedkeys("i\<Insert>ZYX>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1122 call assert_equal(['ZYX>', 'def'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1123 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1124 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1125 call feedkeys("i\<Insert>Z\<Insert>YX>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1126 call assert_equal(['ZYX>bc', 'def'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1127 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1128 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1129
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1130 func Test_edit_LEFT_RIGHT()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1131 " Left, Shift-Left, Right, Shift-Right
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1132 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1133 call setline(1, ['abc def ghi', 'ABC DEF GHI', 'ZZZ YYY XXX'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1134 let _ww=&ww
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1135 set ww=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1136 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1137 call feedkeys("i\<left>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1138 call assert_equal([0, 2, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1139 " Is this a bug, <s-left> does not respect whichwrap option
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1140 call feedkeys("i\<s-left>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1141 call assert_equal([0, 1, 8, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1142 call feedkeys("i". repeat("\<s-left>", 3). "\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1143 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1144 call feedkeys("i\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1145 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1146 call feedkeys("i\<right>\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1147 call assert_equal([0, 1, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1148 call feedkeys("A\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1149 call assert_equal([0, 1, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1150 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1151 call assert_equal([0, 2, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1152 call feedkeys("i\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1153 call assert_equal([0, 2, 4, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1154 call cursor(3, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1155 call feedkeys("A\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1156 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1157 call assert_equal([0, 3, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1158 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1159 " <S-Right> does not respect 'whichwrap' option
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1160 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1161 call assert_equal([0, 3, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1162 " Check motion when 'whichwrap' contains cursor keys for insert mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1163 set ww+=[,]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1164 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1165 call feedkeys("i\<left>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1166 call assert_equal([0, 1, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1167 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1168 call feedkeys("A\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1169 call assert_equal([0, 3, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1170 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1171 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1172 call assert_equal([0, 3, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1173 let &ww = _ww
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1174 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1175 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1176
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1177 func Test_edit_MOUSE()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1178 " This is a simple test, since we not really using the mouse here
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1179 CheckFeature mouse
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1180 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1181 call setline(1, range(1, 100))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1182 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1183 set mouse=a
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1184 call feedkeys("A\<ScrollWheelDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1185 call assert_equal([0, 4, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1186 " This should move by one pageDown, but only moves
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1187 " by one line when the test is run...
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1188 call feedkeys("A\<S-ScrollWheelDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1189 call assert_equal([0, 5, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1190 set nostartofline
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1191 call feedkeys("A\<C-ScrollWheelDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1192 call assert_equal([0, 6, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1193 call feedkeys("A\<LeftMouse>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1194 call assert_equal([0, 6, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1195 call feedkeys("A\<RightMouse>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1196 call assert_equal([0, 6, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1197 call cursor(1, 100)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1198 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1199 " this should move by a screen up, but when the test
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1200 " is run, it moves up to the top of the buffer...
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1201 call feedkeys("A\<ScrollWheelUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1202 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1203 call cursor(1, 30)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1204 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1205 call feedkeys("A\<S-ScrollWheelUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1206 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1207 call cursor(1, 30)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1208 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1209 call feedkeys("A\<C-ScrollWheelUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1210 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1211 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1212 call setline(1, repeat(["12345678901234567890"], 100))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1213 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1214 call feedkeys("A\<ScrollWheelRight>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1215 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1216 call feedkeys("A\<ScrollWheelLeft>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1217 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1218 call feedkeys("A\<S-ScrollWheelRight>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1219 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1220 call feedkeys("A\<S-ScrollWheelLeft>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1221 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1222 call feedkeys("A\<C-ScrollWheelRight>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1223 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1224 call feedkeys("A\<C-ScrollWheelLeft>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1225 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1226 set mouse& startofline
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1227 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1228 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1229
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1230 func Test_edit_PAGEUP_PAGEDOWN()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1231 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1232 call setline(1, repeat(['abc def ghi'], 30))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1233 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1234 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1235 call assert_equal([0, 9, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1236 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1237 call assert_equal([0, 17, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1238 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1239 call assert_equal([0, 25, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1240 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1241 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1242 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1243 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1244 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1245 call assert_equal([0, 29, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1246 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1247 call assert_equal([0, 21, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1248 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1249 call assert_equal([0, 13, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1250 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1251 call assert_equal([0, 5, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1252 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1253 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1254 " <S-Up> is the same as <PageUp>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1255 " <S-Down> is the same as <PageDown>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1256 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1257 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1258 call assert_equal([0, 9, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1259 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1260 call assert_equal([0, 17, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1261 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1262 call assert_equal([0, 25, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1263 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1264 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1265 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1266 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1267 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1268 call assert_equal([0, 29, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1269 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1270 call assert_equal([0, 21, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1271 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1272 call assert_equal([0, 13, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1273 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1274 call assert_equal([0, 5, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1275 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1276 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1277 set nostartofline
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1278 call cursor(30, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1279 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1280 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1281 call assert_equal([0, 29, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1282 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1283 call assert_equal([0, 21, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1284 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1285 call assert_equal([0, 13, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1286 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1287 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1288 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1289 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1290 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1291 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1292 call assert_equal([0, 9, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1293 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1294 call assert_equal([0, 17, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1295 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1296 call assert_equal([0, 25, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1297 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1298 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1299 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1300 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1301 " <S-Up> is the same as <PageUp>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1302 " <S-Down> is the same as <PageDown>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1303 call cursor(30, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1304 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1305 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1306 call assert_equal([0, 29, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1307 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1308 call assert_equal([0, 21, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1309 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1310 call assert_equal([0, 13, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1311 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1312 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1313 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1314 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1315 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1316 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1317 call assert_equal([0, 9, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1318 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1319 call assert_equal([0, 17, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1320 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1321 call assert_equal([0, 25, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1322 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1323 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1324 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1325 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1326 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1327 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1328
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1329 func Test_edit_forbidden()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1330 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1331 " 1) edit in the sandbox is not allowed
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1332 call setline(1, 'a')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1333 com! Sandbox :sandbox call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1334 call assert_fails(':Sandbox', 'E48:')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1335 com! Sandbox :sandbox exe "norm! i\<del>"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1336 call assert_fails(':Sandbox', 'E48:')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1337 delcom Sandbox
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1338 call assert_equal(['a'], getline(1,'$'))
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1339
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1340 " 2) edit with textlock set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1341 fu! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1342 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1343 endfu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1344 au InsertCharPre <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1345 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1346 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1347 call assert_fails(1, 'textlock')
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1348 catch /^Vim\%((\a\+)\)\=:E565/ " catch E565: not allowed here
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1349 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1350 " TODO: Might be a bug: should x really be inserted here
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1351 call assert_equal(['xa'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1352 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1353 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1354 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1355 call assert_fails(1, 'unknown function')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1356 catch /^Vim\%((\a\+)\)\=:E117/ " catch E117: unknown function
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1357 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1358 au! InsertCharPre
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1359
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1360 " 3) edit when completion is shown
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1361 fun! Complete(findstart, base)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1362 if a:findstart
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1363 return col('.')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1364 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1365 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1366 return []
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1367 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1368 endfun
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1369 set completefunc=Complete
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1370 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1371 call feedkeys("i\<c-x>\<c-u>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1372 call assert_fails(1, 'change in complete function')
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1373 catch /^Vim\%((\a\+)\)\=:E565/ " catch E565
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1374 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1375 delfu Complete
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1376 set completefunc=
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1377
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1378 if has("rightleft") && exists("+fkmap")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1379 " 4) 'R' when 'fkmap' and 'revins' is set.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1380 set revins fkmap
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1381 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1382 normal Ri
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1383 call assert_fails(1, "R with 'fkmap' and 'ri' set")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1384 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1385 finally
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1386 set norevins nofkmap
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1387 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1388 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1389 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1390 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1391
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1392 func Test_edit_rightleft()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1393 " Cursor in rightleft mode moves differently
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1394 CheckFeature rightleft
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1395 call NewWindow(10, 20)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1396 call setline(1, ['abc', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1397 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1398 set rightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1399 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1400 let lines = ScreenLines([1, 4], winwidth(0))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1401 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1402 \" cba",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1403 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1404 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1405 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1406 call assert_equal(join(expect, "\n"), join(lines, "\n"))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1407 " 2) right moves to the left
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1408 call feedkeys("i\<right>\<esc>x", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1409 call assert_equal(['bc', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1410 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1411 call feedkeys("i\<s-right>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1412 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1413 call feedkeys("i\<c-right>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1414 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1415 let lines = ScreenLines([1, 4], winwidth(0))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1416 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1417 \" cb",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1418 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1419 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1420 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1421 call assert_equal(join(expect, "\n"), join(lines, "\n"))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1422 " 2) left moves to the right
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1423 call setline(1, ['abc', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1424 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1425 call feedkeys("i\<left>\<esc>x", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1426 call assert_equal(['ac', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1427 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1428 call feedkeys("i\<s-left>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1429 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1430 call feedkeys("i\<c-left>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1431 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1432 let lines = ScreenLines([1, 4], winwidth(0))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1433 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1434 \" ca",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1435 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1436 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1437 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1438 call assert_equal(join(expect, "\n"), join(lines, "\n"))
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1439 %d _
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1440 call test_override('redraw_flag', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1441 call test_override('char_avail', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1442 call feedkeys("a\<C-V>x41", "xt")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1443 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1444 call assert_equal(repeat(' ', 19) .. 'A', Screenline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1445 call test_override('ALL', 0)
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1446 set norightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1447 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1448 endfunc
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1449
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1450 func Test_edit_complete_very_long_name()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1451 " Long directory names only work on Unix.
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1452 CheckUnix
11319 2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1453
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1454 let dirname = getcwd() . "/Xdir"
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1455 let longdirname = dirname . repeat('/' . repeat('d', 255), 4)
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1456 try
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1457 call mkdir(longdirname, 'p')
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1458 catch /E739:/
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1459 " Long directory name probably not supported.
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1460 call delete(dirname, 'rf')
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1461 return
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1462 endtry
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1463
16692 2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1464 " Try to get the Vim window position before setting 'columns', so that we can
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1465 " move the window back to where it was.
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1466 let winposx = getwinposx()
0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1467 let winposy = getwinposy()
16692 2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1468
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1469 if winposx >= 0 && winposy >= 0 && !has('gui_running')
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1470 " We did get the window position, but xterm may report the wrong numbers.
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1471 " Move the window to the reported position and compute any offset.
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1472 exe 'winpos ' . winposx . ' ' . winposy
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1473 sleep 100m
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1474 let x = getwinposx()
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1475 if x >= 0
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1476 let winposx += winposx - x
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1477 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1478 let y = getwinposy()
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1479 if y >= 0
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1480 let winposy += winposy - y
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1481 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1482 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1483
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1484 let save_columns = &columns
11319 2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1485 " Need at least about 1100 columns to reproduce the problem.
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1486 set columns=2000
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1487 set noswapfile
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1488
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1489 let longfilename = longdirname . '/' . repeat('a', 255)
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1490 call writefile(['Totum', 'Table'], longfilename)
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1491 new
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1492 exe "next Xfile " . longfilename
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1493 exe "normal iT\<C-N>"
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1494
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1495 bwipe!
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1496 exe 'bwipe! ' . longfilename
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1497 call delete(dirname, 'rf')
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1498 let &columns = save_columns
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1499 if winposx >= 0 && winposy >= 0
0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1500 exe 'winpos ' . winposx . ' ' . winposy
0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1501 endif
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1502 set swapfile&
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1503 endfunc
12654 d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1504
14409 9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1505 func Test_edit_backtick()
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1506 next a\`b c
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1507 call assert_equal('a`b', expand('%'))
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1508 next
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1509 call assert_equal('c', expand('%'))
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1510 call assert_equal('a\`b c', expand('##'))
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1511 endfunc
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1512
12654 d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1513 func Test_edit_quit()
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1514 edit foo.txt
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1515 split
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1516 new
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1517 call setline(1, 'hello')
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1518 3wincmd w
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1519 redraw!
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1520 call assert_fails('1q', 'E37:')
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1521 bwipe! foo.txt
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1522 only
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1523 endfunc
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1524
14033 bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1525 func Test_edit_alt()
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1526 " Keeping the cursor line didn't happen when the first line has indent.
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1527 new
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1528 call setline(1, [' one', 'two', 'three'])
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1529 w XAltFile
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1530 $
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1531 call assert_equal(3, line('.'))
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1532 e Xother
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1533 e #
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1534 call assert_equal(3, line('.'))
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1535
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1536 bwipe XAltFile
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1537 call delete('XAltFile')
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1538 endfunc
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1539
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1540 func Test_edit_InsertLeave()
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1541 new
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1542 au InsertLeavePre * let g:did_au_pre = 1
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1543 au InsertLeave * let g:did_au = 1
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1544 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1545 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1546 call feedkeys("afoo\<Esc>", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1547 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1548 call assert_equal(1, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1549 call assert_equal('foo', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1550
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1551 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1552 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1553 call feedkeys("Sbar\<C-C>", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1554 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1555 call assert_equal(0, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1556 call assert_equal('bar', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1557
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1558 inoremap x xx<Esc>
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1559 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1560 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1561 call feedkeys("Saax", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1562 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1563 call assert_equal(1, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1564 call assert_equal('aaxx', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1565
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1566 inoremap x xx<C-C>
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1567 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1568 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1569 call feedkeys("Sbbx", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1570 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1571 call assert_equal(0, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1572 call assert_equal('bbxx', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1573
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1574 bwipe!
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1575 au! InsertLeave InsertLeavePre
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1576 iunmap x
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1577 endfunc
16419 aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1578
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1579 func Test_edit_InsertLeave_undo()
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1580 new XtestUndo
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1581 set undofile
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1582 au InsertLeave * wall
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1583 exe "normal ofoo\<Esc>"
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1584 call assert_equal(2, line('$'))
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1585 normal u
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1586 call assert_equal(1, line('$'))
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1587
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1588 bwipe!
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1589 au! InsertLeave
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1590 call delete('XtestUndo')
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1591 call delete(undofile('XtestUndo'))
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1592 set undofile&
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1593 endfunc
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1594
16419 aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1595 " Test for inserting characters using CTRL-V followed by a number.
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1596 func Test_edit_special_chars()
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1597 new
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1598
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1599 if has("ebcdic")
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1600 let t = "o\<C-V>193\<C-V>xc2\<C-V>o303 \<C-V>90a\<C-V>xfg\<C-V>o578\<Esc>"
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1601 else
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1602 let t = "o\<C-V>65\<C-V>x42\<C-V>o103 \<C-V>33a\<C-V>xfg\<C-V>o78\<Esc>"
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1603 endif
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1604
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1605 exe "normal " . t
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1606 call assert_equal("ABC !a\<C-O>g\<C-G>8", getline(2))
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1607
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1608 close!
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1609 endfunc
17984 2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1610
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1611 func Test_edit_startinsert()
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1612 new
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1613 set backspace+=start
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1614 call setline(1, 'foobar')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1615 call feedkeys("A\<C-U>\<Esc>", 'xt')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1616 call assert_equal('', getline(1))
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1617
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1618 call setline(1, 'foobar')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1619 call feedkeys(":startinsert!\<CR>\<C-U>\<Esc>", 'xt')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1620 call assert_equal('', getline(1))
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1621
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1622 set backspace&
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1623 bwipe!
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1624 endfunc
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1625
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1626 " Test for :startreplace and :startgreplace
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1627 func Test_edit_startreplace()
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1628 new
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1629 call setline(1, 'abc')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1630 call feedkeys("l:startreplace\<CR>xyz\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1631 call assert_equal('axyz', getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1632 call feedkeys("0:startreplace!\<CR>abc\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1633 call assert_equal('axyzabc', getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1634 call setline(1, "a\tb")
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1635 call feedkeys("0l:startgreplace\<CR>xyz\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1636 call assert_equal("axyz\tb", getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1637 call feedkeys("0i\<C-R>=execute('startreplace')\<CR>12\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1638 call assert_equal("12axyz\tb", getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1639 close!
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1640 endfunc
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1641
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1642 func Test_edit_noesckeys()
18538 c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	1643 CheckNotGui
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1644 new
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1645
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1646 " <Left> moves cursor when 'esckeys' is set
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1647 exe "set t_kl=\<Esc>OD"
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1648 set esckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1649 call feedkeys("axyz\<Esc>ODX", "xt")
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1650 call assert_equal("xyXz", getline(1))
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1651
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1652 " <Left> exits Insert mode when 'esckeys' is off
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1653 set noesckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1654 call setline(1, '')
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1655 call feedkeys("axyz\<Esc>ODX", "xt")
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1656 call assert_equal(["DX", "xyz"], getline(1, 2))
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1657
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1658 bwipe!
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1659 set esckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1660 endfunc
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1661
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1662 " Test for running an invalid ex command in insert mode using CTRL-O
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1663 func Test_edit_ctrl_o_invalid_cmd()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1664 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1665 set showmode showcmd
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1666 " Avoid a sleep of 3 seconds. Zero might have side effects.
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1667 call test_override('ui_delay', 50)
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1668 let caught_e492 = 0
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1669 try
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1670 call feedkeys("i\<C-O>:invalid\<CR>abc\<Esc>", "xt")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1671 catch /E492:/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1672 let caught_e492 = 1
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1673 endtry
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1674 call assert_equal(1, caught_e492)
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1675 call assert_equal('abc', getline(1))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1676 set showmode& showcmd&
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1677 call test_override('ui_delay', 0)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1678 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1679 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1680
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1681 " Test for editing a file with a very long name
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1682 func Test_edit_illegal_filename()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1683 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1684 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1685 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1686 exe 'edit ' . repeat('f', 5000)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1687 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1688 call assert_match("Illegal file name$", split(msg, "\n")[0])
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1689 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1690 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1691
22490 23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1692 " Test for editing a directory
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1693 func Test_edit_is_a_directory()
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1694 CheckEnglish
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1695 let dirname = getcwd() . "/Xdir"
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1696 call mkdir(dirname, 'p')
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1697
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1698 new
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1699 redir => msg
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1700 exe 'edit' dirname
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1701 redir END
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1702 call assert_match("is a directory$", split(msg, "\n")[0])
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1703 bwipe!
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1704
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1705 let dirname .= '/'
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1706
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1707 new
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1708 redir => msg
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1709 exe 'edit' dirname
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1710 redir END
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1711 call assert_match("is a directory$", split(msg, "\n")[0])
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1712 bwipe!
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1713
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1714 call delete(dirname, 'rf')
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1715 endfunc
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1716
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1717 " Test for editing a file using invalid file encoding
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1718 func Test_edit_invalid_encoding()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1719 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1720 call writefile([], 'Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1721 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1722 new ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1723 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1724 call assert_match('\[NOT converted\]', msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1725 call delete('Xfile')
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1726 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1727 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1728
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1729 " Test for the "charconvert" option
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1730 func Test_edit_charconvert()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1731 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1732 call writefile(['one', 'two'], 'Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1733
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1734 " set 'charconvert' to a non-existing function
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1735 set charconvert=NonExitingFunc()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1736 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1737 let caught_e117 = v:false
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1738 try
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1739 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1740 edit ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1741 catch /E117:/
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1742 let caught_e117 = v:true
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1743 finally
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1744 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1745 endtry
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1746 call assert_true(caught_e117)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1747 call assert_equal(['one', 'two'], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1748 call assert_match("Conversion with 'charconvert' failed", msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1749 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1750 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1751
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1752 " 'charconvert' function doesn't create a output file
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1753 func Cconv1()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1754 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1755 set charconvert=Cconv1()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1756 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1757 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1758 edit ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1759 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1760 call assert_equal(['one', 'two'], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1761 call assert_match("can't read output of 'charconvert'", msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1762 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1763 delfunc Cconv1
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1764 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1765
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1766 " 'charconvert' function to convert to upper case
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1767 func Cconv2()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1768 let data = readfile(v:fname_in)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1769 call map(data, 'toupper(v:val)')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1770 call writefile(data, v:fname_out)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1771 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1772 set charconvert=Cconv2()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1773 new Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1774 write ++enc=ucase Xfile1
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1775 call assert_equal(['ONE', 'TWO'], readfile('Xfile1'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1776 call delete('Xfile1')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1777 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1778 delfunc Cconv2
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1779 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1780
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1781 " 'charconvert' function removes the input file
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1782 func Cconv3()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1783 call delete(v:fname_in)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1784 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1785 set charconvert=Cconv3()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1786 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1787 call assert_fails('edit ++enc=lcase Xfile', 'E202:')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1788 call assert_equal([''], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1789 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1790 delfunc Cconv3
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1791 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1792
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1793 call delete('Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1794 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1795
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1796 " Test for editing a file without read permission
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1797 func Test_edit_file_no_read_perm()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1798 CheckUnix
24164 2259c73cc1d9 patch 8.2.2623: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 24057 diff changeset	1799 CheckNotRoot
2259c73cc1d9 patch 8.2.2623: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 24057 diff changeset	1800
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1801 call writefile(['one', 'two'], 'Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1802 call setfperm('Xfile', '-w-------')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1803 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1804 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1805 edit Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1806 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1807 call assert_equal(1, &readonly)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1808 call assert_equal([''], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1809 call assert_match('\[Permission Denied\]', msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1810 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1811 call delete('Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1812 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1813
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1814 " Pressing escape in 'insertmode' should beep
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1815 func Test_edit_insertmode_esc_beeps()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1816 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1817 set insertmode
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1818 call assert_beeps("call feedkeys(\"one\<Esc>\", 'xt')")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1819 set insertmode&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1820 " unsupported CTRL-G command should beep in insert mode.
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1821 call assert_beeps("normal i\<C-G>l")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1822 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1823 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1824
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1825 " Test for 'hkmap' and 'hkmapp'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1826 func Test_edit_hkmap()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1827 CheckFeature rightleft
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1828 if has('win32') && !has('gui')
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1829 throw 'Skipped: fails on the MS-Windows terminal version'
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1830 endif
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1831 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1832
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1833 set revins hkmap
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1834 let str = 'abcdefghijklmnopqrstuvwxyz'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1835 let str ..= 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1836 let str ..= '`/'',.;'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1837 call feedkeys('i' .. str, 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1838 let expected = "óõú,.;"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1839 let expected ..= "ZYXWVUTSRQPONMLKJIHGFEDCBA"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1840 let expected ..= "æèñ'äåàãø/ôíîöêìçïéòë÷âáðù"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1841 call assert_equal(expected, getline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1842
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1843 %d
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1844 set revins hkmap hkmapp
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1845 let str = 'abcdefghijklmnopqrstuvwxyz'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1846 let str ..= 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1847 call feedkeys('i' .. str, 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1848 let expected = "õYXWVUTSRQóOïíLKJIHGFEDêBA"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1849 let expected ..= "öòXùåèúæø'ôñðîì÷çéäâóǟãëáà"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1850 call assert_equal(expected, getline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1851
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1852 set revins& hkmap& hkmapp&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1853 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1854 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1855
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1856 " Test for 'allowrevins' and using CTRL-_ in insert mode
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1857 func Test_edit_allowrevins()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1858 CheckFeature rightleft
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1859 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1860 set allowrevins
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1861 call feedkeys("iABC\<C-_>DEF\<C-_>GHI", 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1862 call assert_equal('ABCFEDGHI', getline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1863 set allowrevins&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1864 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1865 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1866
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1867 " Test for inserting a register in insert mode using CTRL-R
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1868 func Test_edit_insert_reg()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1869 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1870 let g:Line = ''
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1871 func SaveFirstLine()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1872 let g:Line = Screenline(1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1873 return 'r'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1874 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1875 inoremap <expr> <buffer> <F2> SaveFirstLine()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1876 call test_override('redraw_flag', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1877 call test_override('char_avail', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1878 let @r = 'sample'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1879 call feedkeys("a\<C-R>=SaveFirstLine()\<CR>", "xt")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1880 call assert_equal('"', g:Line)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1881 call test_override('ALL', 0)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1882 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1883 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1884
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1885 " When a character is inserted at the last position of the last line in a
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1886 " window, the window contents should be scrolled one line up. If the top line
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1887 " is part of a fold, then the entire fold should be scrolled up.
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1888 func Test_edit_lastline_scroll()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1889 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1890 let h = winheight(0)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1891 let lines = ['one', 'two', 'three']
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1892 let lines += repeat(['vim'], h - 4)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1893 call setline(1, lines)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1894 call setline(h, repeat('x', winwidth(0) - 1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1895 call feedkeys("GAx", 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1896 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1897 call assert_equal(h - 1, winline())
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1898 call assert_equal(2, line('w0'))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1899
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1900 " scroll with a fold
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1901 1,2fold
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1902 normal gg
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1903 call setline(h + 1, repeat('x', winwidth(0) - 1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1904 call feedkeys("GAx", 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1905 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1906 call assert_equal(h - 1, winline())
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1907 call assert_equal(3, line('w0'))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1908
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1909 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1910 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1911
22588 050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1912 func Test_edit_browse()
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1913 " in the GUI this opens a file picker, we only test the terminal behavior
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1914 CheckNotGui
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1915
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1916 " ":browse xxx" checks for the FileExplorer augroup and assumes editing "."
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1917 " works then.
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1918 augroup FileExplorer
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1919 au!
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1920 augroup END
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1921
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1922 " When the USE_FNAME_CASE is defined this used to cause a crash.
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1923 browse enew
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1924 bwipe!
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1925
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1926 browse split
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1927 bwipe!
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1928 endfunc
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1929
22724 51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1930 func Test_read_invalid()
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1931 set encoding=latin1
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1932 " This was not properly checking for going past the end.
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1933 call assert_fails('r`=', 'E484')
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1934 set encoding=utf-8
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1935 endfunc
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1936
24882 4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1937 " Test for the 'revins' option
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1938 func Test_edit_revins()
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1939 CheckFeature rightleft
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1940 new
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1941 set revins
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1942 exe "normal! ione\ttwo three"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1943 call assert_equal("eerht owt\teno", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1944 call setline(1, "one\ttwo three")
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1945 normal! gg$bi a
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1946 call assert_equal("one\ttwo a three", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1947 exe "normal! $bi\<BS>\<BS>"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1948 call assert_equal("one\ttwo a ree", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1949 exe "normal! 0wi\<C-W>"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1950 call assert_equal("one\t a ree", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1951 exe "normal! 0wi\<C-U>"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1952 call assert_equal("one\t ", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1953 " newline in insert mode starts at the end of the line
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1954 call setline(1, 'one two three')
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1955 exe "normal! wi\nfour"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1956 call assert_equal(['one two three', 'ruof'], getline(1, '$'))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1957 set revins&
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1958 bw!
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1959 endfunc
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1960
25786 ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1961 " Test for getting the character of the line below after "p"
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1962 func Test_edit_put_CTRL_E()
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1963 set encoding=latin1
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1964 new
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1965 let @" = ''
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1966 sil! norm orggRx
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1967 sil! norm pr
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1968 call assert_equal(['r', 'r'], getline(1, 2))
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1969 bwipe!
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1970 set encoding=utf-8
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1971 endfunc
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1972
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1973 " Test for ModeChanged pattern
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1974 func Test_mode_changes()
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1975 let g:index = 0
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1976 let g:mode_seq = ['n', 'i', 'n', 'v', 'V', 'i', 'ix', 'i', 'ic', 'i', 'n', 'no', 'n', 'V', 'v', 's', 'n']
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1977 func! TestMode()
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1978 call assert_equal(g:mode_seq[g:index], get(v:event, "old_mode"))
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1979 call assert_equal(g:mode_seq[g:index + 1], get(v:event, "new_mode"))
25856 1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	1980 call assert_equal(mode(1), get(v:event, "new_mode"))
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1981 let g:index += 1
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1982 endfunc
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1983
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1984 au ModeChanged * :call TestMode()
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1985 let g:n_to_any = 0
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1986 au ModeChanged n:* let g:n_to_any += 1
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1987 call feedkeys("i\<esc>vVca\<CR>\<C-X>\<C-L>\<esc>ggdG", 'tnix')
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1988
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1989 let g:V_to_v = 0
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1990 au ModeChanged V:v let g:V_to_v += 1
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1991 call feedkeys("Vv\<C-G>\<esc>", 'tnix')
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1992 call assert_equal(len(filter(g:mode_seq[1:], {idx, val -> val == 'n'})), g:n_to_any)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	1993 call assert_equal(1, g:V_to_v)
25856 1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	1994 call assert_equal(len(g:mode_seq) - 1, g:index)
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	1995
25858 fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	1996 let g:n_to_i = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	1997 au ModeChanged n:i let g:n_to_i += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	1998 let g:n_to_niI = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	1999 au ModeChanged i:niI let g:n_to_niI += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2000 let g:niI_to_i = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2001 au ModeChanged niI:i let g:niI_to_i += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2002 let g:nany_to_i = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2003 au ModeChanged n*:i let g:nany_to_i += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2004 let g:i_to_n = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2005 au ModeChanged i:n let g:i_to_n += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2006 let g:nori_to_any = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2007 au ModeChanged [ni]:* let g:nori_to_any += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2008 let g:i_to_any = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2009 au ModeChanged i:* let g:i_to_any += 1
25856 1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2010 let g:index = 0
1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2011 let g:mode_seq = ['n', 'i', 'niI', 'i', 'n']
1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2012 call feedkeys("a\<C-O>l\<esc>", 'tnix')
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2013 call assert_equal(len(g:mode_seq) - 1, g:index)
25858 fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2014 call assert_equal(1, g:n_to_i)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2015 call assert_equal(1, g:n_to_niI)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2016 call assert_equal(1, g:niI_to_i)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2017 call assert_equal(2, g:nany_to_i)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2018 call assert_equal(1, g:i_to_n)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2019 call assert_equal(2, g:i_to_any)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2020 call assert_equal(3, g:nori_to_any)
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2021
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2022 if has('terminal')
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2023 let g:mode_seq += ['c', 'n', 't', 'nt', 'c', 'nt', 'n']
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2024 call feedkeys(":term\<CR>\<C-W>N:bd!\<CR>", 'tnix')
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2025 call assert_equal(len(g:mode_seq) - 1, g:index)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2026 call assert_equal(1, g:n_to_i)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2027 call assert_equal(1, g:n_to_niI)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2028 call assert_equal(1, g:niI_to_i)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2029 call assert_equal(2, g:nany_to_i)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2030 call assert_equal(1, g:i_to_n)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2031 call assert_equal(2, g:i_to_any)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2032 call assert_equal(5, g:nori_to_any)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2033 endif
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2034
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2035 au! ModeChanged
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2036 delfunc TestMode
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2037 unlet! g:mode_seq
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2038 unlet! g:index
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2039 unlet! g:n_to_any
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2040 unlet! g:V_to_v
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2041 unlet! g:n_to_i
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2042 unlet! g:n_to_niI
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2043 unlet! g:niI_to_i
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2044 unlet! g:nany_to_i
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2045 unlet! g:i_to_n
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2046 unlet! g:nori_to_any
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2047 unlet! g:i_to_any
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2048 endfunc
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2049
26155 f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2050 func Test_recursive_ModeChanged()
f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2051 au! ModeChanged * norm 0u
f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2052 sil! norm
26157 20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2053 au! ModeChanged
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2054 endfunc
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2055
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2056 func Test_ModeChanged_starts_visual()
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2057 " This was triggering ModeChanged before setting VIsual, causing a crash.
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2058 au! ModeChanged * norm 0u
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2059 sil! norm
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2060
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2061 au! ModeChanged
26155 f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2062 endfunc
f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2063
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2064 " Test toggling of input method. See :help i_CTRL-^
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2065 func Test_edit_CTRL_hat()
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2066 CheckFeature xim
26069 33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2067
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2068 " FIXME: test fails with Athena and Motif GUI.
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2069 " test also fails when running in the GUI.
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2070 CheckFeature gui_gtk
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2071 CheckNotGui
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2072
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2073 new
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2074
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2075 call assert_equal(0, &iminsert)
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2076 call feedkeys("i\<C-^>", 'xt')
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2077 call assert_equal(2, &iminsert)
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2078 call feedkeys("i\<C-^>", 'xt')
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2079 call assert_equal(0, &iminsert)
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2080
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2081 bwipe!
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2082 endfunc
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2083
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2084
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	2085 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_edit.vim @ 26743:c2c40cefc17b v8.2.3900