From 2ab6f03279885171b24789dac59ff5ec97319819 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 17 Feb 2002 19:03:52 +0000
Subject: use xsltproc as a filter to remove entities

---
 perl-install/share/po/help_xml2pm.pl | 3 ++-
 perl-install/share/po/id.xsl         | 5 +++++
 2 files changed, 7 insertions(+), 1 deletion(-)
 create mode 100644 perl-install/share/po/id.xsl

(limited to 'perl-install/share')

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>
-- 
cgit v1.2.1