Vim/src/testdir/test_man.vim

89 lines
1.8 KiB
VimL

runtime ftplugin/man.vim
function Test_g_ft_man_open_mode()
vnew
let l:h = winheight(1)
q
let l:w = winwidth(1)
" split horizontally
let wincnt = winnr('$')
Man vim
if wincnt == winnr('$')
" Vim manual page cannot be found.
return
endif
call assert_inrange(l:w - 2, l:w + 2, winwidth(1))
call assert_true(l:h > winheight(1))
call assert_equal(1, tabpagenr('$'))
call assert_equal(1, tabpagenr())
q
" split horizontally
let g:ft_man_open_mode = "horz"
Man vim
call assert_inrange(l:w - 2, l:w + 2, winwidth(1))
call assert_true(l:h > winheight(1))
call assert_equal(1, tabpagenr('$'))
call assert_equal(1, tabpagenr())
q
" split vertically
let g:ft_man_open_mode = "vert"
Man vim
call assert_true(l:w > winwidth(1))
call assert_equal(l:h, winheight(1))
call assert_equal(1, tabpagenr('$'))
call assert_equal(1, tabpagenr())
q
" separate tab
let g:ft_man_open_mode = "tab"
Man vim
call assert_inrange(l:w - 2, l:w + 2, winwidth(1))
call assert_inrange(l:h - 1, l:h + 1, winheight(1))
call assert_equal(2, tabpagenr('$'))
call assert_equal(2, tabpagenr())
q
unlet g:ft_man_open_mode
endfunction
function Test_nomodifiable()
let wincnt = winnr('$')
Man vim
if wincnt == winnr('$')
" Vim manual page cannot be found.
return
endif
call assert_false(&l:modifiable)
q
endfunction
function Test_buffer_count_hidden()
%bw!
set hidden
call assert_equal(1, len(getbufinfo()))
let wincnt = winnr('$')
Man vim
if wincnt == winnr('$')
" Vim manual page cannot be found.
return
endif
call assert_equal(1, len(getbufinfo({'buflisted':1})))
call assert_equal(2, len(getbufinfo()))
q
Man vim
call assert_equal(1, len(getbufinfo({'buflisted':1})))
call assert_equal(2, len(getbufinfo()))
q
set hidden&
endfunction