Tag and Quickfix extensions

* New extensions for searching tag and quickfix.
* Option to update the results lazily. Close kien#37.

Author: kien

autoload/ctrlp.vim

@@ -7,13 +7,13 @@
 " Static variables {{{
 fu! ctrlp#mrufiles#opts()
 	let opts = {
-		\ 'g:ctrlp_mruf_max': ['s:max', 150],
+		\ 'g:ctrlp_mruf_max': ['s:max', 250],
 		\ 'g:ctrlp_mruf_include': ['s:include', ''],
 		\ 'g:ctrlp_mruf_exclude': ['s:exclude', ''],
 		\ 'g:ctrlp_mruf_case_sensitive': ['s:csen', 1],
 		\ }
 	for [ke, va] in items(opts)
-		exe 'let' va[0] '=' string(exists(ke) ? eval(ke) : va[1]) '| unl!' ke
+		exe 'let' va[0] '=' string(exists(ke) ? eval(ke) : va[1])
 	endfo
 endf
 cal ctrlp#mrufiles#opts()

autoload/ctrlp/mrufiles.vim

@@ -0,0 +1,56 @@
+" =============================================================================
+" File:          autoload/ctrlp/quickfix.vim
+" Description:   Quickfix extension
+" Author:        Kien Nguyen <github.com/kien>
+" =============================================================================
+
+" Init {{{
+if exists('g:loaded_ctrlp_quickfix') && g:loaded_ctrlp_quickfix
+	fini
+en
+let g:loaded_ctrlp_quickfix = 1
+
+let s:var_qf = ['ctrlp#quickfix#init()', 'ctrlp#quickfix#accept', 'quickfix',
+	\ 'qfx', [1]]
+
+let g:ctrlp_ext_vars = exists('g:ctrlp_ext_vars') && !empty(g:ctrlp_ext_vars)
+	\ ? add(g:ctrlp_ext_vars, s:var_qf) : [s:var_qf]
+
+let s:id = g:ctrlp_builtins + len(g:ctrlp_ext_vars)
+
+fu! s:lineout(dict)
+	retu printf('%s|%d:%d| %s', bufname(a:dict['bufnr']), a:dict['lnum'],
+		\ a:dict['col'], matchstr(a:dict['text'], '\s*\zs.*\S'))
+endf
+"}}}
+" Public {{{
+fu! ctrlp#quickfix#init()
+	let g:ctrlp_nolimit = 1
+	sy match CtrlPqfLineCol '|\zs\d\+:\d\+\ze|'
+	hi def link CtrlPqfLineCol Search
+	retu map(getqflist(), 's:lineout(v:val)')
+endf
+
+fu! ctrlp#quickfix#accept(mode, str)
+	let items = matchlist(a:str, '^\([^|]\+\ze\)|\(\d\+\):\(\d\+\)|')
+	let [md, filpath] = [a:mode, fnamemodify(items[1], ':p')]
+	if empty(filpath) | retu | en
+	cal ctrlp#exit()
+	let cmd = md == 't' ? 'tabe' : md == 'h' ? 'new' : md == 'v' ? 'vne'
+		\ : ctrlp#normcmd('e')
+	let cmd = cmd == 'e' && &modified ? 'hid e' : cmd
+	try
+		exe cmd.' '.ctrlp#fnesc(filpath)
+	cat
+		cal ctrlp#msg("Invalid command or argument.")
+	fina
+		cal cursor(items[2], items[3]) | sil! norm! zOzz
+	endt
+endf
+
+fu! ctrlp#quickfix#id()
+	retu s:id
+endf
+"}}}
+
+" vim:fen:fdl=0:ts=2:sw=2:sts=2

autoload/ctrlp/quickfix.vim

@@ -0,0 +1,58 @@
+" =============================================================================
+" File:          autoload/ctrlp/tag.vim
+" Description:   Tag file extension
+" Author:        Kien Nguyen <github.com/kien>
+" =============================================================================
+
+" Init {{{
+if exists('g:loaded_ctrlp_tag') && g:loaded_ctrlp_tag
+	fini
+en
+let [g:loaded_ctrlp_tag, g:ctrlp_newtag] = [1, 0]
+
+let s:tag_var = ['ctrlp#tag#init()', 'ctrlp#tag#accept', 'tags', 'tag']
+
+let g:ctrlp_ext_vars = exists('g:ctrlp_ext_vars') && !empty(g:ctrlp_ext_vars)
+	\ ? add(g:ctrlp_ext_vars, s:tag_var) : [s:tag_var]
+
+let s:id = g:ctrlp_builtins + len(g:ctrlp_ext_vars)
+"}}}
+" Public {{{
+fu! ctrlp#tag#init()
+	if exists('s:cwd') && s:cwd == getcwd()
+		let newtags = 0
+	el
+		let s:cwd = getcwd()
+		let newtags = 1
+	en
+	if ( newtags && !exists('g:ctrlp_alltags['''.s:cwd.''']') ) || g:ctrlp_newtag
+		let alltags = map(taglist('.*'), 'v:val["name"]."	".v:val["filename"]')
+		cal extend(g:ctrlp_alltags, { s:cwd : alltags })
+		let g:ctrlp_newtag = 0
+	en
+	sy match CtrlPTagFilename '\zs\t.*\ze$'
+	hi link CtrlPTagFilename Comment
+	retu g:ctrlp_alltags[s:cwd]
+endf
+
+fu! ctrlp#tag#accept(mode, str)
+	cal ctrlp#exit()
+	let md = a:mode
+	let cmd = md == 't' ? 'tabnew' : md == 'h' ? 'new' : md == 'v' ? 'vne'
+		\ : ctrlp#normcmd('ene')
+	let cmd = cmd == 'ene' && &modified ? 'hid ene' : cmd
+	try
+		exe cmd
+		cal ctrlp#setdir(s:cwd)
+		exe 'ta' split(a:str, '\t[^\t]\+$')[0]
+	cat
+		cal ctrlp#msg("Tag not found.")
+	endt
+endf
+
+fu! ctrlp#tag#id()
+	retu s:id
+endf
+"}}}
+
+" vim:fen:fdl=0:ts=2:sw=2:sts=2

autoload/ctrlp/tag.vim

@@ -26,9 +26,10 @@ fu! ctrlp#utils#cachedir()
 	retu s:cache_dir
 endf
 
-fu! ctrlp#utils#cachefile()
-	let cache_file = substitute(getcwd(), '\([\/]\|^\a\zs:\)', '%', 'g').'.txt'
-	retu s:cache_dir.s:lash.cache_file
+fu! ctrlp#utils#cachefile(...)
+	let tail = exists('a:1') ? '.'.a:1 : ''
+	let cache_file = substitute(getcwd(), '\([\/]\|^\a\zs:\)', '%', 'g').tail.'.txt'
+	retu exists('a:1') ? cache_file : s:cache_dir.s:lash.cache_file
 endf
 
 fu! ctrlp#utils#readfile(file)