Revision 203ebd4a
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
locale/de/all | ||
---|---|---|
2 | 2 |
# -*- coding: utf-8; -*- |
3 | 3 |
# vim: fenc=UTF-8 |
4 | 4 |
|
5 |
use utf8; |
|
6 |
|
|
5 | 7 |
# These are all the texts to build the translations files. |
6 | 8 |
# The file has the form of 'english text' => 'foreign text', |
7 | 9 |
# you can add the translation in this file or in the 'missing' file |
... | ... | |
153 | 155 |
'Add bank account' => 'Bankkonto erfassen', |
154 | 156 |
'Add custom variable' => 'Benutzerdefinierte Variable erfassen', |
155 | 157 |
'Add note' => 'Notiz erfassen', |
156 |
'Add to group' => 'Zu Gruppe hinzufügen', |
|
157 | 158 |
'Add unit' => 'Einheit hinzufügen', |
158 | 159 |
'Address' => 'Adresse', |
159 | 160 |
'Administration' => 'Administration', |
... | ... | |
1011 | 1012 |
'May ' => 'Mai', |
1012 | 1013 |
'May set the BCC field when sending emails' => 'Beim Verschicken von Emails das Feld \'BCC\' setzen', |
1013 | 1014 |
'Medium Number' => 'Datenträgernummer', |
1014 |
'Members not of' => 'Benutzer nicht in Gruppe', |
|
1015 |
'Members of' => 'Benutzer in Gruppe', |
|
1016 | 1015 |
'Memo' => 'Memo', |
1017 | 1016 |
'Menu' => 'Menü', |
1018 | 1017 |
'Message' => 'Nachricht', |
locale/de_DE/all | ||
---|---|---|
2 | 2 |
# -*- coding: utf-8; -*- |
3 | 3 |
# vim: fenc=UTF-8 |
4 | 4 |
|
5 |
use utf8; |
|
6 |
|
|
5 | 7 |
# These are all the texts to build the translations files. |
6 | 8 |
# The file has the form of 'english text' => 'foreign text', |
7 | 9 |
# you can add the translation in this file or in the 'missing' file |
locale/en/all | ||
---|---|---|
2 | 2 |
# -*- coding: utf-8; -*- |
3 | 3 |
# vim: fenc=UTF-8 |
4 | 4 |
|
5 |
use utf8; |
|
6 |
|
|
5 | 7 |
# These are all the texts to build the translations files. |
6 | 8 |
# The file has the form of 'english text' => 'foreign text', |
7 | 9 |
# you can add the translation in this file or in the 'missing' file |
scripts/locales.pl | ||
---|---|---|
600 | 600 |
my $data_name = $params{data_name}; |
601 | 601 |
my @delim = split //, ($params{delim} || '{}'); |
602 | 602 |
|
603 |
open my $fh, '>', $file or die "$! : $file"; |
|
603 |
open my $fh, '>:encoding(utf8)', $file or die "$! : $file";
|
|
604 | 604 |
|
605 | 605 |
$charset =~ s/\r?\n//g; |
606 | 606 |
my $emacs_charset = lc $charset; |
607 | 607 |
|
608 |
print $fh "#!/usr/bin/perl\n# -*- coding: $emacs_charset; -*-\n# vim: fenc=$charset\n\n"; |
|
608 |
print $fh "#!/usr/bin/perl\n# -*- coding: $emacs_charset; -*-\n# vim: fenc=$charset\n\nuse utf8;\n\n";
|
|
609 | 609 |
print $fh $header, "\n" if $header; |
610 | 610 |
print $fh "$data_name = $delim[0]\n" if $data_name; |
611 | 611 |
|
Auch abrufbar als: Unified diff
Perl-Scripte mit UTF-8 encodierten Umlaugen brauchen "use utf8"