Lines 274-279
if (defined $href) {
Link Here
|
274 |
# $charset_in = $candidate; |
274 |
# $charset_in = $candidate; |
275 |
# } |
275 |
# } |
276 |
# } |
276 |
# } |
|
|
277 |
|
278 |
# BUG6464: check consistency of PO messages |
279 |
# - count number of '%s' in msgid and msgstr |
280 |
for my $msg ( values %$href ) { |
281 |
my $id_count = split(/%s/, $msg->{msgid}) - 1; |
282 |
my $str_count = split(/%s/, $msg->{msgstr}) - 1; |
283 |
next if $id_count == $str_count || |
284 |
$msg->{msgstr} eq '""' || |
285 |
grep { /fuzzy/ } @{$msg->{_flags}}; |
286 |
warn_normal |
287 |
"unconsistent %s count: ($id_count/$str_count):\n" . |
288 |
" line: " . $msg->{loaded_line_number} . "\n" . |
289 |
" msgid: " . $msg->{msgid} . "\n" . |
290 |
" msgstr: " . $msg->{msgstr} . "\n", undef; |
291 |
} |
277 |
} |
292 |
} |
278 |
|
293 |
|
279 |
# set our charset in to UTF-8 |
294 |
# set our charset in to UTF-8 |
280 |
- |
|
|