Revision 27a422da
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
scripts/locales.pl | ||
---|---|---|
166 | 166 |
my @new_missing = grep { !$self->{texts}{$_} } sort keys %alllocales; |
167 | 167 |
|
168 | 168 |
if (@new_missing) { |
169 |
if ($opt_c) { |
|
170 |
my %existing_lc = map { (lc $_ => $_) } grep { $self->{texts}->{$_} } keys %{ $self->{texts} }; |
|
171 |
foreach my $entry (@new_missing) { |
|
172 |
my $other = $existing_lc{lc $entry}; |
|
173 |
print "W: No entry for '${entry}' exists, but there is one with different case: '${other}'\n" if $other; |
|
174 |
} |
|
175 |
} |
|
176 |
|
|
169 | 177 |
generate_file( |
170 | 178 |
file => "$locales_dir/missing", |
171 | 179 |
header => $MISSING_HEADER, |
Auch abrufbar als: Unified diff
locales.pl: bei Existierendem mit unterschiedlicher Groß-/Kleinschreibung warnen