vim-gutentags: autoload/gutentags/ctags.vim annotate

annotate autoload/gutentags/ctags.vim @ 184:3cd4597fb86b

Replace matchstrpos() with match() + split() for backwards compatibility matchstrpos() was added to Vim as patch 7.4.1685: http://ftp.vim.org/vim/patches/7.4/7.4.1685 Older but still vendor-supported operating systems (such as Ubuntu 14.04 LTS and derivatives) ship versions of Vim that predate this patch. Replacing matchstrpos() allows vim-gutentags to continue to work with these older versions of Vim. Issue: https://github.com/ludovicchabant/vim-gutentags/issues/114

author	Stephen Kent <smkent@smkent.net>
date	Sat, 22 Apr 2017 10:32:30 -0700
parents	0b4ccd0deceb
children	685b81826b68

rev	line source
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	1 " Ctags module for Gutentags
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	2
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	3 " Global Options {{{
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	4
119 a66d90fd758b expand() g:gutentags_ctags_executable Justin M. Keyes <justinkz@gmail.com> parents: 117 diff changeset	5 let g:gutentags_ctags_executable = get(g:, 'gutentags_ctags_executable', 'ctags')
165 cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	6 let g:gutentags_ctags_tagfile = get(g:, 'gutentags_ctags_tagfile', 'tags')
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	7 let g:gutentags_ctags_auto_set_tags = get(g:, 'gutentags_ctags_auto_set_tags', 1)
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	8
119 a66d90fd758b expand() g:gutentags_ctags_executable Justin M. Keyes <justinkz@gmail.com> parents: 117 diff changeset	9 let g:gutentags_ctags_options_file = get(g:, 'gutentags_ctags_options_file', '.gutctags')
a66d90fd758b expand() g:gutentags_ctags_executable Justin M. Keyes <justinkz@gmail.com> parents: 117 diff changeset	10 let g:gutentags_ctags_check_tagfile = get(g:, 'gutentags_ctags_check_tagfile', 0)
160 1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	11 let g:gutentags_ctags_extra_args = get(g:, 'gutentags_ctags_extra_args', [])
1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	12 let g:gutentags_ctags_post_process_cmd = get(g:, 'gutentags_ctags_post_process_cmd', '')
86 7872cc9bbc2d Check existing tags file as an opt-in thing for now. Ludovic Chabant <ludovic@chabant.com> parents: 84 diff changeset	13
165 cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	14 let g:gutentags_ctags_exclude = get(g:, 'gutentags_ctags_exclude', [])
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	15 let g:gutentags_ctags_exclude_wildignore = get(g:, 'gutentags_ctags_exclude_wildignore', 1)
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	16
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	17 " Backwards compatibility.
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	18 function! s:_handleOldOptions() abort
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	19 let l:renamed_options = {
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	20 \'gutentags_exclude': 'gutentags_ctags_exclude',
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	21 \'gutentags_tagfile': 'gutentags_ctags_tagfile',
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	22 \'gutentags_auto_set_tags': 'gutentags_ctags_auto_set_tags'
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	23 \}
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	24 for key in keys(l:renamed_options)
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	25 if exists('g:'.key)
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	26 let newname = l:renamed_options[key]
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	27 echom "gutentags: Option 'g:'".key." has been renamed to ".
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	28 \"'g:'".newname." Please update your vimrc."
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	29 let g:[newname] = g:[key]
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	30 endif
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	31 endfor
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	32 endfunction
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	33 call s:_handleOldOptions()
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	34 " }}}
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	35
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	36 " Gutentags Module Interface {{{
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	37
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	38 let s:runner_exe = gutentags#get_plat_file('update_tags')
115 bc6ef3d0b84f ctags: fix output redirection on tcsh Ilya Tumaykin <itumaykin@gmail.com> parents: 114 diff changeset	39 let s:unix_redir = (&shellredir =~# '%s') ? &shellredir : &shellredir . ' %s'
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	40
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	41 function! gutentags#ctags#init(project_root) abort
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	42 " Figure out the path to the tags file.
165 cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	43 " Check the old name for this option, too, before falling back to the
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	44 " globally defined name.
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	45 let l:tagfile = getbufvar("", 'gutentags_ctags_tagfile',
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	46 \getbufvar("", 'gutentags_tagfile',
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	47 \g:gutentags_ctags_tagfile))
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	48 let b:gutentags_files['ctags'] = gutentags#get_cachefile(
141 7bc4df0225d1 Add support for specifying buffer-specific tagfiles. Ludovic Chabant <ludovic@chabant.com> parents: 136 diff changeset	49 \a:project_root, l:tagfile)
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	50
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	51 " Set the tags file for Vim to use.
165 cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	52 if g:gutentags_ctags_auto_set_tags
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	53 execute 'setlocal tags^=' . fnameescape(b:gutentags_files['ctags'])
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	54 endif
93 edd488d8d37e Give some error message if there's no available `ctags` on the system. Ludovic Chabant <ludovic@chabant.com> parents: 89 diff changeset	55
edd488d8d37e Give some error message if there's no available `ctags` on the system. Ludovic Chabant <ludovic@chabant.com> parents: 89 diff changeset	56 " Check if the ctags executable exists.
119 a66d90fd758b expand() g:gutentags_ctags_executable Justin M. Keyes <justinkz@gmail.com> parents: 117 diff changeset	57 if g:gutentags_enabled && executable(expand(g:gutentags_ctags_executable, 1)) == 0
93 edd488d8d37e Give some error message if there's no available `ctags` on the system. Ludovic Chabant <ludovic@chabant.com> parents: 89 diff changeset	58 let g:gutentags_enabled = 0
edd488d8d37e Give some error message if there's no available `ctags` on the system. Ludovic Chabant <ludovic@chabant.com> parents: 89 diff changeset	59 echoerr "Executable '".g:gutentags_ctags_executable."' can't be found. "
edd488d8d37e Give some error message if there's no available `ctags` on the system. Ludovic Chabant <ludovic@chabant.com> parents: 89 diff changeset	60 \."Gutentags will be disabled. You can re-enable it by "
edd488d8d37e Give some error message if there's no available `ctags` on the system. Ludovic Chabant <ludovic@chabant.com> parents: 89 diff changeset	61 \."setting g:gutentags_enabled back to 1."
edd488d8d37e Give some error message if there's no available `ctags` on the system. Ludovic Chabant <ludovic@chabant.com> parents: 89 diff changeset	62 endif
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	63 endfunction
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	64
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	65 function! gutentags#ctags#generate(proj_dir, tags_file, write_mode) abort
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	66 " Get to the tags file directory because ctags is finicky about
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	67 " these things.
179 411f3fa915f5 Back to getcwd() Henry Kupty <hkupty@gmail.com> parents: 177 diff changeset	68 let l:prev_cwd = getcwd()
177 7b9c2f191e69 Another take on fixing tcd brakeage Henry Kupty <hkupty@gmail.com> parents: 173 diff changeset	69 call gutentags#chdir(fnameescape(a:proj_dir))
158 bba76de4371a Add option to specify that a custom file lister returns absolute paths. Ludovic Chabant <ludovic@chabant.com> parents: 148 diff changeset	70
84 96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	71 let l:tags_file_exists = filereadable(a:tags_file)
181 0b4ccd0deceb Fix broken test for whether the tag file is inside the project root. Ludovic Chabant <ludovic@chabant.com> parents: 179 diff changeset	72 let l:tags_file_relative = fnamemodify(a:tags_file, ':.')
0b4ccd0deceb Fix broken test for whether the tag file is inside the project root. Ludovic Chabant <ludovic@chabant.com> parents: 179 diff changeset	73 let l:tags_file_is_local = len(l:tags_file_relative) < len(a:tags_file)
84 96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	74
86 7872cc9bbc2d Check existing tags file as an opt-in thing for now. Ludovic Chabant <ludovic@chabant.com> parents: 84 diff changeset	75 if l:tags_file_exists && g:gutentags_ctags_check_tagfile
84 96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	76 let l:first_lines = readfile(a:tags_file, '', 1)
96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	77 if len(l:first_lines) == 0 \|\| stridx(l:first_lines[0], '!_TAG_') != 0
148 b178f2251982 Only set `v:errmsg` when we throw an actual error. Ludovic Chabant <ludovic@chabant.com> parents: 141 diff changeset	78 call gutentags#throwerr(
b178f2251982 Only set `v:errmsg` when we throw an actual error. Ludovic Chabant <ludovic@chabant.com> parents: 141 diff changeset	79 \"File ".a:tags_file." doesn't appear to be ".
84 96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	80 \"a ctags file. Please delete it and run ".
96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	81 \":GutentagsUpdate!.")
96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	82 return
96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	83 endif
96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	84 endif
96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	85
173 2cf3fb66285b Use absolute paths for `ctags` if the tags file is not local. Ludovic Chabant <ludovic@chabant.com> parents: 171 diff changeset	86 if empty(g:gutentags_cache_dir) && l:tags_file_is_local
167 34c57ad6eb45 Always use the potentially custom name for the tags file. Ludovic Chabant <ludovic@chabant.com> parents: 165 diff changeset	87 " If we don't use the cache directory, we can pass relative paths
34c57ad6eb45 Always use the potentially custom name for the tags file. Ludovic Chabant <ludovic@chabant.com> parents: 165 diff changeset	88 " around.
34c57ad6eb45 Always use the potentially custom name for the tags file. Ludovic Chabant <ludovic@chabant.com> parents: 165 diff changeset	89 "
34c57ad6eb45 Always use the potentially custom name for the tags file. Ludovic Chabant <ludovic@chabant.com> parents: 165 diff changeset	90 " Note that if we don't do this and pass a full path for the project
34c57ad6eb45 Always use the potentially custom name for the tags file. Ludovic Chabant <ludovic@chabant.com> parents: 165 diff changeset	91 " root, some `ctags` implementations like Exhuberant Ctags can get
34c57ad6eb45 Always use the potentially custom name for the tags file. Ludovic Chabant <ludovic@chabant.com> parents: 165 diff changeset	92 " confused if the paths have spaces -- but not if you're in the root
34c57ad6eb45 Always use the potentially custom name for the tags file. Ludovic Chabant <ludovic@chabant.com> parents: 165 diff changeset	93 " directory, for some reason...
98 d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	94 let l:actual_proj_dir = '.'
181 0b4ccd0deceb Fix broken test for whether the tag file is inside the project root. Ludovic Chabant <ludovic@chabant.com> parents: 179 diff changeset	95 let l:actual_tags_file = l:tags_file_relative
168 e59321cbaff7 Use scope-local functions Henry Kupty <hkupty@gmail.com> parents: 136 diff changeset	96 call gutentags#chdir(fnameescape(a:proj_dir))
98 d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	97 else
d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	98 " else: the tags file goes in a cache directory, so we need to specify
d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	99 " all the paths absolutely for `ctags` to do its job correctly.
d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	100 let l:actual_proj_dir = a:proj_dir
d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	101 let l:actual_tags_file = a:tags_file
d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	102 endif
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	103
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	104 try
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	105 " Build the command line.
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	106 let l:cmd = gutentags#get_execute_cmd() . s:runner_exe
89 8bf96f9f649c Add support for project types. Ludovic Chabant <ludovic@chabant.com> parents: 86 diff changeset	107 let l:cmd .= ' -e "' . s:get_ctags_executable(a:proj_dir) . '"'
98 d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	108 let l:cmd .= ' -t "' . l:actual_tags_file . '"'
d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	109 let l:cmd .= ' -p "' . l:actual_proj_dir . '"'
84 96bfe5c37f37 Error and abort if we'll be overwriting a non-ctags file. Ludovic Chabant <ludovic@chabant.com> parents: 75 diff changeset	110 if a:write_mode == 0 && l:tags_file_exists
133 6f15299869fc Don't pass absolute paths to `ctags` when we want relative paths from it. Ludovic Chabant <ludovic@chabant.com> parents: 119 diff changeset	111 let l:cur_file_path = expand('%:p')
173 2cf3fb66285b Use absolute paths for `ctags` if the tags file is not local. Ludovic Chabant <ludovic@chabant.com> parents: 171 diff changeset	112 if empty(g:gutentags_cache_dir) && l:tags_file_is_local
133 6f15299869fc Don't pass absolute paths to `ctags` when we want relative paths from it. Ludovic Chabant <ludovic@chabant.com> parents: 119 diff changeset	113 let l:cur_file_path = fnamemodify(l:cur_file_path, ':.')
6f15299869fc Don't pass absolute paths to `ctags` when we want relative paths from it. Ludovic Chabant <ludovic@chabant.com> parents: 119 diff changeset	114 endif
6f15299869fc Don't pass absolute paths to `ctags` when we want relative paths from it. Ludovic Chabant <ludovic@chabant.com> parents: 119 diff changeset	115 let l:cmd .= ' -s "' . l:cur_file_path . '"'
136 286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	116 else
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	117 let l:file_list_cmd = gutentags#get_project_file_list_cmd(l:actual_proj_dir)
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	118 if !empty(l:file_list_cmd)
184 3cd4597fb86b Replace matchstrpos() with match() + split() for backwards compatibility Stephen Kent <smkent@smkent.net> parents: 181 diff changeset	119 if match(l:file_list_cmd, '///') > 0
3cd4597fb86b Replace matchstrpos() with match() + split() for backwards compatibility Stephen Kent <smkent@smkent.net> parents: 181 diff changeset	120 let l:suffopts = split(l:file_list_cmd, '///')
3cd4597fb86b Replace matchstrpos() with match() + split() for backwards compatibility Stephen Kent <smkent@smkent.net> parents: 181 diff changeset	121 let l:suffoptstr = l:suffopts[1]
3cd4597fb86b Replace matchstrpos() with match() + split() for backwards compatibility Stephen Kent <smkent@smkent.net> parents: 181 diff changeset	122 let l:file_list_cmd = l:suffopts[0]
158 bba76de4371a Add option to specify that a custom file lister returns absolute paths. Ludovic Chabant <ludovic@chabant.com> parents: 148 diff changeset	123 if l:suffoptstr == 'absolute'
bba76de4371a Add option to specify that a custom file lister returns absolute paths. Ludovic Chabant <ludovic@chabant.com> parents: 148 diff changeset	124 let l:cmd .= ' -A'
bba76de4371a Add option to specify that a custom file lister returns absolute paths. Ludovic Chabant <ludovic@chabant.com> parents: 148 diff changeset	125 endif
bba76de4371a Add option to specify that a custom file lister returns absolute paths. Ludovic Chabant <ludovic@chabant.com> parents: 148 diff changeset	126 endif
136 286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	127 let l:cmd .= ' -L ' . '"' . l:file_list_cmd. '"'
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	128 endif
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	129 endif
136 286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	130 if empty(get(l:, 'file_list_cmd', ''))
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	131 " Pass the Gutentags recursive options file before the project
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	132 " options file, so that users can override --recursive.
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	133 " Omit --recursive if this project uses a file list command.
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	134 let l:cmd .= ' -o "' . gutentags#get_res_file('ctags_recursive.options') . '"'
286e5b3095d0 Allow restricting tag generation to files listed by custom commands Stephen Kent <smkent@smkent.net> parents: 135 diff changeset	135 endif
160 1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	136 if !empty(g:gutentags_ctags_extra_args)
1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	137 let l:cmd .= ' -O '.shellescape(join(g:gutentags_ctags_extra_args))
1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	138 endif
1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	139 if !empty(g:gutentags_ctags_post_process_cmd)
1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	140 let l:cmd .= ' -P '.shellescape(g:gutentags_ctags_post_process_cmd)
1b980f5071a0 Post-processing for `tags` files, extra args for `ctags`. Ludovic Chabant <ludovic@chabant.com> parents: 158 diff changeset	141 endif
114 979fab641f29 ctags: remove trailing space Ilya Tumaykin <itumaykin@gmail.com> parents: 113 diff changeset	142 let l:proj_options_file = a:proj_dir . '/' .
75 d12543f11eb9 Move the default `-R` option to an overridable "global" options file. Ludovic Chabant <ludovic@chabant.com> parents: 70 diff changeset	143 \g:gutentags_ctags_options_file
d12543f11eb9 Move the default `-R` option to an overridable "global" options file. Ludovic Chabant <ludovic@chabant.com> parents: 70 diff changeset	144 if filereadable(l:proj_options_file)
d12543f11eb9 Move the default `-R` option to an overridable "global" options file. Ludovic Chabant <ludovic@chabant.com> parents: 70 diff changeset	145 let l:proj_options_file = s:process_options_file(
d12543f11eb9 Move the default `-R` option to an overridable "global" options file. Ludovic Chabant <ludovic@chabant.com> parents: 70 diff changeset	146 \a:proj_dir, l:proj_options_file)
d12543f11eb9 Move the default `-R` option to an overridable "global" options file. Ludovic Chabant <ludovic@chabant.com> parents: 70 diff changeset	147 let l:cmd .= ' -o "' . l:proj_options_file . '"'
d12543f11eb9 Move the default `-R` option to an overridable "global" options file. Ludovic Chabant <ludovic@chabant.com> parents: 70 diff changeset	148 endif
165 cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	149 if g:gutentags_ctags_exclude_wildignore
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	150 for ign in split(&wildignore, ',')
170 0e7ffc799cc5 Escape reserved Vim patterns in wildignore entries. Thaer <thaer.khawaja@gmail.com> parents: 167 diff changeset	151 let l:cmd .= ' -x ' . shellescape(ign, 1)
165 cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	152 endfor
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	153 endif
cbc1ebe23ef1 Rename all ctags-related options to have "ctags" in their name. Ludovic Chabant <ludovic@chabant.com> parents: 160 diff changeset	154 for exc in g:gutentags_ctags_exclude
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	155 let l:cmd .= ' -x ' . '"' . exc . '"'
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	156 endfor
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	157 if g:gutentags_pause_after_update
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	158 let l:cmd .= ' -c'
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	159 endif
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	160 if g:gutentags_trace
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	161 if has('win32')
98 d645125192aa Fix more problems with paths and spaces in them. Ludovic Chabant <ludovic@chabant.com> parents: 96 diff changeset	162 let l:cmd .= ' -l "' . l:actual_tags_file . '.log"'
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	163 else
115 bc6ef3d0b84f ctags: fix output redirection on tcsh Ilya Tumaykin <itumaykin@gmail.com> parents: 114 diff changeset	164 let l:cmd .= ' ' . printf(s:unix_redir, '"' . l:actual_tags_file . '.log"')
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	165 endif
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	166 else
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	167 if !has('win32')
115 bc6ef3d0b84f ctags: fix output redirection on tcsh Ilya Tumaykin <itumaykin@gmail.com> parents: 114 diff changeset	168 let l:cmd .= ' ' . printf(s:unix_redir, '/dev/null')
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	169 endif
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	170 endif
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	171 let l:cmd .= gutentags#get_execute_cmd_suffix()
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	172
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	173 call gutentags#trace("Running: " . l:cmd)
179 411f3fa915f5 Back to getcwd() Henry Kupty <hkupty@gmail.com> parents: 177 diff changeset	174 call gutentags#trace("In: " . getcwd())
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	175 if !g:gutentags_fake
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	176 " Run the background process.
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	177 if !g:gutentags_trace
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	178 silent execute l:cmd
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	179 else
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	180 execute l:cmd
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	181 endif
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	182
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	183 " Flag this tags file as being in progress
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	184 let l:full_tags_file = fnamemodify(a:tags_file, ':p')
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	185 call gutentags#add_progress('ctags', l:full_tags_file)
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	186 else
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	187 call gutentags#trace("(fake... not actually running)")
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	188 endif
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	189 call gutentags#trace("")
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	190 finally
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	191 " Restore the previous working directory.
168 e59321cbaff7 Use scope-local functions Henry Kupty <hkupty@gmail.com> parents: 136 diff changeset	192 call gutentags#chdir(fnameescape(l:prev_cwd))
41 99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	193 endtry
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	194 endfunction
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	195
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	196 " }}}
99328cb71e75 Refactor Gutentags so functionality can be implemented in "modules". Ludovic Chabant <ludovic@chabant.com> parents: diff changeset	197
62 106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	198 " Utilities {{{
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	199
70 661a97eaf608 Move `get_ctags_executable` to the `ctags` module. Ludovic Chabant <ludovic@chabant.com> parents: 69 diff changeset	200 " Get final ctags executable depending whether a filetype one is defined
89 8bf96f9f649c Add support for project types. Ludovic Chabant <ludovic@chabant.com> parents: 86 diff changeset	201 function! s:get_ctags_executable(proj_dir) abort
70 661a97eaf608 Move `get_ctags_executable` to the `ctags` module. Ludovic Chabant <ludovic@chabant.com> parents: 69 diff changeset	202 "Only consider the main filetype in cases like 'python.django'
661a97eaf608 Move `get_ctags_executable` to the `ctags` module. Ludovic Chabant <ludovic@chabant.com> parents: 69 diff changeset	203 let l:ftype = get(split(&filetype, '\.'), 0, '')
89 8bf96f9f649c Add support for project types. Ludovic Chabant <ludovic@chabant.com> parents: 86 diff changeset	204 let l:proj_info = gutentags#get_project_info(a:proj_dir)
8bf96f9f649c Add support for project types. Ludovic Chabant <ludovic@chabant.com> parents: 86 diff changeset	205 let l:type = get(l:proj_info, 'type', l:ftype)
119 a66d90fd758b expand() g:gutentags_ctags_executable Justin M. Keyes <justinkz@gmail.com> parents: 117 diff changeset	206 let exepath = exists('g:gutentags_ctags_executable_{l:type}')
a66d90fd758b expand() g:gutentags_ctags_executable Justin M. Keyes <justinkz@gmail.com> parents: 117 diff changeset	207 \ ? g:gutentags_ctags_executable_{l:type} : g:gutentags_ctags_executable
a66d90fd758b expand() g:gutentags_ctags_executable Justin M. Keyes <justinkz@gmail.com> parents: 117 diff changeset	208 return expand(exepath, 1)
70 661a97eaf608 Move `get_ctags_executable` to the `ctags` module. Ludovic Chabant <ludovic@chabant.com> parents: 69 diff changeset	209 endfunction
661a97eaf608 Move `get_ctags_executable` to the `ctags` module. Ludovic Chabant <ludovic@chabant.com> parents: 69 diff changeset	210
62 106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	211 function! s:process_options_file(proj_dir, path) abort
116 be8d47e88ab1 ctags: use empty() instead of comparing with "" Ilya Tumaykin <itumaykin@gmail.com> parents: 115 diff changeset	212 if empty(g:gutentags_cache_dir)
62 106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	213 " If we're not using a cache directory to store tag files, we can
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	214 " use the options file straight away.
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	215 return a:path
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	216 endif
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	217
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	218 " See if we need to process the options file.
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	219 let l:do_process = 0
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	220 let l:proj_dir = gutentags#stripslash(a:proj_dir)
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	221 let l:out_path = gutentags#get_cachefile(l:proj_dir, 'options')
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	222 if !filereadable(l:out_path)
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	223 call gutentags#trace("Processing options file '".a:path."' because ".
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	224 \"it hasn't been processed yet.")
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	225 let l:do_process = 1
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	226 elseif getftime(a:path) > getftime(l:out_path)
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	227 call gutentags#trace("Processing options file '".a:path."' because ".
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	228 \"it has changed.")
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	229 let l:do_process = 1
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	230 endif
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	231 if l:do_process == 0
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	232 " Nothing's changed, return the existing processed version of the
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	233 " options file.
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	234 return l:out_path
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	235 endif
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	236
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	237 " We have to process the options file. Right now this only means capturing
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	238 " all the 'exclude' rules, and rewrite them to make them absolute.
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	239 "
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	240 " This is because since `ctags` is run with absolute paths (because we
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	241 " want the tag file to be in a cache directory), it will do its path
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	242 " matching with absolute paths too, so the exclude rules need to be
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	243 " absolute.
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	244 let l:lines = readfile(a:path)
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	245 let l:outlines = []
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	246 for line in l:lines
99 05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	247 let l:exarg_idx = matchend(line, '\v^\-\-exclude=')
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	248 if l:exarg_idx < 0
62 106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	249 call add(l:outlines, line)
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	250 continue
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	251 endif
99 05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	252
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	253 " Don't convert things that don't look like paths.
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	254 let l:exarg = strpart(line, l:exarg_idx + 1)
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	255 let l:do_convert = 1
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	256 if l:exarg[0] == '@' " Manifest file path
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	257 let l:do_convert = 0
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	258 endif
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	259 if stridx(l:exarg, '/') < 0 && stridx(l:exarg, '\\') < 0 " Filename
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	260 let l:do_convert = 0
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	261 endif
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	262 if l:do_convert == 0
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	263 call add(l:outlines, line)
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	264 continue
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	265 endif
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	266
05fc1e2172cc Fixes in the processing of `.gutctags`. Ludovic Chabant <ludovic@chabant.com> parents: 98 diff changeset	267 let l:fullp = l:proj_dir . gutentags#normalizepath('/'.l:exarg)
62 106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	268 let l:ol = '--exclude='.l:fullp
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	269 call add(l:outlines, l:ol)
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	270 endfor
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	271
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	272 call writefile(l:outlines, l:out_path)
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	273 return l:out_path
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	274 endfunction
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	275
106757c129cb Change the per-project option file to be `.gutctags` and process it first. Ludovic Chabant <ludovic@chabant.com> parents: 60 diff changeset	276 " }}}

Mercurial > vim-gutentags

annotate autoload/gutentags/ctags.vim @ 184:3cd4597fb86b