X-Git-Url: https://git.mdrn.pl/librarian.git/blobdiff_plain/a31e3178735b133e86b013da22acf38bd1b83534..0b32c81b837233ea59fdd1b5f19edc935f7b626d:/librarian/fb2/poems.xslt?ds=inline

diff --git a/librarian/fb2/poems.xslt b/librarian/fb2/poems.xslt
index d276ebf..31b05b4 100644
--- a/librarian/fb2/poems.xslt
+++ b/librarian/fb2/poems.xslt
@@ -25,29 +25,15 @@
 	<!-- regular poem elements -->
 	<xsl:template mode="para" match="strofa">
 		<stanza>
-			<xsl:call-template name="split-poem">
-				<xsl:with-param name="list" select="."/>
-			</xsl:call-template>
+			<xsl:apply-templates mode="poem"/>
 		</stanza>
 	</xsl:template>
 
-	<!-- split into verses -->
-	<xsl:template name="split-poem">
-		<xsl:param name="list"></xsl:param>
+	<!-- XXX: it should be done elsewhere but our cheap verse splitting
+		puts it here -->
+	<xsl:template match="motyw" mode="poem"/>
 
-		<xsl:if test="$list != ''">
-			<xsl:variable name="before"
-				select="substring-before(concat($list, '/'), '/')"/>
-			<xsl:variable name="after"
-				select="substring-after($list, '/')"/>
-
-			<v>
-				<xsl:value-of select="$before"/>
-			</v>
-
-			<xsl:call-template name="split-poem">
-				<xsl:with-param name="list" select="$after"/>
-			</xsl:call-template>
-		</xsl:if>
+	<xsl:template mode="poem" match="wers_normalny|wers_cd|wers_wciety|wers_akap">
+		<v><xsl:apply-templates mode="inline"/></v>
 	</xsl:template>
 </xsl:stylesheet>