Mercurial > vim
comparison src/testdir/test_termcodes.vim @ 16320:57e0f6b4a87d v8.1.1165
patch 8.1.1165: no test for mouse clicks in the terminal tabpage line
commit https://github.com/vim/vim/commit/ca57ab54d759a3e265b19bbe31b57dfed00bbdd0
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Apr 13 14:53:16 2019 +0200
patch 8.1.1165: no test for mouse clicks in the terminal tabpage line
Problem: No test for mouse clicks in the terminal tabpage line.
Solution: Add a test. (Dominique Pelle, closes https://github.com/vim/vim/issues/4247). Also init
TabPageIdxs[], in case it's used before a redraw.
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Sat, 13 Apr 2019 15:00:05 +0200 |
| parents | 5b8b849dc3aa |
| children | 6b2412d0509f |
comparison
equal
deleted
inserted
replaced
| 16319:47a0bd4850f5 | 16320:57e0f6b4a87d |
|---|---|
| 163 | 163 |
| 164 func Test_xterm_mouse_drag_statusline() | 164 func Test_xterm_mouse_drag_statusline() |
| 165 let save_mouse = &mouse | 165 let save_mouse = &mouse |
| 166 let save_term = &term | 166 let save_term = &term |
| 167 let save_ttymouse = &ttymouse | 167 let save_ttymouse = &ttymouse |
| 168 set mouse=a term=xterm | 168 let save_laststatus = &laststatus |
| 169 set mouse=a term=xterm laststatus=2 | |
| 169 | 170 |
| 170 for ttymouse_val in ['xterm', 'sgr'] | 171 for ttymouse_val in ['xterm', 'sgr'] |
| 171 exe 'set ttymouse=' . ttymouse_val | 172 exe 'set ttymouse=' . ttymouse_val |
| 172 | 173 |
| 173 call assert_equal(1, &cmdheight) | 174 call assert_equal(1, &cmdheight) |
| 195 endfor | 196 endfor |
| 196 | 197 |
| 197 let &mouse = save_mouse | 198 let &mouse = save_mouse |
| 198 let &term = save_term | 199 let &term = save_term |
| 199 let &ttymouse = save_ttymouse | 200 let &ttymouse = save_ttymouse |
| 200 endfunc | 201 let &laststatus = save_laststatus |
| 202 endfunc | |
| 203 | |
| 204 func Test_xterm_mouse_click_tab() | |
| 205 let save_mouse = &mouse | |
| 206 let save_term = &term | |
| 207 let save_ttymouse = &ttymouse | |
| 208 set mouse=a term=xterm | |
| 209 let row = 1 | |
| 210 | |
| 211 for ttymouse_val in ['xterm', 'sgr'] | |
| 212 exe 'set ttymouse=' . ttymouse_val | |
| 213 e Xfoo | |
| 214 tabnew Xbar | |
| 215 | |
| 216 let a = split(execute(':tabs'), "\n") | |
| 217 call assert_equal(['Tab page 1', | |
| 218 \ ' Xfoo', | |
| 219 \ 'Tab page 2', | |
| 220 \ '> Xbar'], a) | |
| 221 | |
| 222 " Test clicking on tab names in the tabline at the top. | |
| 223 let col = 2 | |
| 224 redraw! | |
| 225 call MouseLeftClick(row, col) | |
| 226 call MouseLeftRelease(row, col) | |
| 227 let a = split(execute(':tabs'), "\n") | |
| 228 call assert_equal(['Tab page 1', | |
| 229 \ '> Xfoo', | |
| 230 \ 'Tab page 2', | |
| 231 \ ' Xbar'], a) | |
| 232 | |
| 233 let col = 9 | |
| 234 call MouseLeftClick(row, col) | |
| 235 call MouseLeftRelease(row, col) | |
| 236 let a = split(execute(':tabs'), "\n") | |
| 237 call assert_equal(['Tab page 1', | |
| 238 \ ' Xfoo', | |
| 239 \ 'Tab page 2', | |
| 240 \ '> Xbar'], a) | |
| 241 | |
| 242 %bwipe! | |
| 243 endfor | |
| 244 | |
| 245 let &mouse = save_mouse | |
| 246 let &term = save_term | |
| 247 let &ttymouse = save_ttymouse | |
| 248 endfunc |