Add @data-tsv-header to TSV data cells

[Shushe] / parsers / tsv.xslt

diff --git a/parsers/tsv.xslt b/parsers/tsv.xslt
index 6c689360a3afb1e4a6f3b92ba827043667decaa1..94a7395ce99aa369952981331577e580a9019ed7 100644 (file)
--- a/parsers/tsv.xslt
+++ b/parsers/tsv.xslt
@@ -51,11 +51,14 @@ If a copy of the M·P·L was not distributed with this file, You can obtain one
                                                </call-template>
                                        </variable>
                                        <html:tr>
-                                               <for-each select="exsl:node-set($cols)/*[count(exsl:node-set($headcols)/*)>position()]">
+                                               <for-each select="exsl:node-set($cols)/*[count(exsl:node-set($headcols)/*)>=position()]">
                                                        <html:td>
+                                                               <attribute name="data-tsv-header">
+                                                                       <value-of select="exsl:node-set($headcols)/*[count(current()/preceding-sibling::*)+1]"/>
+                                                               </attribute>
                                                                <value-of select="."/>
                                                                <if test="position()=count(exsl:node-set($headcols)/*)">
-                                                                       <for-each select="following-sibling:*">
+                                                                       <for-each select="following-sibling::*">
                                                                                <text>&#x9;</text>
                                                                                <value-of select="."/>
                                                                        </for-each>