mirror of
https://github.com/neovim/neovim.git
synced 2024-12-20 19:25:11 -07:00
vim-patch:8.1.0009: tabpages insufficiently tested
Problem: Tabpages insufficiently tested.
Solution: Add more test coverage. (Dominique Pelle, closes vim/vim#2934)
dbe8869c41
This commit is contained in:
parent
d581398779
commit
345789f9ef
@ -1,5 +1,6 @@
|
|||||||
" Tests for tabpage
|
" Tests for tabpage
|
||||||
|
|
||||||
|
|
||||||
function Test_tabpage()
|
function Test_tabpage()
|
||||||
bw!
|
bw!
|
||||||
" Simple test for opening and closing a tab page
|
" Simple test for opening and closing a tab page
|
||||||
@ -319,6 +320,34 @@ function s:reconstruct_tabpage_for_test(nr)
|
|||||||
endfor
|
endfor
|
||||||
endfunc
|
endfunc
|
||||||
|
|
||||||
|
func Test_tabpage_ctrl_pgup_pgdown()
|
||||||
|
enew!
|
||||||
|
tabnew tab1
|
||||||
|
tabnew tab2
|
||||||
|
|
||||||
|
call assert_equal(3, tabpagenr())
|
||||||
|
exe "norm! \<C-PageUp>"
|
||||||
|
call assert_equal(2, tabpagenr())
|
||||||
|
exe "norm! \<C-PageDown>"
|
||||||
|
call assert_equal(3, tabpagenr())
|
||||||
|
|
||||||
|
" Check wrapping at last or first page.
|
||||||
|
exe "norm! \<C-PageDown>"
|
||||||
|
call assert_equal(1, tabpagenr())
|
||||||
|
exe "norm! \<C-PageUp>"
|
||||||
|
call assert_equal(3, tabpagenr())
|
||||||
|
|
||||||
|
" With a count, <C-PageUp> and <C-PageDown> are not symmetrical somehow:
|
||||||
|
" - {count}<C-PageUp> goes {count} pages downward (relative count)
|
||||||
|
" - {count}<C-PageDown> goes to page number {count} (absolute count)
|
||||||
|
exe "norm! 2\<C-PageUp>"
|
||||||
|
call assert_equal(1, tabpagenr())
|
||||||
|
exe "norm! 2\<C-PageDown>"
|
||||||
|
call assert_equal(2, tabpagenr())
|
||||||
|
|
||||||
|
1tabonly!
|
||||||
|
endfunc
|
||||||
|
|
||||||
" Test for [count] of tabclose
|
" Test for [count] of tabclose
|
||||||
function Test_tabpage_with_tabclose()
|
function Test_tabpage_with_tabclose()
|
||||||
|
|
||||||
@ -493,4 +522,18 @@ func Test_close_on_quitpre()
|
|||||||
buf Xtest
|
buf Xtest
|
||||||
endfunc
|
endfunc
|
||||||
|
|
||||||
|
func Test_tabs()
|
||||||
|
enew!
|
||||||
|
tabnew tab1
|
||||||
|
norm ixxx
|
||||||
|
let a=split(execute(':tabs'), "\n")
|
||||||
|
call assert_equal(['Tab page 1',
|
||||||
|
\ ' [No Name]',
|
||||||
|
\ 'Tab page 2',
|
||||||
|
\ '> + tab1'], a)
|
||||||
|
|
||||||
|
1tabonly!
|
||||||
|
bw!
|
||||||
|
endfunc
|
||||||
|
|
||||||
" vim: shiftwidth=2 sts=2 expandtab
|
" vim: shiftwidth=2 sts=2 expandtab
|
||||||
|
Loading…
Reference in New Issue
Block a user