Mercurial > vim
annotate src/po/check.vim @ 17953:708e8cd5a67b
Added tag v8.1.1972 for changeset 4754339d9aee1eecad3436e758738156b22f1a0f
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 03 Sep 2019 23:45:04 +0200 |
parents | b79453d0d01c |
children | 57927799c27e |
rev | line source |
---|---|
461 | 1 " Vim script for checking .po files. |
2 " | |
1599 | 3 " Go through the file and verify that: |
4 " - All %...s items in "msgid" are identical to the ones in "msgstr". | |
5 " - An error or warning code in "msgid" matches the one in "msgstr". | |
461 | 6 |
7 if 1 " Only execute this if the eval feature is available. | |
8 | |
9 " Function to get a split line at the cursor. | |
10 " Used for both msgid and msgstr lines. | |
11 " Removes all text except % items and returns the result. | |
12 func! GetMline() | |
13 let idline = substitute(getline('.'), '"\(.*\)"$', '\1', '') | |
14 while line('.') < line('$') | |
15 + | |
16 let line = getline('.') | |
17 if line[0] != '"' | |
18 break | |
19 endif | |
20 let idline .= substitute(line, '"\(.*\)"$', '\1', '') | |
21 endwhile | |
22 | |
557 | 23 " remove '%', not used for formatting. |
24 let idline = substitute(idline, "'%'", '', 'g') | |
25 | |
1952 | 26 " remove '%' used for plural forms. |
27 let idline = substitute(idline, '\\nPlural-Forms: .\+;\\n', '', '') | |
28 | |
461 | 29 " remove everything but % items. |
30 return substitute(idline, '[^%]*\(%[-+ #''.0-9*]*l\=[dsuxXpoc%]\)\=', '\1', 'g') | |
31 endfunc | |
32 | |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
33 " This only works when 'wrapscan' is not set. |
2484
e037ee8698b3
Set 'wrapscan' when checking the .po files. (Mike Williams)
Bram Moolenaar <bram@vim.org>
parents:
1952
diff
changeset
|
34 let s:save_wrapscan = &wrapscan |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
35 set nowrapscan |
2484
e037ee8698b3
Set 'wrapscan' when checking the .po files. (Mike Williams)
Bram Moolenaar <bram@vim.org>
parents:
1952
diff
changeset
|
36 |
461 | 37 " Start at the first "msgid" line. |
11702
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
38 let wsv = winsaveview() |
461 | 39 1 |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
40 /^msgid\> |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
41 |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
42 " When an error is detected this is set to the line number. |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
43 " Note: this is used in the Makefile. |
461 | 44 let error = 0 |
45 | |
46 while 1 | |
47 if getline(line('.') - 1) !~ "no-c-format" | |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
48 " go over the "msgid" and "msgid_plural" lines |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
49 let prevfromline = 'foobar' |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
50 while 1 |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
51 let fromline = GetMline() |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
52 if prevfromline != 'foobar' && prevfromline != fromline |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
53 echomsg 'Mismatching % in line ' . (line('.') - 1) |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
54 echomsg 'msgid: ' . prevfromline |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
55 echomsg 'msgid ' . fromline |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
56 if error == 0 |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
57 let error = line('.') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
58 endif |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
59 endif |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
60 if getline('.') !~ 'msgid_plural' |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
61 break |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
62 endif |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
63 let prevfromline = fromline |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
64 endwhile |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
65 |
461 | 66 if getline('.') !~ '^msgstr' |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
67 echomsg 'Missing "msgstr" in line ' . line('.') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
68 if error == 0 |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
69 let error = line('.') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
70 endif |
461 | 71 endif |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
72 |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
73 " check all the 'msgstr' lines |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
74 while getline('.') =~ '^msgstr' |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
75 let toline = GetMline() |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
76 if fromline != toline |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
77 echomsg 'Mismatching % in line ' . (line('.') - 1) |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
78 echomsg 'msgid: ' . fromline |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
79 echomsg 'msgstr: ' . toline |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
80 if error == 0 |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
81 let error = line('.') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
82 endif |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
83 endif |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
84 if line('.') == line('$') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
85 break |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
86 endif |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
87 endwhile |
461 | 88 endif |
89 | |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
90 " Find next msgid. Quit when there is no more. |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
91 let lnum = line('.') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
92 silent! /^msgid\> |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
93 if line('.') == lnum |
461 | 94 break |
95 endif | |
96 endwhile | |
97 | |
1599 | 98 " Check that error code in msgid matches the one in msgstr. |
99 " | |
100 " Examples of mismatches found with msgid "E123: ..." | |
101 " - msgstr "E321: ..." error code mismatch | |
102 " - msgstr "W123: ..." warning instead of error | |
103 " - msgstr "E123 ..." missing colon | |
104 " - msgstr "..." missing error code | |
105 " | |
106 1 | |
107 if search('msgid "\("\n"\)\?\([EW][0-9]\+:\).*\nmsgstr "\("\n"\)\?[^"]\@=\2\@!') > 0 | |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
108 echomsg 'Mismatching error/warning code in line ' . line('.') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
109 if error == 0 |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
110 let error = line('.') |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
111 endif |
1599 | 112 endif |
113 | |
11702
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
114 func! CountNl(first, last) |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
115 let nl = 0 |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
116 for lnum in range(a:first, a:last) |
11828
5a07a3ff56c1
patch 8.0.0794: checking translations fails with multiple NL
Christian Brabandt <cb@256bit.org>
parents:
11702
diff
changeset
|
117 let nl += count(getline(lnum), "\n") |
11702
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
118 endfor |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
119 return nl |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
120 endfunc |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
121 |
11828
5a07a3ff56c1
patch 8.0.0794: checking translations fails with multiple NL
Christian Brabandt <cb@256bit.org>
parents:
11702
diff
changeset
|
122 " Check that the \n at the end of the msgid line is also present in the msgstr |
11702
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
123 " line. Skip over the header. |
13812
9d6cd12ae7bc
patch 8.0.1778: script to check translations does not always work
Christian Brabandt <cb@256bit.org>
parents:
12756
diff
changeset
|
124 1 |
11702
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
125 /^"MIME-Version: |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
126 while 1 |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
127 let lnum = search('^msgid\>') |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
128 if lnum <= 0 |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
129 break |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
130 endif |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
131 let strlnum = search('^msgstr\>') |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
132 let end = search('^$') |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
133 if end <= 0 |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
134 let end = line('$') + 1 |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
135 endif |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
136 let origcount = CountNl(lnum, strlnum - 1) |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
137 let transcount = CountNl(strlnum, end - 1) |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
138 " Allow for a few more or less line breaks when there are 2 or more |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
139 if origcount != transcount && (origcount <= 2 || transcount <= 2) |
11828
5a07a3ff56c1
patch 8.0.0794: checking translations fails with multiple NL
Christian Brabandt <cb@256bit.org>
parents:
11702
diff
changeset
|
140 echomsg 'Mismatching "\n" in line ' . line('.') |
11702
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
141 if error == 0 |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
142 let error = lnum |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
143 endif |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
144 endif |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
145 endwhile |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
146 |
11900
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
147 " Check that the file is well formed according to msgfmts understanding |
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
148 if executable("msgfmt") |
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
149 let filename = expand("%") |
12756
3b26420fc639
Long overdue runtime update.
Christian Brabandt <cb@256bit.org>
parents:
11910
diff
changeset
|
150 " Newer msgfmt does not take OLD_PO_FILE_INPUT argument, must be in |
3b26420fc639
Long overdue runtime update.
Christian Brabandt <cb@256bit.org>
parents:
11910
diff
changeset
|
151 " environment. |
3b26420fc639
Long overdue runtime update.
Christian Brabandt <cb@256bit.org>
parents:
11910
diff
changeset
|
152 let $OLD_PO_FILE_INPUT = 'yes' |
3b26420fc639
Long overdue runtime update.
Christian Brabandt <cb@256bit.org>
parents:
11910
diff
changeset
|
153 let a = system("msgfmt --statistics " . filename) |
11900
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
154 if v:shell_error != 0 |
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
155 let error = matchstr(a, filename.':\zs\d\+\ze:')+0 |
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
156 for line in split(a, '\n') | echomsg line | endfor |
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
157 endif |
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
158 endif |
39e46ae74c69
patch 8.0.0830: translating messages is not ideal
Christian Brabandt <cb@256bit.org>
parents:
11828
diff
changeset
|
159 |
13938
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
160 " Check that the plural form is properly initialized |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
161 1 |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
162 let plural = search('^msgid_plural ', 'n') |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
163 if (plural && search('^"Plural-Forms: ', 'n') == 0) || (plural && search('^msgstr\[0\] ".\+"', 'n') != plural + 1) |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
164 if search('^"Plural-Forms: ', 'n') == 0 |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
165 echomsg "Missing Plural header" |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
166 if error == 0 |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
167 let error = search('\(^"[A-Za-z-_]\+: .*\\n"\n\)\+\zs', 'n') - 1 |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
168 endif |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
169 elseif error == 0 |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
170 let error = plural |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
171 endif |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
172 elseif !plural && search('^"Plural-Forms: ', 'n') |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
173 " We allow for a stray plural header, msginit adds one. |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
174 endif |
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
175 |
14187
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
176 " Check that 8bit encoding is used instead of 8-bit |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
177 let cte = search('^"Content-Transfer-Encoding:\s\+8-bit', 'n') |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
178 let ctc = search('^"Content-Type:.*;\s\+\<charset=[iI][sS][oO]_', 'n') |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
179 let ctu = search('^"Content-Type:.*;\s\+\<charset=utf-8', 'n') |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
180 if cte |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
181 echomsg "Content-Transfer-Encoding should be 8bit instead of 8-bit" |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
182 " TODO: make this an error |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
183 " if error == 0 |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
184 " let error = cte |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
185 " endif |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
186 elseif ctc |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
187 echomsg "Content-Type charset should be 'ISO-...' instead of 'ISO_...'" |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
188 " TODO: make this an error |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
189 " if error == 0 |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
190 " let error = ct |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
191 " endif |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
192 elseif ctu |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
193 echomsg "Content-Type charset should be 'UTF-8' instead of 'utf-8'" |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
194 " TODO: make this an error |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
195 " if error == 0 |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
196 " let error = ct |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
197 " endif |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
198 endif |
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
199 |
13938
b9db0bc9b8f9
patch 8.0.1839: script to check .po file doesn't check for plural header
Christian Brabandt <cb@256bit.org>
parents:
13812
diff
changeset
|
200 |
461 | 201 if error == 0 |
11702
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
202 " If all was OK restore the view. |
48a95b916781
patch 8.0.0734: the script to check translations can be improved
Christian Brabandt <cb@256bit.org>
parents:
9963
diff
changeset
|
203 call winrestview(wsv) |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
204 echomsg "OK" |
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
205 else |
14187
b79453d0d01c
patch 8.1.0111: .po files do not use recommended names
Christian Brabandt <cb@256bit.org>
parents:
13938
diff
changeset
|
206 " Put the cursor on the line with the error. |
9963
580f57b07547
commit https://github.com/vim/vim/commit/ec42059b78c1932a44f2bf36ac982109884dc7c7
Christian Brabandt <cb@256bit.org>
parents:
2484
diff
changeset
|
207 exe error |
461 | 208 endif |
209 | |
2484
e037ee8698b3
Set 'wrapscan' when checking the .po files. (Mike Williams)
Bram Moolenaar <bram@vim.org>
parents:
1952
diff
changeset
|
210 let &wrapscan = s:save_wrapscan |
e037ee8698b3
Set 'wrapscan' when checking the .po files. (Mike Williams)
Bram Moolenaar <bram@vim.org>
parents:
1952
diff
changeset
|
211 unlet s:save_wrapscan |
e037ee8698b3
Set 'wrapscan' when checking the .po files. (Mike Williams)
Bram Moolenaar <bram@vim.org>
parents:
1952
diff
changeset
|
212 |
461 | 213 endif |