Redirect messages to stderr & support disabling

[Shushe] / parsers / tsv.xslt

diff --git a/parsers/tsv.xslt b/parsers/tsv.xslt
index 2597060cd697d5d7315deb1252c222c6f5e73799..94a7395ce99aa369952981331577e580a9019ed7 100644 (file)
--- a/parsers/tsv.xslt
+++ b/parsers/tsv.xslt
@@ -17,7 +17,7 @@ If a copy of the M·P·L was not distributed with this file, You can obtain one
        xmlns:exslstr="http://exslt.org/strings"
        xmlns:html="http://www.w3.org/1999/xhtml"
        xmlns:书社="urn:fdc:ladys.computer:20231231:Shu1She4"
-       exclude-result-prefixes="exsl exslstr"
+       extension-element-prefixes="exsl exslstr"
        version="1.0"
 >
        <import href="../lib/split.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>