fix for perl 5.26+

[librarian.git] / librarian / xslt / book2txt.xslt

diff --git a/librarian/xslt/book2txt.xslt b/librarian/xslt/book2txt.xslt
index 6a25023..8589121 100644 (file)
--- a/librarian/xslt/book2txt.xslt
+++ b/librarian/xslt/book2txt.xslt
@@ -21,6 +21,7 @@
 <xsl:if test="not (../@raw-text) and nazwa_utworu">
     <xsl:apply-templates select="autor_utworu|dzielo_nadrzedne|nazwa_utworu|podtytul" mode="header" />
     <xsl:call-template name="translators" />
 <xsl:if test="not (../@raw-text) and nazwa_utworu">
     <xsl:apply-templates select="autor_utworu|dzielo_nadrzedne|nazwa_utworu|podtytul" mode="header" />
     <xsl:call-template name="translators" />

+    <xsl:call-template name="isbn" />

     <xsl:text>
 </xsl:text>
 </xsl:if>
     <xsl:text>
 </xsl:text>
 </xsl:if>


@@ -39,6 +40,10 @@
 <xsl:apply-templates />
 </xsl:template>
 
 <xsl:apply-templates />
 </xsl:template>
 

+<xsl:template match="ramka">
+<xsl:apply-templates />
+</xsl:template>
+

 <xsl:template match="lista_osob">
 <xsl:text>
 
 <xsl:template match="lista_osob">
 <xsl:text>
 


@@ -179,7 +184,7 @@
         <xsl:when test="count(br) > 0">
             <xsl:call-template name="verse">
                 <xsl:with-param name="verse-content" select="br[1]/preceding-sibling::text() | br[1]/preceding-sibling::node()" />
         <xsl:when test="count(br) > 0">
             <xsl:call-template name="verse">
                 <xsl:with-param name="verse-content" select="br[1]/preceding-sibling::text() | br[1]/preceding-sibling::node()" />

-                <xsl:with-param name="verse-type" select="br[1]/preceding-sibling::*[name() = 'wers_wciety' or name() = 'wers_akap' or name() = 'wers_cd'][1]" />
+                <xsl:with-param name="verse-type" select="br[1]/preceding-sibling::*[name() = 'wers_wciety' or name() = 'wers_akap' or name() = 'wers_cd' or name() = 'wers_do_prawej'][1]" />

             </xsl:call-template>
             <xsl:for-each select="br">         
                        <!-- Each BR tag "consumes" text after it -->
             </xsl:call-template>
             <xsl:for-each select="br">         
                        <!-- Each BR tag "consumes" text after it -->


@@ -187,14 +192,14 @@
                 <xsl:call-template name="verse">
                     <xsl:with-param name="verse-content"
                         select="following-sibling::text()[count(preceding-sibling::br) = $lnum+1] | following-sibling::node()[count(preceding-sibling::br) = $lnum+1]" />
                 <xsl:call-template name="verse">
                     <xsl:with-param name="verse-content"
                         select="following-sibling::text()[count(preceding-sibling::br) = $lnum+1] | following-sibling::node()[count(preceding-sibling::br) = $lnum+1]" />

-                    <xsl:with-param name="verse-type" select="following-sibling::*[count(preceding-sibling::br) = $lnum+1 and (name() = 'wers_wciety' or name() = 'wers_akap' or name() = 'wers_cd')][1]" />
+                    <xsl:with-param name="verse-type" select="following-sibling::*[count(preceding-sibling::br) = $lnum+1 and (name() = 'wers_wciety' or name() = 'wers_akap' or name() = 'wers_cd' or name() = 'wers_do_prawej')][1]" />

                 </xsl:call-template>
             </xsl:for-each>
         </xsl:when>
         <xsl:otherwise>
             <xsl:call-template name="verse">
                 <xsl:with-param name="verse-content" select="text() | node()" />
                 </xsl:call-template>
             </xsl:for-each>
         </xsl:when>
         <xsl:otherwise>
             <xsl:call-template name="verse">
                 <xsl:with-param name="verse-content" select="text() | node()" />

-                <xsl:with-param name="verse-type" select="wers_wciety|wers_akap|wers_cd[1]" />
+                <xsl:with-param name="verse-type" select="wers_wciety|wers_akap|wers_cd|wers_do_prawej[1]" />

              </xsl:call-template>
         </xsl:otherwise>
     </xsl:choose>
              </xsl:call-template>
         </xsl:otherwise>
     </xsl:choose>


@@ -225,6 +230,9 @@
         <xsl:when test="name($verse-type) = 'wers_cd'">
             <xsl:text>                        </xsl:text>
         </xsl:when>
         <xsl:when test="name($verse-type) = 'wers_cd'">
             <xsl:text>                        </xsl:text>
         </xsl:when>

+        <xsl:when test="name($verse-type) = 'wers_do_prawej'">
+            <xsl:text>                        </xsl:text>
+        </xsl:when>

     </xsl:choose>
 <xsl:value-of select="wl:strip($content)" />
 </xsl:template>
     </xsl:choose>
 <xsl:value-of select="wl:strip($content)" />
 </xsl:template>


@@ -274,6 +282,14 @@
 <xsl:text>*</xsl:text><xsl:apply-templates mode="inline" /><xsl:text>*</xsl:text>
 </xsl:template>
 
 <xsl:text>*</xsl:text><xsl:apply-templates mode="inline" /><xsl:text>*</xsl:text>
 </xsl:template>
 

+<xsl:template match="indeks_dolny" mode="inline">
+<xsl:apply-templates mode="inline" />
+</xsl:template>
+
+<xsl:template match="wieksze_odstepy" mode="inline">
+<xsl:apply-templates mode="inline" />
+</xsl:template>
+

 <xsl:template match="osoba" mode="inline">
 <xsl:apply-templates mode="inline" />
 </xsl:template>
 <xsl:template match="osoba" mode="inline">
 <xsl:apply-templates mode="inline" />
 </xsl:template>


@@ -334,6 +350,14 @@
     </xsl:if>
 </xsl:template>
 
     </xsl:if>
 </xsl:template>
 

+<xsl:template name="isbn">
+    <xsl:if test="//meta[@id='txt-id']">
+        <xsl:variable name="isbn" select="//meta[@id='txt-id']"/>
+        <text>
+ISBN </text><xsl:value-of select="substring-after($isbn, 'ISBN-')"/>
+    </xsl:if>
+</xsl:template>
+

 
 <!-- ================ -->
 <!-- = IGNORED TAGS = -->
 
 <!-- ================ -->
 <!-- = IGNORED TAGS = -->