1
0
mirror of https://github.com/gryf/tagbar.git synced 2025-12-17 19:40:27 +01:00

Ensure that as much content as possible is shown in the Tagbar window

This commit is contained in:
Jan Larres
2011-03-06 23:00:13 +13:00
parent b176c930d0
commit a9c352c134

View File

@@ -1476,9 +1476,10 @@ function! s:RenderContent(fname, ftype)
setlocal nomodifiable
" Go to top of window so jumps to the Tagbar window before any
" highlighting is done won't end up at the bottom
" Make sure as much of the Tagbar content as possible is shown in the
" window by jumping to the top after drawing
execute 1
call winline()
let &lazyredraw = lazyredraw_save
@@ -1601,23 +1602,12 @@ function! s:HighlightTag(fname)
" No tag above cursor position so don't do anything
if tagline == 0
if line('$') < winheight(0) - 1
execute 1
call winline()
endif
execute prevwinnr . 'wincmd w'
let &eventignore = eventignore_save
redraw
return
endif
" If the Tagbar contents are shorter than the window height make sure
" that the whole content is shown by jumping to the top of the window
if line('$') < winheight(0) - 1
execute 1
call winline()
endif
" Go to the line containing the tag
execute tagline