close
endfunc
-func Test_click_in_winbar()
- new
+" Create a WinBar with three buttons.
+" Columns of the button edges:
+" _Next_ _Cont_ _Close_
+" 2 7 10 15 18 24
+func SetupWinbar()
amenu 1.10 WinBar.Next :let g:did_next = 11<CR>
amenu 1.20 WinBar.Cont :let g:did_cont = 12<CR>
amenu 1.30 WinBar.Close :close<CR>
redraw
call assert_match('Next Cont Close', Screenline(1))
+endfunc
+func Test_click_in_winbar()
+ new
+ call SetupWinbar()
let save_mouse = &mouse
set mouse=a
- " Columns of the button edges:
- " _Next_ _Cont_ _Close_
- " 2 7 10 15 18 24
let g:did_next = 0
let g:did_cont = 0
for col in [1, 8, 9, 16, 17, 25, 26]
let &mouse = save_mouse
endfunc
+
+func Test_click_in_other_winbar()
+ new
+ call SetupWinbar()
+ let save_mouse = &mouse
+ set mouse=a
+ let winid = win_getid()
+
+ split
+ let [row, col] = win_screenpos(winid)
+
+ " Click on Next button in other window
+ let g:did_next = 0
+ call test_setmouse(row, 5)
+ call feedkeys("\<LeftMouse>", "xt")
+ call assert_equal(11, g:did_next)
+
+ " Click on Cont button in other window from Visual mode
+ let g:did_cont = 0
+ call setline(1, 'select XYZ here')
+ call test_setmouse(row, 12)
+ call feedkeys("0fXvfZ\<LeftMouse>x", "xt")
+ call assert_equal(12, g:did_cont)
+ call assert_equal('select here', getline(1))
+
+ " Click on Close button in other window
+ let wincount = winnr('$')
+ let winid = win_getid()
+ call test_setmouse(row, 20)
+ call feedkeys("\<LeftMouse>", "xt")
+ call assert_equal(wincount - 1, winnr('$'))
+ call assert_equal(winid, win_getid())
+
+ bwipe!
+endfunc