Mercurial > vim
annotate runtime/ftplugin/spec.vim @ 4700:0c25fa1dfd97 v7.3.1097
updated for version 7.3.1097
Problem: Python: a few recently added items are not documented.
Solution: Update the documentation. (ZyX)
author | Bram Moolenaar <bram@vim.org> |
---|---|
date | Sun, 02 Jun 2013 17:46:40 +0200 |
parents | 94601b379f38 |
children | c2098c3095e7 |
rev | line source |
---|---|
7 | 1 " Plugin to update the %changelog section of RPM spec files |
2 " Filename: spec.vim | |
3 " Maintainer: Gustavo Niemeyer <niemeyer@conectiva.com> | |
3410
94601b379f38
Updated runtime files. Add Dutch translations.
Bram Moolenaar <bram@vim.org>
parents:
3237
diff
changeset
|
4 " Last Change: 2012 Mar 07 |
7 | 5 |
6 if exists("b:did_ftplugin") | |
7 finish | |
8 endif | |
9 let b:did_ftplugin = 1 | |
10 | |
3237 | 11 let s:cpo_save = &cpo |
12 set cpo&vim | |
13 | |
7 | 14 if !exists("no_plugin_maps") && !exists("no_spec_maps") |
15 if !hasmapto("<Plug>SpecChangelog") | |
16 map <buffer> <LocalLeader>c <Plug>SpecChangelog | |
17 endif | |
18 endif | |
19 | |
20 noremap <buffer> <unique> <script> <Plug>SpecChangelog :call <SID>SpecChangelog("")<CR> | |
21 | |
22 if !exists("*s:SpecChangelog") | |
23 function s:SpecChangelog(format) | |
24 if strlen(a:format) == 0 | |
25 if !exists("g:spec_chglog_format") | |
26 let email = input("Email address: ") | |
27 let g:spec_chglog_format = "%a %b %d %Y " . l:email | |
28 echo "\r" | |
29 endif | |
30 let format = g:spec_chglog_format | |
31 else | |
32 if !exists("g:spec_chglog_format") | |
33 let g:spec_chglog_format = a:format | |
34 endif | |
35 let format = a:format | |
36 endif | |
37 let line = 0 | |
38 let name = "" | |
39 let ver = "" | |
40 let rel = "" | |
41 let nameline = -1 | |
42 let verline = -1 | |
43 let relline = -1 | |
44 let chgline = -1 | |
45 while (line <= line("$")) | |
46 let linestr = getline(line) | |
47 if (name == "" && linestr =~? '^Name:') | |
48 let nameline = line | |
49 let name = substitute(strpart(linestr,5), '^[ ]*\([^ ]\+\)[ ]*$','\1','') | |
50 elseif (ver == "" && linestr =~? '^Version:') | |
51 let verline = line | |
52 let ver = substitute(strpart(linestr,8), '^[ ]*\([^ ]\+\)[ ]*$','\1','') | |
53 elseif (rel == "" && linestr =~? '^Release:') | |
54 let relline = line | |
55 let rel = substitute(strpart(linestr,8), '^[ ]*\([^ ]\+\)[ ]*$','\1','') | |
56 elseif (linestr =~? '^%changelog') | |
57 let chgline = line | |
58 execute line | |
59 break | |
60 endif | |
61 let line = line+1 | |
62 endwhile | |
63 if (nameline != -1 && verline != -1 && relline != -1) | |
64 let include_release_info = exists("g:spec_chglog_release_info") | |
65 let name = s:ParseRpmVars(name, nameline) | |
66 let ver = s:ParseRpmVars(ver, verline) | |
67 let rel = s:ParseRpmVars(rel, relline) | |
68 else | |
69 let include_release_info = 0 | |
70 endif | |
71 if (chgline == -1) | |
72 let option = confirm("Can't find %changelog. Create one? ","&End of file\n&Here\n&Cancel",3) | |
73 if (option == 1) | |
74 call append(line("$"),"") | |
75 call append(line("$"),"%changelog") | |
76 execute line("$") | |
77 let chgline = line(".") | |
78 elseif (option == 2) | |
79 call append(line("."),"%changelog") | |
80 normal j | |
81 chgline = line(".") | |
82 endif | |
83 endif | |
84 if (chgline != -1) | |
85 let parsed_format = "* ".strftime(format) | |
86 let release_info = "+ ".name."-".ver."-".rel | |
87 let wrong_format = 0 | |
88 let wrong_release = 0 | |
89 let insert_line = 0 | |
90 if (getline(chgline+1) != parsed_format) | |
91 let wrong_format = 1 | |
92 endif | |
93 if (include_release_info && getline(chgline+2) != release_info) | |
94 let wrong_release = 1 | |
95 endif | |
96 if (wrong_format || wrong_release) | |
97 if (include_release_info && !wrong_release && !exists("g:spec_chglog_never_increase_release")) | |
98 let option = confirm("Increase release? ","&Yes\n&No",1) | |
99 if (option == 1) | |
100 execute relline | |
101 normal | |
102 let rel = substitute(strpart(getline(relline),8), '^[ ]*\([^ ]\+\)[ ]*$','\1','') | |
103 let release_info = "+ ".name."-".ver."-".rel | |
104 endif | |
105 endif | |
106 let n = 0 | |
107 call append(chgline+n, parsed_format) | |
108 if include_release_info | |
109 let n = n + 1 | |
110 call append(chgline+n, release_info) | |
111 endif | |
112 let n = n + 1 | |
113 call append(chgline+n,"- ") | |
114 let n = n + 1 | |
115 call append(chgline+n,"") | |
116 let insert_line = chgline+n | |
117 else | |
118 let line = chgline | |
119 if !exists("g:spec_chglog_prepend") | |
120 while !(getline(line+2) =~ '^\( *\|\*.*\)$') | |
121 let line = line+1 | |
122 endwhile | |
123 endif | |
124 call append(line+1,"- ") | |
125 let insert_line = line+2 | |
126 endif | |
127 execute insert_line | |
128 startinsert! | |
129 endif | |
130 endfunction | |
131 endif | |
132 | |
133 if !exists("*s:ParseRpmVars") | |
134 function s:ParseRpmVars(str, strline) | |
135 let end = -1 | |
136 let ret = "" | |
137 while (1) | |
138 let start = match(a:str, "\%{", end+1) | |
139 if (start == -1) | |
140 let ret = ret . strpart(a:str, end+1) | |
141 break | |
142 endif | |
143 let ret = ret . strpart(a:str, end+1, start-(end+1)) | |
144 let end = match(a:str, "}", start) | |
145 if (end == -1) | |
146 let ret = ret . strpart(a:str, start) | |
147 break | |
148 endif | |
149 let varname = strpart(a:str, start+2, end-(start+2)) | |
150 execute a:strline | |
151 let definestr = "^[ \t]*%define[ \t]\\+" . varname . "[ \t]\\+\\(.*\\)$" | |
152 let linenum = search(definestr, "bW") | |
153 if (linenum != -1) | |
154 let ret = ret . substitute(getline(linenum), definestr, "\\1", "") | |
155 else | |
156 let ret = ret . strpart(str, start, end+1-start) | |
157 endif | |
158 endwhile | |
159 return ret | |
160 endfunction | |
161 endif | |
162 | |
163 " The following lines, along with the macros/matchit.vim plugin, | |
164 " make it easy to navigate the different sections of a spec file | |
165 " with the % key (thanks to Max Ischenko). | |
166 | |
167 let b:match_ignorecase = 0 | |
168 let b:match_words = | |
169 \ '^Name:^%description:^%clean:^%setup:^%build:^%install:^%files:' . | |
170 \ '^%package:^%preun:^%postun:^%changelog' | |
171 | |
3237 | 172 let &cpo = s:cpo_save |
173 unlet s:cpo_save | |
174 | |
3410
94601b379f38
Updated runtime files. Add Dutch translations.
Bram Moolenaar <bram@vim.org>
parents:
3237
diff
changeset
|
175 let b:undo_ftplugin = "unlet! b:match_ignorecase b:match_words" |