From: Bob Stayton <bobs@sagehill.net>
Date: Mon, 8 Jan 2007 03:32:20 +0000 (+0000)
Subject: Add utility template tabstyle to return the tabstyle from
X-Git-Tag: release/1.79.1~6^2~2379
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=ad1d24f4c55263104813e9a66887f31d53767404;p=docbook-dsssl

Add utility template tabstyle to return the tabstyle from
any table element.
---

diff --git a/xsl/common/table.xsl b/xsl/common/table.xsl
index 4599f02ad..8fa6c8e62 100644
--- a/xsl/common/table.xsl
+++ b/xsl/common/table.xsl
@@ -473,4 +473,31 @@ or 0 (the empty string)</para>
   </xsl:if>
 </xsl:template>
 
+<!-- Returns the table style for the context element -->
+<xsl:template name="tabstyle">
+  <xsl:param name="node" select="."/>
+
+  <xsl:variable name="tgroup" select="$node/tgroup[1] | 
+                                      $node/ancestor-or-self::tgroup[1]"/>
+
+  <xsl:variable name="table" 
+                select="($node/ancestor-or-self::table | 
+                         $node/ancestor-or-self::informaltable)[1]"/>
+
+  <xsl:variable name="tabstyle">
+    <xsl:choose>
+      <xsl:when test="$table/@tabstyle != ''">
+        <xsl:value-of select="normalize-space($table/@tabstyle)"/>
+      </xsl:when>
+      <xsl:when test="$tgroup/@tgroupstyle != ''">
+        <xsl:value-of select="normalize-space($tgroup/@tgroupstyle)"/>
+      </xsl:when>
+      <xsl:otherwise>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:variable>
+
+  <xsl:value-of select="$tabstyle"/>
+</xsl:template>
+
 </xsl:stylesheet>