forked from aniani/vim
6d91bcb4d2
Problem: Various inconsistencies in test files.
Solution: Add modelines where they were missing. Use Check commands instead
of silently skipping over tests. Adjust indents and comments.
(Ken Takata, closes #6695)
140 lines
2.9 KiB
VimL
140 lines
2.9 KiB
VimL
" Test for tabline
|
|
|
|
source shared.vim
|
|
|
|
func TablineWithCaughtError()
|
|
let s:func_in_tabline_called = 1
|
|
try
|
|
call eval('unknown expression')
|
|
catch
|
|
endtry
|
|
return ''
|
|
endfunc
|
|
|
|
func TablineWithError()
|
|
let s:func_in_tabline_called = 1
|
|
call eval('unknown expression')
|
|
return ''
|
|
endfunc
|
|
|
|
func Test_caught_error_in_tabline()
|
|
if has('gui')
|
|
set guioptions-=e
|
|
endif
|
|
let showtabline_save = &showtabline
|
|
set showtabline=2
|
|
let s:func_in_tabline_called = 0
|
|
let tabline = '%{TablineWithCaughtError()}'
|
|
let &tabline = tabline
|
|
redraw!
|
|
call assert_true(s:func_in_tabline_called)
|
|
call assert_equal(tabline, &tabline)
|
|
set tabline=
|
|
let &showtabline = showtabline_save
|
|
endfunc
|
|
|
|
func Test_tabline_will_be_disabled_with_error()
|
|
if has('gui')
|
|
set guioptions-=e
|
|
endif
|
|
let showtabline_save = &showtabline
|
|
set showtabline=2
|
|
let s:func_in_tabline_called = 0
|
|
let tabline = '%{TablineWithError()}'
|
|
try
|
|
let &tabline = tabline
|
|
redraw!
|
|
catch
|
|
endtry
|
|
call assert_true(s:func_in_tabline_called)
|
|
call assert_equal('', &tabline)
|
|
set tabline=
|
|
let &showtabline = showtabline_save
|
|
endfunc
|
|
|
|
func Test_redrawtabline()
|
|
if has('gui')
|
|
set guioptions-=e
|
|
endif
|
|
let showtabline_save = &showtabline
|
|
set showtabline=2
|
|
set tabline=%{bufnr('$')}
|
|
edit Xtabline1
|
|
edit Xtabline2
|
|
redraw
|
|
call assert_match(bufnr('$') . '', Screenline(1))
|
|
au BufAdd * redrawtabline
|
|
badd Xtabline3
|
|
call assert_match(bufnr('$') . '', Screenline(1))
|
|
|
|
set tabline=
|
|
let &showtabline = showtabline_save
|
|
au! Bufadd
|
|
endfunc
|
|
|
|
" Test for the "%T" and "%X" flags in the 'tabline' option
|
|
func MyTabLine()
|
|
let s = ''
|
|
for i in range(tabpagenr('$'))
|
|
" set the tab page number (for mouse clicks)
|
|
let s .= '%' . (i + 1) . 'T'
|
|
|
|
" the label is made by MyTabLabel()
|
|
let s .= ' %{MyTabLabel(' . (i + 1) . ')} '
|
|
endfor
|
|
|
|
" after the last tab fill with TabLineFill and reset tab page nr
|
|
let s .= '%T'
|
|
|
|
" right-align the label to close the current tab page
|
|
if tabpagenr('$') > 1
|
|
let s .= '%=%Xclose'
|
|
endif
|
|
|
|
return s
|
|
endfunc
|
|
|
|
func MyTabLabel(n)
|
|
let buflist = tabpagebuflist(a:n)
|
|
let winnr = tabpagewinnr(a:n)
|
|
return bufname(buflist[winnr - 1])
|
|
endfunc
|
|
|
|
func Test_tabline_flags()
|
|
if has('gui')
|
|
set guioptions-=e
|
|
endif
|
|
set tabline=%!MyTabLine()
|
|
edit Xtabline1
|
|
tabnew Xtabline2
|
|
redrawtabline
|
|
call assert_match('^ Xtabline1 Xtabline2\s\+close$', Screenline(1))
|
|
set tabline=
|
|
%bw!
|
|
endfunc
|
|
|
|
function EmptyTabname()
|
|
return ""
|
|
endfunction
|
|
|
|
function MakeTabLine() abort
|
|
let titles = map(range(1, tabpagenr('$')), '"%( %" . v:val . "T%{EmptyTabname()}%T %)"')
|
|
let sep = 'あ'
|
|
let tabpages = join(titles, sep)
|
|
return tabpages .. sep .. '%=%999X X'
|
|
endfunction
|
|
|
|
func Test_tabline_empty_group()
|
|
" this was reading invalid memory
|
|
set tabline=%!MakeTabLine()
|
|
tabnew
|
|
redraw!
|
|
|
|
tabclose
|
|
set tabline=
|
|
endfunc
|
|
|
|
|
|
|
|
" vim: shiftwidth=2 sts=2 expandtab
|