vim: src/testdir/test_termcodes.vim annotate

annotate src/testdir/test_termcodes.vim @ 16437:fbc0b3b38c79 v8.1.1223

patch 8.1.1223: middle mouse click test fails without a clipboard commit https://github.com/vim/vim/commit/564344ace9ef06b22e4e60a0196c41b410ac27da Author: Bram Moolenaar <Bram@vim.org> Date: Sun Apr 28 13:00:12 2019 +0200 patch 8.1.1223: middle mouse click test fails without a clipboard Problem: Middle mouse click test fails without a clipboard. Solution: Check if the clipboard can be used. (Dominique Pelle, Christian Brabandt) Also use WorkingClipboard() instead of checking for the "clipboard" feature.

author	Bram Moolenaar <Bram@vim.org>
date	Sun, 28 Apr 2019 13:15:06 +0200
parents	4182fa3b9f70
children	8428e0edba1b

rev	line source
16263 d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 " Tests for decoding escape sequences sent by the terminal.
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	2
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 " This only works for Unix in a terminal
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 if has('gui_running') \|\| !has('unix')
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 finish
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 endif
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	7
16437 fbc0b3b38c79 patch 8.1.1223: middle mouse click test fails without a clipboard Bram Moolenaar <Bram@vim.org> parents: 16423 diff changeset	8 source shared.vim
fbc0b3b38c79 patch 8.1.1223: middle mouse click test fails without a clipboard Bram Moolenaar <Bram@vim.org> parents: 16423 diff changeset	9
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	10 " Helper function to emit a terminal escape code.
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	11 func TerminalEscapeCode(code_xterm, code_sgr, row, col, m)
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	12 if &ttymouse ==# 'xterm2'
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	13 " need to use byte encoding here.
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	14 let str = list2str([a:code_xterm, a:col + 0x20, a:row + 0x20])
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	15 if has('iconv')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	16 let bytes = iconv(str, 'utf-8', 'latin1')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	17 else
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	18 " Hopefully the numbers are not too big.
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	19 let bytes = str
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	20 endif
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	21 call feedkeys("\<Esc>[M" .. bytes, 'Lx!')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	22 elseif &ttymouse ==# 'sgr'
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	23 call feedkeys(printf("\<Esc>[<%d;%d;%d%s", a:code_sgr, a:col, a:row, a:m), 'Lx!')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	24 endif
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	25 endfunc
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	26
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	27 func MouseLeftClick(row, col)
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	28 call TerminalEscapeCode(0x20, 0, a:row, a:col, 'M')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	29 endfunc
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	30
16423 4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	31 func MouseMiddleClick(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	32 call TerminalEscapeCode(0x21, 1, a:row, a:col, 'M')
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	33 endfunc
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	34
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	35 func MouseLeftRelease(row, col)
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	36 call TerminalEscapeCode(0x23, 3, a:row, a:col, 'm')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	37 endfunc
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	38
16423 4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	39 func MouseMiddleRelease(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	40 call TerminalEscapeCode(0x23, 3, a:row, a:col, 'm')
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	41 endfunc
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	42
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	43 func MouseLeftDrag(row, col)
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	44 call TerminalEscapeCode(0x43, 0x20, a:row, a:col, 'M')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	45 endfunc
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	46
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	47 func MouseWheelUp(row, col)
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	48 call TerminalEscapeCode(0x40, 0x40, a:row, a:col, 'M')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	49 endfunc
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	50
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	51 func MouseWheelDown(row, col)
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	52 call TerminalEscapeCode(0x41, 0x41, a:row, a:col, 'M')
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	53 endfunc
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	54
16423 4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	55 func Test_xterm_mouse_left_click()
16263 d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	56 new
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 let save_mouse = &mouse
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	58 let save_term = &term
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	59 let save_ttymouse = &ttymouse
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	60 set mouse=a term=xterm
16263 d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 call setline(1, ['line 1', 'line 2', 'line 3 is a bit longer'])
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	62
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	63 for ttymouse_val in ['xterm2', 'sgr']
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	64 let msg = 'ttymouse=' .. ttymouse_val
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	65 exe 'set ttymouse=' . ttymouse_val
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	66 go
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	67 call assert_equal([0, 1, 1, 0], getpos('.'), msg)
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	68 let row = 2
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	69 let col = 6
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	70 call MouseLeftClick(row, col)
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	71 call MouseLeftRelease(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	72 call assert_equal([0, 2, 6, 0], getpos('.'), msg)
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	73 endfor
16263 d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	74
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 let &mouse = save_mouse
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	76 let &term = save_term
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	77 let &ttymouse = save_ttymouse
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 bwipe!
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 endfunc
d3377393e3d9 patch 8.1.1136: decoding of mouse click escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	80
16423 4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	81 func Test_xterm_mouse_middle_click()
16437 fbc0b3b38c79 patch 8.1.1223: middle mouse click test fails without a clipboard Bram Moolenaar <Bram@vim.org> parents: 16423 diff changeset	82 if !WorkingClipboard()
fbc0b3b38c79 patch 8.1.1223: middle mouse click test fails without a clipboard Bram Moolenaar <Bram@vim.org> parents: 16423 diff changeset	83 throw 'Skipped: No working clipboard'
fbc0b3b38c79 patch 8.1.1223: middle mouse click test fails without a clipboard Bram Moolenaar <Bram@vim.org> parents: 16423 diff changeset	84 endif
fbc0b3b38c79 patch 8.1.1223: middle mouse click test fails without a clipboard Bram Moolenaar <Bram@vim.org> parents: 16423 diff changeset	85
16423 4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	86 new
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	87 let save_mouse = &mouse
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	88 let save_term = &term
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	89 let save_ttymouse = &ttymouse
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	90 let save_quotestar = @*
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	91 let @* = 'abc'
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	92 set mouse=a term=xterm
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	93
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	94 for ttymouse_val in ['xterm2', 'sgr']
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	95 let msg = 'ttymouse=' .. ttymouse_val
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	96 exe 'set ttymouse=' . ttymouse_val
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	97 call setline(1, ['123456789', '123456789'])
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	98
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	99 " Middle-click in the middle of the line pastes text where clicked.
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	100 let row = 1
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	101 let col = 6
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	102 call MouseMiddleClick(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	103 call MouseMiddleRelease(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	104 call assert_equal(['12345abc6789', '123456789'], getline(1, '$'), msg)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	105
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	106 " Middle-click beyond end of the line pastes text at the end of the line.
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	107 let col = 20
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	108 call MouseMiddleClick(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	109 call MouseMiddleRelease(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	110 call assert_equal(['12345abc6789abc', '123456789'], getline(1, '$'), msg)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	111
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	112 " Middle-click beyond the last line pastes in the last line.
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	113 let row = 5
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	114 let col = 3
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	115 call MouseMiddleClick(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	116 call MouseMiddleRelease(row, col)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	117 call assert_equal(['12345abc6789abc', '12abc3456789'], getline(1, '$'), msg)
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	118 endfor
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	119
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	120 let &mouse = save_mouse
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	121 let &term = save_term
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	122 let &ttymouse = save_ttymouse
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	123 let @* = save_quotestar
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	124 bwipe!
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	125 endfunc
4182fa3b9f70 patch 8.1.1216: mouse middle click is not tested Bram Moolenaar <Bram@vim.org> parents: 16352 diff changeset	126
16265 7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	127 func Test_xterm_mouse_wheel()
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	128 new
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	129 let save_mouse = &mouse
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	130 let save_term = &term
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	131 let save_ttymouse = &ttymouse
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	132 set mouse=a term=xterm
16265 7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	133 call setline(1, range(1, 100))
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	134
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	135 for ttymouse_val in ['xterm2', 'sgr']
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	136 let msg = 'ttymouse=' .. ttymouse_val
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	137 exe 'set ttymouse=' . ttymouse_val
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	138 go
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	139 call assert_equal(1, line('w0'), msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	140 call assert_equal([0, 1, 1, 0], getpos('.'), msg)
16265 7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	141
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	142 call MouseWheelDown(1, 1)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	143 call assert_equal(4, line('w0'), msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	144 call assert_equal([0, 4, 1, 0], getpos('.'), msg)
16265 7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	145
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	146 call MouseWheelDown(1, 1)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	147 call assert_equal(7, line('w0'), msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	148 call assert_equal([0, 7, 1, 0], getpos('.'), msg)
16265 7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	149
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	150 call MouseWheelUp(1, 1)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	151 call assert_equal(4, line('w0'), msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	152 call assert_equal([0, 7, 1, 0], getpos('.'), msg)
16265 7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	153
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	154 call MouseWheelUp(1, 1)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	155 call assert_equal(1, line('w0'), msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	156 call assert_equal([0, 7, 1, 0], getpos('.'), msg)
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	157 endfor
16265 7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	158
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	159 let &mouse = save_mouse
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	160 let &term = save_term
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	161 let &ttymouse = save_ttymouse
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	162 bwipe!
7feb5b90be5f patch 8.1.1137: xterm mouse wheel escape sequence is not tested Bram Moolenaar <Bram@vim.org> parents: 16263 diff changeset	163 endfunc
16275 ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	164
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	165 func Test_xterm_mouse_drag_window_separator()
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	166 let save_mouse = &mouse
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	167 let save_term = &term
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	168 let save_ttymouse = &ttymouse
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	169 set mouse=a term=xterm
16275 ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	170
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	171 for ttymouse_val in ['xterm2', 'sgr']
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	172 let msg = 'ttymouse=' .. ttymouse_val
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	173 exe 'set ttymouse=' . ttymouse_val
16275 ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	174
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	175 " Split horizontally and test dragging the horizontal window separator.
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	176 split
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	177 let rowseparator = winheight(0) + 1
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	178 let row = rowseparator
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	179 let col = 1
16310 5b8b849dc3aa patch 8.1.1160: termcodes test would fail in a very big terminal Bram Moolenaar <Bram@vim.org> parents: 16300 diff changeset	180
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	181 " When 'ttymouse' is 'xterm2', row/col bigger than 223 are not supported.
c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	182 if ttymouse_val !=# 'xterm2' \|\| row <= 223
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	183 call MouseLeftClick(row, col)
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	184 let row -= 1
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	185 call MouseLeftDrag(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	186 call assert_equal(rowseparator - 1, winheight(0) + 1, msg)
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	187 let row += 1
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	188 call MouseLeftDrag(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	189 call assert_equal(rowseparator, winheight(0) + 1, msg)
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	190 call MouseLeftRelease(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	191 call assert_equal(rowseparator, winheight(0) + 1, msg)
16310 5b8b849dc3aa patch 8.1.1160: termcodes test would fail in a very big terminal Bram Moolenaar <Bram@vim.org> parents: 16300 diff changeset	192 endif
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	193 bwipe!
16275 ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	194
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	195 " Split vertically and test dragging the vertical window separator.
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	196 vsplit
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	197 let colseparator = winwidth(0) + 1
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	198 let row = 1
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	199 let col = colseparator
16275 ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	200
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	201 " When 'ttymouse' is 'xterm2', row/col bigger than 223 are not supported.
c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	202 if ttymouse_val !=# 'xterm2' \|\| col <= 223
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	203 call MouseLeftClick(row, col)
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	204 let col -= 1
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	205 call MouseLeftDrag(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	206 call assert_equal(colseparator - 1, winwidth(0) + 1, msg)
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	207 let col += 1
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	208 call MouseLeftDrag(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	209 call assert_equal(colseparator, winwidth(0) + 1, msg)
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	210 call MouseLeftRelease(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	211 call assert_equal(colseparator, winwidth(0) + 1, msg)
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	212 endif
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	213 bwipe!
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	214 endfor
16275 ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	215
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	216 let &mouse = save_mouse
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	217 let &term = save_term
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	218 let &ttymouse = save_ttymouse
ed5172ae1c32 patch 8.1.1142: no test for dragging the window separators with the mouse Bram Moolenaar <Bram@vim.org> parents: 16265 diff changeset	219 endfunc
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	220
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	221 func Test_xterm_mouse_drag_statusline()
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	222 let save_mouse = &mouse
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	223 let save_term = &term
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	224 let save_ttymouse = &ttymouse
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	225 let save_laststatus = &laststatus
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	226 set mouse=a term=xterm laststatus=2
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	227
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	228 for ttymouse_val in ['xterm2', 'sgr']
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	229 let msg = 'ttymouse=' .. ttymouse_val
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	230 exe 'set ttymouse=' . ttymouse_val
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	231
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	232 call assert_equal(1, &cmdheight, msg)
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	233 let rowstatusline = winheight(0) + 1
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	234 let row = rowstatusline
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	235 let col = 1
16310 5b8b849dc3aa patch 8.1.1160: termcodes test would fail in a very big terminal Bram Moolenaar <Bram@vim.org> parents: 16300 diff changeset	236
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	237 if ttymouse_val ==# 'xterm2' && row > 223
c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	238 " When 'ttymouse' is 'xterm2', row/col bigger than 223 are not supported.
16310 5b8b849dc3aa patch 8.1.1160: termcodes test would fail in a very big terminal Bram Moolenaar <Bram@vim.org> parents: 16300 diff changeset	239 continue
5b8b849dc3aa patch 8.1.1160: termcodes test would fail in a very big terminal Bram Moolenaar <Bram@vim.org> parents: 16300 diff changeset	240 endif
5b8b849dc3aa patch 8.1.1160: termcodes test would fail in a very big terminal Bram Moolenaar <Bram@vim.org> parents: 16300 diff changeset	241
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	242 call MouseLeftClick(row, col)
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	243 let row -= 1
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	244 call MouseLeftDrag(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	245 call assert_equal(2, &cmdheight, msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	246 call assert_equal(rowstatusline - 1, winheight(0) + 1, msg)
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	247 let row += 1
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	248 call MouseLeftDrag(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	249 call assert_equal(1, &cmdheight, msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	250 call assert_equal(rowstatusline, winheight(0) + 1, msg)
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	251 call MouseLeftRelease(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	252 call assert_equal(1, &cmdheight, msg)
2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	253 call assert_equal(rowstatusline, winheight(0) + 1, msg)
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	254 endfor
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	255
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	256 let &mouse = save_mouse
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	257 let &term = save_term
f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	258 let &ttymouse = save_ttymouse
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	259 let &laststatus = save_laststatus
16300 f3d579f009d1 patch 8.1.1155: termcodes tests can be improved Bram Moolenaar <Bram@vim.org> parents: 16275 diff changeset	260 endfunc
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	261
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	262 func Test_xterm_mouse_click_tab()
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	263 let save_mouse = &mouse
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	264 let save_term = &term
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	265 let save_ttymouse = &ttymouse
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	266 set mouse=a term=xterm
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	267 let row = 1
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	268
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	269 for ttymouse_val in ['xterm2', 'sgr']
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	270 let msg = 'ttymouse=' .. ttymouse_val
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	271 exe 'set ttymouse=' . ttymouse_val
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	272 e Xfoo
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	273 tabnew Xbar
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	274
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	275 let a = split(execute(':tabs'), "\n")
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	276 call assert_equal(['Tab page 1',
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	277 \ ' Xfoo',
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	278 \ 'Tab page 2',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	279 \ '> Xbar'], a, msg)
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	280
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	281 " Test clicking on tab names in the tabline at the top.
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	282 let col = 2
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	283 redraw
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	284 call MouseLeftClick(row, col)
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	285 call MouseLeftRelease(row, col)
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	286 let a = split(execute(':tabs'), "\n")
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	287 call assert_equal(['Tab page 1',
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	288 \ '> Xfoo',
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	289 \ 'Tab page 2',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	290 \ ' Xbar'], a, msg)
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	291
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	292 let col = 9
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	293 call MouseLeftClick(row, col)
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	294 call MouseLeftRelease(row, col)
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	295 let a = split(execute(':tabs'), "\n")
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	296 call assert_equal(['Tab page 1',
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	297 \ ' Xfoo',
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	298 \ 'Tab page 2',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	299 \ '> Xbar'], a, msg)
16320 57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	300
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	301 %bwipe!
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	302 endfor
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	303
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	304 let &mouse = save_mouse
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	305 let &term = save_term
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	306 let &ttymouse = save_ttymouse
57e0f6b4a87d patch 8.1.1165: no test for mouse clicks in the terminal tabpage line Bram Moolenaar <Bram@vim.org> parents: 16310 diff changeset	307 endfunc
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	308
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	309 func Test_xterm_mouse_click_X_to_close_tab()
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	310 let save_mouse = &mouse
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	311 let save_term = &term
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	312 let save_ttymouse = &ttymouse
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	313 set mouse=a term=xterm
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	314 let row = 1
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	315 let col = &columns
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	316
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	317 for ttymouse_val in ['xterm2', 'sgr']
c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	318 if ttymouse_val ==# 'xterm2' && col > 223
c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	319 " When 'ttymouse' is 'xterm2', row/col bigger than 223 are not supported.
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	320 continue
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	321 endif
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	322 let msg = 'ttymouse=' .. ttymouse_val
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	323 exe 'set ttymouse=' . ttymouse_val
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	324 e Xtab1
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	325 tabnew Xtab2
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	326 tabnew Xtab3
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	327 tabn 2
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	328
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	329 let a = split(execute(':tabs'), "\n")
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	330 call assert_equal(['Tab page 1',
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	331 \ ' Xtab1',
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	332 \ 'Tab page 2',
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	333 \ '> Xtab2',
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	334 \ 'Tab page 3',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	335 \ ' Xtab3'], a, msg)
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	336
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	337 " Click on "X" in tabline to close current tab i.e. Xtab2.
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	338 redraw
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	339 call MouseLeftClick(row, col)
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	340 call MouseLeftRelease(row, col)
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	341 let a = split(execute(':tabs'), "\n")
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	342 call assert_equal(['Tab page 1',
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	343 \ ' Xtab1',
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	344 \ 'Tab page 2',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	345 \ '> Xtab3'], a, msg)
16324 6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	346
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	347 %bwipe!
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	348 endfor
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	349
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	350 let &mouse = save_mouse
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	351 let &term = save_term
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	352 let &ttymouse = save_ttymouse
6b2412d0509f patch 8.1.1167: no test for closing tab by click in tabline Bram Moolenaar <Bram@vim.org> parents: 16320 diff changeset	353 endfunc
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	354
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	355 func Test_xterm_mouse_drag_to_move_tab()
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	356 let save_mouse = &mouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	357 let save_term = &term
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	358 let save_ttymouse = &ttymouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	359 " Set 'mousetime' to 1 to avoid recognizing a double-click in the loop
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	360 set mouse=a term=xterm mousetime=1
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	361 let row = 1
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	362
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	363 for ttymouse_val in ['xterm2', 'sgr']
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	364 let msg = 'ttymouse=' .. ttymouse_val
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	365 exe 'set ttymouse=' . ttymouse_val
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	366 e Xtab1
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	367 tabnew Xtab2
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	368
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	369 let a = split(execute(':tabs'), "\n")
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	370 call assert_equal(['Tab page 1',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	371 \ ' Xtab1',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	372 \ 'Tab page 2',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	373 \ '> Xtab2'], a, msg)
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	374 redraw
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	375
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	376 " Click in tab2 and drag it to tab1.
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	377 " Check getcharmod() to verify that click is not
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	378 " interpreted as a spurious double-click.
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	379 call MouseLeftClick(row, 10)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	380 call assert_equal(0, getcharmod(), msg)
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	381 for col in [9, 8, 7, 6]
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	382 call MouseLeftDrag(row, col)
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	383 endfor
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	384 call MouseLeftRelease(row, col)
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	385 let a = split(execute(':tabs'), "\n")
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	386 call assert_equal(['Tab page 1',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	387 \ '> Xtab2',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	388 \ 'Tab page 2',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	389 \ ' Xtab1'], a, msg)
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	390
16342 06f3eb443e93 patch 8.1.1176: test for dragging a tab is flaky Bram Moolenaar <Bram@vim.org> parents: 16340 diff changeset	391 " brief sleep to avoid causing a double-click
06f3eb443e93 patch 8.1.1176: test for dragging a tab is flaky Bram Moolenaar <Bram@vim.org> parents: 16340 diff changeset	392 sleep 20m
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	393 %bwipe!
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	394 endfor
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	395
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	396 let &mouse = save_mouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	397 let &term = save_term
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	398 let &ttymouse = save_ttymouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	399 set mousetime&
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	400 endfunc
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	401
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	402 func Test_xterm_mouse_double_click_to_create_tab()
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	403 let save_mouse = &mouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	404 let save_term = &term
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	405 let save_ttymouse = &ttymouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	406 " Set 'mousetime' to a small value, so that double-click works but we don't
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	407 " have to wait long to avoid a triple-click.
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	408 set mouse=a term=xterm mousetime=100
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	409 let row = 1
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	410 let col = 10
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	411
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	412 for ttymouse_val in ['xterm2', 'sgr']
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	413 let msg = 'ttymouse=' .. ttymouse_val
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	414 exe 'set ttymouse=' . ttymouse_val
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	415 e Xtab1
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	416 tabnew Xtab2
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	417
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	418 let a = split(execute(':tabs'), "\n")
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	419 call assert_equal(['Tab page 1',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	420 \ ' Xtab1',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	421 \ 'Tab page 2',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	422 \ '> Xtab2'], a, msg)
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	423
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	424 redraw
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	425 call MouseLeftClick(row, col)
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	426 " Check getcharmod() to verify that first click is not
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	427 " interpreted as a spurious double-click.
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	428 call assert_equal(0, getcharmod(), msg)
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	429 call MouseLeftRelease(row, col)
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	430 call MouseLeftClick(row, col)
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	431 call assert_equal(32, getcharmod(), msg) " double-click
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	432 call MouseLeftRelease(row, col)
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	433 let a = split(execute(':tabs'), "\n")
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	434 call assert_equal(['Tab page 1',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	435 \ ' Xtab1',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	436 \ 'Tab page 2',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	437 \ '> [No Name]',
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	438 \ 'Tab page 3',
16346 2fb516abde42 patch 8.1.1178: when mouse click tests fails value of 'ttytype' is unknown Bram Moolenaar <Bram@vim.org> parents: 16342 diff changeset	439 \ ' Xtab2'], a, msg)
16340 2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	440
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	441 if ttymouse_val !=# 'sgr'
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	442 " We need to sleep, or else MouseLeftClick() in next loop
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	443 " iteration will be interpreted as a spurious triple-click.
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	444 sleep 100m
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	445 endif
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	446 %bwipe!
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	447 endfor
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	448
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	449 let &mouse = save_mouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	450 let &term = save_term
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	451 let &ttymouse = save_ttymouse
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	452 set mousetime&
2f70fc41ff7e patch 8.1.1175: no test for dragging a tab and double click for new tab Bram Moolenaar <Bram@vim.org> parents: 16324 diff changeset	453 endfunc
16348 5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	454
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	455 func Test_xterm_mouse_click_in_fold_columns()
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	456 new
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	457 let save_mouse = &mouse
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	458 let save_term = &term
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	459 let save_ttymouse = &ttymouse
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	460 let save_foldcolumn = &foldcolumn
16352 c742c008953e patch 8.1.1181: tests for mouse clicks are a bit flaky Bram Moolenaar <Bram@vim.org> parents: 16348 diff changeset	461 set mouse=a term=xterm foldcolumn=3 ttymouse=xterm2
16348 5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	462
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	463 " Create 2 nested folds.
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	464 call setline(1, range(1, 7))
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	465 2,6fold
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	466 norm! zR
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	467 4,5fold
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	468 call assert_equal([-1, -1, -1, 4, 4, -1, -1],
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	469 \ map(range(1, 7), 'foldclosed(v:val)'))
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	470
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	471 " Click in "+" of inner fold in foldcolumn should open it.
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	472 redraw
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	473 let row = 4
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	474 let col = 2
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	475 call MouseLeftClick(row, col)
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	476 call MouseLeftRelease(row, col)
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	477 call assert_equal([-1, -1, -1, -1, -1, -1, -1],
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	478 \ map(range(1, 7), 'foldclosed(v:val)'))
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	479
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	480 " Click in "-" of outer fold in foldcolumn should close it.
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	481 redraw
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	482 let row = 2
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	483 let col = 1
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	484 call MouseLeftClick(row, col)
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	485 call MouseLeftRelease(row, col)
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	486 call assert_equal([-1, 2, 2, 2, 2, 2, -1],
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	487 \ map(range(1, 7), 'foldclosed(v:val)'))
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	488 norm! zR
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	489
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	490 " Click in "\|" of inner fold in foldcolumn should close it.
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	491 redraw
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	492 let row = 5
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	493 let col = 2
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	494 call MouseLeftClick(row, col)
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	495 call MouseLeftRelease(row, col)
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	496 call assert_equal([-1, -1, -1, 4, 4, -1, -1],
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	497 \ map(range(1, 7), 'foldclosed(v:val)'))
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	498
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	499 let &foldcolumn = save_foldcolumn
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	500 let &ttymouse = save_ttymouse
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	501 let &term = save_term
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	502 let &mouse = save_mouse
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	503 bwipe!
5f3a86ba4261 patch 8.1.1179: no test for mouse clicks in the fold column Bram Moolenaar <Bram@vim.org> parents: 16346 diff changeset	504 endfunc

Mercurial > vim

annotate src/testdir/test_termcodes.vim @ 16437:fbc0b3b38c79 v8.1.1223