| Bram Moolenaar | 1b9645d | 2017-09-17 23:03:31 +0200 | [diff] [blame] | 1 | " Test WinBar |
| 2 | |
| 3 | if !has('menu') |
| 4 | finish |
| 5 | endif |
| 6 | |
| Bram Moolenaar | 8caef44 | 2019-05-04 17:30:04 +0200 | [diff] [blame] | 7 | source shared.vim |
| 8 | |
| Bram Moolenaar | 1b9645d | 2017-09-17 23:03:31 +0200 | [diff] [blame] | 9 | func Test_add_remove_menu() |
| 10 | new |
| 11 | amenu 1.10 WinBar.Next :let g:did_next = 11<CR> |
| 12 | amenu 1.20 WinBar.Cont :let g:did_cont = 12<CR> |
| Bram Moolenaar | 8caef44 | 2019-05-04 17:30:04 +0200 | [diff] [blame] | 13 | redraw |
| 14 | call assert_match('Next Cont', Screenline(1)) |
| 15 | |
| Bram Moolenaar | 1b9645d | 2017-09-17 23:03:31 +0200 | [diff] [blame] | 16 | emenu WinBar.Next |
| 17 | call assert_equal(11, g:did_next) |
| 18 | emenu WinBar.Cont |
| 19 | call assert_equal(12, g:did_cont) |
| 20 | |
| 21 | wincmd w |
| 22 | call assert_fails('emenu WinBar.Next', 'E334') |
| 23 | wincmd p |
| 24 | |
| 25 | aunmenu WinBar.Next |
| 26 | aunmenu WinBar.Cont |
| 27 | close |
| 28 | endfunc |
| Bram Moolenaar | 66f8311 | 2019-05-04 16:06:12 +0200 | [diff] [blame] | 29 | |
| 30 | func Test_click_in_winbar() |
| 31 | new |
| 32 | amenu 1.10 WinBar.Next :let g:did_next = 11<CR> |
| 33 | amenu 1.20 WinBar.Cont :let g:did_cont = 12<CR> |
| 34 | amenu 1.30 WinBar.Close :close<CR> |
| 35 | redraw |
| Bram Moolenaar | 8caef44 | 2019-05-04 17:30:04 +0200 | [diff] [blame] | 36 | call assert_match('Next Cont Close', Screenline(1)) |
| Bram Moolenaar | 66f8311 | 2019-05-04 16:06:12 +0200 | [diff] [blame] | 37 | |
| 38 | let save_mouse = &mouse |
| 39 | set mouse=a |
| 40 | |
| 41 | " Columns of the button edges: |
| 42 | " _Next_ _Cont_ _Close_ |
| 43 | " 2 7 10 15 18 24 |
| 44 | let g:did_next = 0 |
| 45 | let g:did_cont = 0 |
| 46 | for col in [1, 8, 9, 16, 17, 25, 26] |
| Bram Moolenaar | 8caef44 | 2019-05-04 17:30:04 +0200 | [diff] [blame] | 47 | call test_setmouse(1, col) |
| Bram Moolenaar | 66f8311 | 2019-05-04 16:06:12 +0200 | [diff] [blame] | 48 | call feedkeys("\<LeftMouse>", "xt") |
| 49 | call assert_equal(0, g:did_next, 'col ' .. col) |
| 50 | call assert_equal(0, g:did_cont, 'col ' .. col) |
| 51 | endfor |
| 52 | |
| 53 | for col in range(2, 7) |
| 54 | let g:did_next = 0 |
| 55 | call test_setmouse(1, col) |
| 56 | call feedkeys("\<LeftMouse>", "xt") |
| 57 | call assert_equal(11, g:did_next, 'col ' .. col) |
| 58 | endfor |
| 59 | |
| 60 | for col in range(10, 15) |
| 61 | let g:did_cont = 0 |
| 62 | call test_setmouse(1, col) |
| 63 | call feedkeys("\<LeftMouse>", "xt") |
| 64 | call assert_equal(12, g:did_cont, 'col ' .. col) |
| 65 | endfor |
| 66 | |
| 67 | let wincount = winnr('$') |
| 68 | call test_setmouse(1, 20) |
| 69 | call feedkeys("\<LeftMouse>", "xt") |
| 70 | call assert_equal(wincount - 1, winnr('$')) |
| 71 | |
| 72 | let &mouse = save_mouse |
| 73 | endfunc |