fix for new perl (redundant defined)

[librarian.git] / librarian / epub / xsltContent.xsl

diff --git a/librarian/epub/xsltContent.xsl b/librarian/epub/xsltContent.xsl
index fa033ee..24315c5 100644 (file)
--- a/librarian/epub/xsltContent.xsl
+++ b/librarian/epub/xsltContent.xsl
@@ -25,7 +25,10 @@
           </xsl:for-each>
         </dc:creator>
         <dc:publisher>
-          <xsl:apply-templates select="//dc:publisher" />
+          <xsl:for-each select="//dc:publisher/text()">
+            <xsl:value-of select="."/>
+            <xsl:if test="not(position() = last())">; </xsl:if>
+          </xsl:for-each>
         </dc:publisher>
         <dc:date opf:event="publication">
           <xsl:apply-templates select="//dc:date" />