summaryrefslogtreecommitdiffstats
path: root/perl-install/share
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/share')
-rwxr-xr-xperl-install/share/po/help_xml2pm.pl3
-rw-r--r--perl-install/share/po/id.xsl5
2 files changed, 7 insertions, 1 deletions
diff --git a/perl-install/share/po/help_xml2pm.pl b/perl-install/share/po/help_xml2pm.pl
index 3a4793bff..6ab48a24a 100755
--- a/perl-install/share/po/help_xml2pm.pl
+++ b/perl-install/share/po/help_xml2pm.pl
@@ -10,7 +10,8 @@ my @langs = grep { /^..$/ && -e "$dir/$_/drakx-help.xml" } all($dir) or die "no
my %helps = map {
my $lang = $_;
my $p = new XML::Parser(Style => 'Tree');
- my $tree = $p->parsefile("$dir/$lang/drakx-help.xml");
+ open F, "xsltproc id.xsl $dir/$lang/drakx-help.xml|";
+ my $tree = $p->parse(*F);
$lang => rewrite2(rewrite1(@$tree), $lang);
} @langs;
diff --git a/perl-install/share/po/id.xsl b/perl-install/share/po/id.xsl
new file mode 100644
index 000000000..4897a204f
--- /dev/null
+++ b/perl-install/share/po/id.xsl
@@ -0,0 +1,5 @@
+<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
+<xsl:template match="/">
+ <xsl:copy-of select="."/>
+</xsl:template>
+</xsl:stylesheet>