From: Michael Smith <xmldoc@users.sourceforge.net>
Date: Sun, 1 Jul 2007 16:30:27 +0000 (+0000)
Subject: Changed tangle.xweb to cause support to be added to xtangle.xsl to
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=a25cca81b79312d71e5cb3964979f9d456243ce3;p=docbook-dsssl

Changed tangle.xweb to cause support to be added to xtangle.xsl to
suppress doctypes in xtangle.xsl output; controlled through the
suppress.doctype.in.output XSLT parameter.
---

diff --git a/litprog/Makefile b/litprog/Makefile
index e7e6c1321..a5fd6cbab 100644
--- a/litprog/Makefile
+++ b/litprog/Makefile
@@ -1,5 +1,7 @@
 include ../buildtools/Makefile.incl
 
+XTANGLE_PARAMS=
+
 all: tangle.xsl weave.xsl w2docbook.xsl xtangle.xsl
 	$(MAKE) -C html
 	$(MAKE) -C example
@@ -27,24 +29,24 @@ html: xml tangle.html weave.html
 # it can rebuild itself.
 xtangle.xsl: tangle.xweb bootstrap-tangle.xsl
 	$(XSLT) $< bootstrap-tangle.xsl .boot.tangle.xsl
-	$(XSLT) $< .boot.tangle.xsl $@ top=xtop
+	$(XSLT) $< .boot.tangle.xsl $@ top=xtop $(XTANGLE_PARAMS)
 	rm -f .boot.tangle.xsl
 
-tangle.xsl: tangle.xweb xtangle.xsl
-	$(XSLT) $< xtangle.xsl $@
+tangle.xsl: tangle.xweb xtangle.xsl 
+	$(XSLT) $< xtangle.xsl $@ $(XTANGLE_PARAMS)
 
 tangle.xml: tangle.xweb w2docbook.xsl
 	$(XSLT) $< w2docbook.xsl $@
 
 weave.xsl: weave.xweb xtangle.xsl
-	$(XSLT)  $< xtangle.xsl $@
+	$(XSLT)  $< xtangle.xsl $@ $(XTANGLE_PARAMS)
 
 weave.xml: weave.xweb w2docbook.xsl
 	$(XSLT)  $< w2docbook.xsl $@
 	xjparse $@
 
 w2docbook.xsl: weave.xweb xtangle.xsl weave.xsl
-	$(XSLT) $< xtangle.xsl $@ top=w2docbook
+	$(XSLT) $< xtangle.xsl $@ top=w2docbook $(XTANGLE_PARAMS)
 
 realclean: clean
 	rm -f xtangle.xsl
diff --git a/litprog/tangle.xweb b/litprog/tangle.xweb
index 9775c93f5..8bc99b8fb 100644
--- a/litprog/tangle.xweb
+++ b/litprog/tangle.xweb
@@ -110,6 +110,7 @@ the IDs identified as type ID in the source document.</para>
   <xsl:key name="fragment" match="src:fragment" use="@*[local-name() = 'id']"/>
 
   <xsl:param name="top" select="'top'"/>
+  <xsl:param name="suppress.doctype.in.output" select="0"/>
 
 </src:fragment>
 
@@ -507,14 +508,24 @@ nodes automatically.</para>
 </orderedlist>
 
 <src:fragment id="copy-default">
-<xsl:template match="*" mode="copy">
-  <xsl:variable name="node" select="."/>
-  <xsl:element name="{name(.)}" namespace="{namespace-uri(.)}">
-    <src:fragref linkend="copy-namespaces"/>
-    <xsl:copy-of select="@*"/>
-    <xsl:apply-templates mode="copy"/>
-  </xsl:element>
-</xsl:template>
+  <xsl:template match="*" mode="copy">
+    <xsl:variable name="node" select="."/>
+    <xsl:element name="{name(.)}" namespace="{namespace-uri(.)}">
+      <src:fragref linkend="copy-namespaces"/>
+      <xsl:for-each select="@*">
+        <xsl:choose>
+          <xsl:when test="not($suppress.doctype.in.output = 0)
+          and (local-name(.) = 'doctype-public'
+          or local-name(.) = 'doctype-system')
+          "/>
+          <xsl:otherwise>
+            <xsl:copy-of select="."/>
+          </xsl:otherwise>
+        </xsl:choose>
+      </xsl:for-each>
+      <xsl:apply-templates mode="copy"/>
+    </xsl:element>
+  </xsl:template>
 </src:fragment>
 
 <para>For non-XML source docuements, this template will never match