Mercurial > vim

comparison src/testdir/test_termcodes.vim @ 19657:da791e5c0139 v8.2.0385

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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
comparison
equal deleted inserted replaced
19656:df9b03a56543 19657:da791e5c0139
977 let &ttymouse = save_ttymouse 977 let &ttymouse = save_ttymouse
978 let @* = '' 978 let @* = ''
979 call test_override('no_query_mouse', 0) 979 call test_override('no_query_mouse', 0)
980 endfunc 980 endfunc
981 981
982 " Test for displaying the popup menu using the right mouse click
983 func Test_mouse_popup_menu()
984 CheckFeature menu
985 new
986 call setline(1, 'popup menu test')
987 let save_mouse = &mouse
988 let save_term = &term
989 let save_ttymouse = &ttymouse
990 let save_mousemodel = &mousemodel
991 call test_override('no_query_mouse', 1)
992 set mouse=a term=xterm mousemodel=popup
993
994 menu PopUp.foo :let g:menustr = 'foo'<CR>
995 menu PopUp.bar :let g:menustr = 'bar'<CR>
996 menu PopUp.baz :let g:menustr = 'baz'<CR>
997
998 for ttymouse_val in s:ttymouse_values
999 exe 'set ttymouse=' .. ttymouse_val
1000 let g:menustr = ''
1001 call feedkeys(MouseRightClickCode(1, 4)
1002 \ .. MouseRightReleaseCode(1, 4) .. "\<Down>\<Down>\<CR>", "x")
1003 call assert_equal('bar', g:menustr)
1004 endfor
1005
1006 unmenu PopUp
1007 let &mouse = save_mouse
1008 let &term = save_term
1009 let &ttymouse = save_ttymouse
1010 let &mousemodel = save_mousemodel
1011 call test_override('no_query_mouse', 0)
1012 close!
1013 endfunc
1014
982 " This only checks if the sequence is recognized. 1015 " This only checks if the sequence is recognized.
983 func Test_term_rgb_response() 1016 func Test_term_rgb_response()
984 set t_RF=x 1017 set t_RF=x
985 set t_RB=y 1018 set t_RB=y
986 1019
1499 call feedkeys(':' .. GetEscCodeCSI27('V', '6') .. GetEscCodeCSI27('Y', '5') .. "\<C-B>\"\<CR>", 'Lx!') 1532 call feedkeys(':' .. GetEscCodeCSI27('V', '6') .. GetEscCodeCSI27('Y', '5') .. "\<C-B>\"\<CR>", 'Lx!')
1500 call assert_equal("\"\<Esc>[27;5;89~", @:) 1533 call assert_equal("\"\<Esc>[27;5;89~", @:)
1501 1534
1502 set timeoutlen& 1535 set timeoutlen&
1503 endfunc 1536 endfunc
1537
1538 " vim: shiftwidth=2 sts=2 expandtab