Mercurial > vim
comparison src/testdir/test_menu.vim @ 19517:738a4fe2c8c5 v8.2.0316
patch 8.2.0316: ex_getln.c code has insufficient test coverage
Commit: https://github.com/vim/vim/commit/8d588ccee57390aa01c2395fc599bbe6506ee13a
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Feb 25 21:47:45 2020 +0100
patch 8.2.0316: ex_getln.c code has insufficient test coverage
Problem: ex_getln.c code has insufficient test coverage.
Solution: Add more tests. Fix a problem. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/5693)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 25 Feb 2020 22:00:04 +0100 |
parents | 5bef1043abff |
children | da791e5c0139 |
comparison
equal
deleted
inserted
replaced
19516:209388e9e179 | 19517:738a4fe2c8c5 |
---|---|
86 call assert_fails('emenu n Test.FooBar', 'E333:') | 86 call assert_fails('emenu n Test.FooBar', 'E333:') |
87 nunmenu Test.FooBar.Child | 87 nunmenu Test.FooBar.Child |
88 | 88 |
89 unlet g:did_menu | 89 unlet g:did_menu |
90 endfun | 90 endfun |
91 | |
92 " Test for menu item completion in command line | |
93 func Test_menu_expand() | |
94 " Create the menu itmes for test | |
95 for i in range(1, 4) | |
96 let m = 'menu Xmenu.A' .. i .. '.A' .. i | |
97 for j in range(1, 4) | |
98 exe m .. 'B' .. j .. ' :echo "A' .. i .. 'B' .. j .. '"' .. "<CR>" | |
99 endfor | |
100 endfor | |
101 set wildmenu | |
102 | |
103 " Test for <CR> selecting a submenu | |
104 call feedkeys(":emenu Xmenu.A\<Tab>\<CR>\<Right>x\<BS>\<C-B>\"\<CR>", 'xt') | |
105 call assert_equal('"emenu Xmenu.A1.A1B2', @:) | |
106 | |
107 " Test for <Down> selecting a submenu | |
108 call feedkeys(":emenu Xmenu.A\<Tab>\<Right>\<Right>\<Down>" .. | |
109 \ "\<C-A>\<C-B>\"\<CR>", 'xt') | |
110 call assert_equal('"emenu Xmenu.A3.A3B1 A3B2 A3B3 A3B4', @:) | |
111 | |
112 " Test for <Up> to go up a submenu | |
113 call feedkeys(":emenu Xmenu.A\<Tab>\<Down>\<Up>\<Right>\<Right>" .. | |
114 \ "\<Left>\<Down>\<C-A>\<C-B>\"\<CR>", 'xt') | |
115 call assert_equal('"emenu Xmenu.A2.A2B1 A2B2 A2B3 A2B4', @:) | |
116 | |
117 " Test for <Up> to go up a menu | |
118 call feedkeys(":emenu Xmenu.A\<Tab>\<Down>\<Up>\<Up>\<Up>" .. | |
119 \ "\<C-A>\<C-B>\"\<CR>", 'xt') | |
120 call assert_equal('"emenu Buffers. Xmenu.', @:) | |
121 | |
122 set wildmenu& | |
123 unmenu Xmenu | |
124 endfunc | |
125 | |
126 " vim: shiftwidth=2 sts=2 expandtab |