| " Test that the system menu can be loaded. |
| |
| if !has('menu') |
| finish |
| endif |
| |
| func Test_load_menu() |
| try |
| source $VIMRUNTIME/menu.vim |
| catch |
| call assert_report('error while loading menus: ' . v:exception) |
| endtry |
| call assert_match('browse confirm w', execute(':menu File.Save')) |
| source $VIMRUNTIME/delmenu.vim |
| endfunc |
| |
| func Test_translate_menu() |
| if !has('multi_lang') |
| return |
| endif |
| if !filereadable($VIMRUNTIME . '/lang/menu_de_de.latin1.vim') |
| throw 'Skipped: translated menu not found' |
| endif |
| |
| " First delete any English menus. |
| source $VIMRUNTIME/delmenu.vim |
| set langmenu=de_de |
| source $VIMRUNTIME/menu.vim |
| call assert_match('browse confirm w', execute(':menu Datei.Speichern')) |
| |
| source $VIMRUNTIME/delmenu.vim |
| endfunc |
| |
| func Test_menu_commands() |
| nmenu 2 Test.FooBar :let g:did_menu = 'normal'<CR> |
| vmenu 2 Test.FooBar :let g:did_menu = 'visual'<CR> |
| smenu 2 Test.FooBar :let g:did_menu = 'select'<CR> |
| omenu 2 Test.FooBar :let g:did_menu = 'op-pending'<CR> |
| tlmenu 2 Test.FooBar :let g:did_menu = 'terminal'<CR> |
| imenu 2 Test.FooBar :let g:did_menu = 'insert'<CR> |
| cmenu 2 Test.FooBar :let g:did_menu = 'cmdline'<CR> |
| emenu n Test.FooBar |
| call assert_equal('normal', g:did_menu) |
| emenu v Test.FooBar |
| call assert_equal('visual', g:did_menu) |
| emenu s Test.FooBar |
| call assert_equal('select', g:did_menu) |
| emenu o Test.FooBar |
| call assert_equal('op-pending', g:did_menu) |
| emenu t Test.FooBar |
| call assert_equal('terminal', g:did_menu) |
| emenu i Test.FooBar |
| call assert_equal('insert', g:did_menu) |
| emenu c Test.FooBar |
| call assert_equal('cmdline', g:did_menu) |
| |
| aunmenu Test.FooBar |
| tlunmenu Test.FooBar |
| call assert_fails('emenu n Test.FooBar', 'E334:') |
| |
| nmenu 2 Test.FooBar.Child :let g:did_menu = 'foobar'<CR> |
| call assert_fails('emenu n Test.FooBar', 'E333:') |
| nunmenu Test.FooBar.Child |
| |
| unlet g:did_menu |
| endfun |