Mercurial > vim
diff src/testdir/test_termcodes.vim @ 19657:da791e5c0139 v8.2.0385
patch 8.2.0385: menu functionality insufficiently tested
Commit: https://github.com/vim/vim/commit/0eabd4dc8ff50658f0ea0e92c7918a42242f6b80
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Mar 15 16:13:53 2020 +0100
patch 8.2.0385: menu functionality insufficiently tested
Problem: Menu functionality insufficiently tested.
Solution: Add tests. Add menu_info(). (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/5760)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Sun, 15 Mar 2020 16:15:04 +0100 |
| parents | 5c256866b837 |
| children | 0208534b8a84 |
line wrap: on
line diff
--- a/src/testdir/test_termcodes.vim +++ b/src/testdir/test_termcodes.vim @@ -979,6 +979,39 @@ func Test_term_mouse_middle_click_in_cmd call test_override('no_query_mouse', 0) endfunc +" Test for displaying the popup menu using the right mouse click +func Test_mouse_popup_menu() + CheckFeature menu + new + call setline(1, 'popup menu test') + let save_mouse = &mouse + let save_term = &term + let save_ttymouse = &ttymouse + let save_mousemodel = &mousemodel + call test_override('no_query_mouse', 1) + set mouse=a term=xterm mousemodel=popup + + menu PopUp.foo :let g:menustr = 'foo'<CR> + menu PopUp.bar :let g:menustr = 'bar'<CR> + menu PopUp.baz :let g:menustr = 'baz'<CR> + + for ttymouse_val in s:ttymouse_values + exe 'set ttymouse=' .. ttymouse_val + let g:menustr = '' + call feedkeys(MouseRightClickCode(1, 4) + \ .. MouseRightReleaseCode(1, 4) .. "\<Down>\<Down>\<CR>", "x") + call assert_equal('bar', g:menustr) + endfor + + unmenu PopUp + let &mouse = save_mouse + let &term = save_term + let &ttymouse = save_ttymouse + let &mousemodel = save_mousemodel + call test_override('no_query_mouse', 0) + close! +endfunc + " This only checks if the sequence is recognized. func Test_term_rgb_response() set t_RF=x @@ -1501,3 +1534,5 @@ func Test_cmdline_literal() set timeoutlen& endfunc + +" vim: shiftwidth=2 sts=2 expandtab