From: Norman Walsh <ndw@nwalsh.com>
Date: Sun, 25 Jul 2004 21:25:56 +0000 (+0000)
Subject: Allow calloutlist to have block content before the first callout
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=e7febb2e3446f3ad2e878868846b627eeaa000dd;p=docbook-dsssl

Allow calloutlist to have block content before the first callout
---

diff --git a/xsl/html/lists.xsl b/xsl/html/lists.xsl
index 770add69a..8c528bd54 100644
--- a/xsl/html/lists.xsl
+++ b/xsl/html/lists.xsl
@@ -900,14 +900,27 @@
     <xsl:if test="title">
       <xsl:call-template name="formal.object.heading"/>
     </xsl:if>
+
+    <!-- Preserve order of PIs and comments -->
+    <xsl:apply-templates 
+         select="*[not(self::callout or self::title or self::titleabbrev)]
+                   |comment()[not(preceding-sibling::callout)]
+		   |processing-instruction()[not(preceding-sibling::callout)]"/>
+
     <xsl:choose>
       <xsl:when test="$callout.list.table != 0">
         <table border="0" summary="Callout list">
-          <xsl:apply-templates/>
-        </table>
+	  <xsl:apply-templates select="callout
+			        |comment()[preceding-sibling::calllout]
+				|processing-instruction()[preceding-sibling::callout]"/>
+	</table>
       </xsl:when>
       <xsl:otherwise>
-        <dl compact="compact"><xsl:apply-templates/></dl>
+	<dl compact="compact">
+	  <xsl:apply-templates select="callout
+			        |comment()[preceding-sibling::calllout]
+				|processing-instruction()[preceding-sibling::callout]"/>
+	</dl>
       </xsl:otherwise>
     </xsl:choose>
   </div>