You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
127 lines
3.4 KiB
VimL
127 lines
3.4 KiB
VimL
9 years ago
|
if !exists("g:go_list_type")
|
||
|
|
let g:go_list_type = ""
|
||
|
|
endif
|
||
|
|
|
||
|
|
" Window opens the list with the given height up to 10 lines maximum.
|
||
|
|
" Otherwise g:go_loclist_height is used. If no or zero height is given it
|
||
|
|
" closes the window
|
||
|
|
function! go#list#Window(listtype, ...)
|
||
|
|
let l:listtype = go#list#Type(a:listtype)
|
||
|
|
" we don't use lwindow to close the location list as we need also the
|
||
|
|
" ability to resize the window. So, we are going to use lopen and lclose
|
||
|
|
" for a better user experience. If the number of errors in a current
|
||
|
|
" location list increases/decreases, cwindow will not resize when a new
|
||
|
|
" updated height is passed. lopen in the other hand resizes the screen.
|
||
|
|
if !a:0 || a:1 == 0
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
lclose
|
||
|
|
else
|
||
|
|
cclose
|
||
|
|
endif
|
||
|
|
return
|
||
|
|
endif
|
||
|
|
|
||
|
|
let height = get(g:, "go_list_height", 0)
|
||
|
|
if height == 0
|
||
|
|
" prevent creating a large location height for a large set of numbers
|
||
|
|
if a:1 > 10
|
||
|
|
let height = 10
|
||
|
|
else
|
||
|
|
let height = a:1
|
||
|
|
endif
|
||
|
|
endif
|
||
|
|
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
exe 'lopen ' . height
|
||
|
|
else
|
||
|
|
exe 'copen ' . height
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
|
||
|
|
" Get returns the current list of items from the location list
|
||
|
|
function! go#list#Get(listtype)
|
||
|
|
let l:listtype = go#list#Type(a:listtype)
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
return getloclist(0)
|
||
|
|
else
|
||
|
|
return getqflist()
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" Populate populate the location list with the given items
|
||
|
|
function! go#list#Populate(listtype, items)
|
||
|
|
let l:listtype = go#list#Type(a:listtype)
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
call setloclist(0, a:items, 'r')
|
||
|
|
else
|
||
|
|
call setqflist(a:items, 'r')
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! go#list#PopulateWin(winnr, items)
|
||
|
|
call setloclist(a:winnr, a:items, 'r')
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" Parse parses the given items based on the specified errorformat nad
|
||
|
|
" populates the location list.
|
||
|
|
function! go#list#ParseFormat(listtype, errformat, items)
|
||
|
|
let l:listtype = go#list#Type(a:listtype)
|
||
|
|
" backup users errorformat, will be restored once we are finished
|
||
|
|
let old_errorformat = &errorformat
|
||
|
|
|
||
|
|
" parse and populate the location list
|
||
|
|
let &errorformat = a:errformat
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
lgetexpr a:items
|
||
|
|
else
|
||
|
|
cgetexpr a:items
|
||
|
|
endif
|
||
|
|
|
||
|
|
"restore back
|
||
|
|
let &errorformat = old_errorformat
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" Parse parses the given items based on the global errorformat and
|
||
|
|
" populates the location list.
|
||
|
|
function! go#list#Parse(listtype, items)
|
||
|
|
let l:listtype = go#list#Type(a:listtype)
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
lgetexpr a:items
|
||
|
|
else
|
||
|
|
cgetexpr a:items
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" JumpToFirst jumps to the first item in the location list
|
||
|
|
function! go#list#JumpToFirst(listtype)
|
||
|
|
let l:listtype = go#list#Type(a:listtype)
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
ll 1
|
||
|
|
else
|
||
|
|
cc 1
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" Clean cleans the location list
|
||
|
|
function! go#list#Clean(listtype)
|
||
|
|
let l:listtype = go#list#Type(a:listtype)
|
||
|
|
if l:listtype == "locationlist"
|
||
|
|
lex []
|
||
|
|
else
|
||
|
|
cex []
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! go#list#Type(listtype)
|
||
|
|
if g:go_list_type == "locationlist"
|
||
|
|
return "locationlist"
|
||
|
|
elseif g:go_list_type == "quickfix"
|
||
|
|
return "quickfix"
|
||
|
|
else
|
||
|
|
return a:listtype
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" vim:ts=4:sw=4:et
|