summaryrefslogtreecommitdiffstats
path: root/perl-install/share
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-08-29 23:12:35 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-08-29 23:12:35 +0000
commit84a6dbba1e0c345092c77c14cf209b6a27577f2c (patch)
treeadd537f63b34abbfb7173112afcd41423c6a845b /perl-install/share
parent73a35cd13f04b447691234eb9c24fb5a880cbab1 (diff)
downloaddrakx-backup-do-not-use-84a6dbba1e0c345092c77c14cf209b6a27577f2c.tar
drakx-backup-do-not-use-84a6dbba1e0c345092c77c14cf209b6a27577f2c.tar.gz
drakx-backup-do-not-use-84a6dbba1e0c345092c77c14cf209b6a27577f2c.tar.bz2
drakx-backup-do-not-use-84a6dbba1e0c345092c77c14cf209b6a27577f2c.tar.xz
drakx-backup-do-not-use-84a6dbba1e0c345092c77c14cf209b6a27577f2c.zip
- fix missing to_ascii on english part in help-xx.pot
- ignore drakxid's in a language but not in english
Diffstat (limited to 'perl-install/share')
-rwxr-xr-xperl-install/share/po/help_xml2pm.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/share/po/help_xml2pm.pl b/perl-install/share/po/help_xml2pm.pl
index 0af0ddee4..e079cc22d 100755
--- a/perl-install/share/po/help_xml2pm.pl
+++ b/perl-install/share/po/help_xml2pm.pl
@@ -39,10 +39,10 @@ foreach my $lang (keys %helps) {
open F, ">:encoding($charset)", "help-$lang.pot";
print F "\n";
foreach my $id (keys %{$helps{$lang}}) {
- $base->{$id} or die "$lang:$id doesn't exist in english\n";
+ $base->{$id} or warn "$lang:$id doesn't exist in english\n", next;
print F qq(# DO NOT BOTHER TO MODIFY HERE, SEE:\n# cvs.mandrakesoft.com:/cooker/$dir/$lang/drakx-chapter.xml\n);
print F qq(msgid ""\n");
- print F join(qq(\\n"\n"), split "\n", $base->{$id});
+ print F join(qq(\\n"\n"), split "\n", to_ascii($base->{$id}));
print F qq("\nmsgstr ""\n");
print F join(qq(\\n"\n"), split "\n", $helps{$lang}{$id});
print F qq("\n\n);