diff src/testdir/test_winbar.vim @ 16519:a147acab726f v8.1.1263

patch 8.1.1263: mouse clicks in WinBar not tested commit https://github.com/vim/vim/commit/66f83111520f299e688eb15e3cb95ec1fa10ba10 Author: Bram Moolenaar <Bram@vim.org> Date: Sat May 4 16:06:12 2019 +0200 patch 8.1.1263: mouse clicks in WinBar not tested Problem: Mouse clicks in WinBar not tested. Solution: Add a test for clicking on the WinBar entries.
author Bram Moolenaar <Bram@vim.org>
date Sat, 04 May 2019 16:15:05 +0200
parents 3f16cf18386c
children 1bf49cd87e6b
line wrap: on
line diff
--- a/src/testdir/test_winbar.vim
+++ b/src/testdir/test_winbar.vim
@@ -21,3 +21,47 @@ func Test_add_remove_menu()
   aunmenu WinBar.Cont
   close
 endfunc
+
+func Test_click_in_winbar()
+  new
+  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
+
+  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]
+    call test_setmouse(1, 1)
+    call feedkeys("\<LeftMouse>", "xt")
+    call assert_equal(0, g:did_next, 'col ' .. col)
+    call assert_equal(0, g:did_cont, 'col ' .. col)
+  endfor
+
+  for col in range(2, 7)
+    let g:did_next = 0
+    call test_setmouse(1, col)
+    call feedkeys("\<LeftMouse>", "xt")
+    call assert_equal(11, g:did_next, 'col ' .. col)
+  endfor
+
+  for col in range(10, 15)
+    let g:did_cont = 0
+    call test_setmouse(1, col)
+    call feedkeys("\<LeftMouse>", "xt")
+    call assert_equal(12, g:did_cont, 'col ' .. col)
+  endfor
+
+  let wincount = winnr('$')
+  call test_setmouse(1, 20)
+  call feedkeys("\<LeftMouse>", "xt")
+  call assert_equal(wincount - 1, winnr('$'))
+
+  let &mouse = save_mouse
+endfunc