Added PI for cellspacing and cellpadding; also added currently useless Python extensi...

diff --git a/xsl/html/table.xsl b/xsl/html/table.xsl
index fbbbce9fbb514eff3680a92ac7896e7b56f6ce3d..3a90ae829ea4a6d8f4fdc2c1a6ca5cbeef67a3a0 100644 (file)
--- a/xsl/html/table.xsl
+++ b/xsl/html/table.xsl
@@ -3,8 +3,9 @@
                 xmlns:doc="http://nwalsh.com/xsl/documentation/1.0"
                 xmlns:stbl="http://nwalsh.com/xslt/ext/com.nwalsh.saxon.Table"
                 xmlns:xtbl="com.nwalsh.xalan.Table"
+                xmlns:ptbl="http://nwalsh.com/xslt/ext/xsltproc/python/Table"
                 xmlns:lxslt="http://xml.apache.org/xslt"
-                exclude-result-prefixes="doc stbl xtbl lxslt"
+                exclude-result-prefixes="doc stbl xtbl lxslt ptbl"
                 version='1.0'>
 
 <xsl:include href="../common/table.xsl"/>
@@ -95,7 +96,7 @@
         <xsl:variable name="summary">
           <xsl:call-template name="dbhtml-attribute">
             <xsl:with-param name="pis"
-                            select="processing-instruction('dbhtml')[1]"/>
+                            select="processing-instruction('dbhtml')"/>
             <xsl:with-param name="attribute" select="'table-summary'"/>
           </xsl:call-template>
         </xsl:variable>
@@ -104,6 +105,32 @@
             <xsl:value-of select="$summary"/>
           </xsl:attribute>
         </xsl:if>
+
+        <xsl:variable name="cellspacing">
+          <xsl:call-template name="dbhtml-attribute">
+            <xsl:with-param name="pis"
+                            select="processing-instruction('dbhtml')"/>
+            <xsl:with-param name="attribute" select="'cellspacing'"/>
+          </xsl:call-template>
+        </xsl:variable>
+        <xsl:if test="$cellspacing != ''">
+          <xsl:attribute name="cellspacing">
+            <xsl:value-of select="$cellspacing"/>
+          </xsl:attribute>
+        </xsl:if>
+
+        <xsl:variable name="cellpadding">
+          <xsl:call-template name="dbhtml-attribute">
+            <xsl:with-param name="pis"
+                            select="processing-instruction('dbhtml')[1]"/>
+            <xsl:with-param name="attribute" select="'cellpadding'"/>
+          </xsl:call-template>
+        </xsl:variable>
+        <xsl:if test="$cellpadding != ''">
+          <xsl:attribute name="cellpadding">
+            <xsl:value-of select="$cellpadding"/>
+          </xsl:attribute>
+        </xsl:if>
       </xsl:when>
 
       <!-- Otherwise, if there's a title, use that -->
@@ -265,6 +292,9 @@
           <xsl:when test="function-available('xtbl:adjustColumnWidths')">
             <xsl:copy-of select="xtbl:adjustColumnWidths($colgroup)"/>
           </xsl:when>
+          <xsl:when test="function-available('ptbl:adjustColumnWidths')">
+            <xsl:copy-of select="ptbl:adjustColumnWidths($colgroup)"/>
+          </xsl:when>
           <xsl:otherwise>
             <xsl:message terminate="yes">
               <xsl:text>No adjustColumnWidths function available.</xsl:text>