\usepackage{wl}
</TeXML>
+ <xsl:choose>
+ <xsl:when test="@old-morefloats">
+ <TeXML escape="0">
+ \IfFileExists{morefloats.sty}{
+ \usepackage{morefloats}
+ }{}
+ </TeXML>
+ </xsl:when>
+ <xsl:otherwise>
+ <TeXML escape="0">
+ \usepackage[maxfloats=64]{morefloats}
+ </TeXML>
+ </xsl:otherwise>
+ </xsl:choose>
+
<xsl:apply-templates select="rdf:RDF" mode="titlepage" />
<xsl:apply-templates select="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" mode='titlepage' />
<xsl:template match="rdf:RDF" mode="titlepage">
<cmd name='title'><parm>
- <xsl:value-of select=".//dc:title/text()" />
+ <xsl:apply-templates select=".//dc:title/node()" mode="inline" />
</parm></cmd>
<cmd name='author'><parm>
- <xsl:value-of select="wl:person_name(.//dc:creator/text())" />
+ <xsl:apply-templates select=".//dc:creator_parsed/node()" mode="inline" />
</parm></cmd>
+ <TeXML escape="0">
+ \def\sourceinfo{<TeXML escape="1"><xsl:apply-templates select=".//dc:source/node()" mode="inline" /></TeXML>}
+ </TeXML>
</xsl:template>
<xsl:template match="rdf:RDF" mode="dctitle">
<cmd name="section*"><parm>
- <xsl:value-of select=".//dc:title/text()" />
+ <xsl:apply-templates select=".//dc:title/node()" mode="inline" />
</parm></cmd>
</xsl:template>
<xsl:template match="rdf:RDF" mode="firstdctitle">
<cmd name="subsection*"><parm>
- <xsl:value-of select="wl:person_name(.//dc:creator/text())" />
+ <xsl:apply-templates select=".//dc:creator_parsed/node()" mode="inline" />
</parm></cmd>
<cmd name="section*"><parm>
- <xsl:value-of select=".//dc:title/text()" />
+ <xsl:apply-templates select=".//dc:title/node()" mode="inline" />
</parm></cmd>
</xsl:template>
<xsl:template match="lista_osob">
<cmd name="par"><parm>
<cmd name="textbf">
- <parm><xsl:value-of select="naglowek_listy" /></parm>
+ <parm><xsl:apply-templates select="naglowek_listy" mode="inline" /></parm>
</cmd>
<env name="itemize">
<xsl:apply-templates select="lista_osoba" />
</xsl:template>
<xsl:template match="dedykacja">
- <cmd name="hspace"><parm>0.4<cmd name='linewidth' /></parm></cmd>
- <env name="minipage"><parm>0.6<cmd name='linewidth' /></parm>
- <env name="em">
- <xsl:apply-templates />
+ <env name="em">
+ <env name="flushright">
+ <xsl:apply-templates/>
</env>
</env>
</xsl:template>
<!-- ========================================== -->
<!-- only in root -->
-<xsl:template match="autor_utworu" mode="title">X
+<xsl:template match="autor_utworu" mode="title">
<cmd name="subsection*"><parm>
<xsl:apply-templates mode="inline" />
</parm></cmd>
</xsl:template>
<xsl:template match="naglowek_osoba|naglowek_podrozdzial">
- <cmd name="paragraph*">
+ <cmd name="par">
<parm><xsl:apply-templates mode="inline" /></parm>
- </cmd>
+ </cmd><cmd name="nopagebreak" />
</xsl:template>
<!-- Other paragraph tags -->
<xsl:template match="strofa">
<cmd name="par"><parm><cmd name="noindent"><parm>
- <xsl:choose>
- <xsl:when test="count(br) > 0">
+ <xsl:choose>
+ <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:call-template>
+ <xsl:for-each select="br">
+ <TeXML escape="0">\\{}</TeXML>
+ <!-- Each BR tag "consumes" text after it -->
+ <xsl:variable name="lnum" select="count(preceding-sibling::br)" />
<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-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:call-template>
- <xsl:for-each select="br">
- <cmd name="newline" />
- <!-- Each BR tag "consumes" text after it -->
- <xsl:variable name="lnum" select="count(preceding-sibling::br)" />
- <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: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:call-template>
- </xsl:otherwise>
- </xsl:choose>
+ </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:call-template>
+ </xsl:otherwise>
+ </xsl:choose>
<cmd name="vspace"><parm>1em</parm></cmd>
</parm></cmd></parm></cmd>
</xsl:template>
<xsl:template name="verse">
<xsl:param name="verse-content" />
<xsl:param name="verse-type" />
- <xsl:choose><xsl:when test="name($verse-type) = 'wers_akap'"><cmd name="hspace" ><parm><xsl:value-of select="$firet" />pt</parm></cmd></xsl:when>
+ <xsl:choose><xsl:when test="name($verse-type) = 'wers_akap'"><cmd name="hspace" ><parm>1em</parm></cmd></xsl:when>
<xsl:when test="name($verse-type) = 'wers_wciety'">
<xsl:choose>
- <xsl:when test="$verse-content/@typ">
+ <xsl:when test="string($verse-content/@typ)">
<cmd name="hspace" ><parm><xsl:value-of select="$verse-content/@typ" />em</parm></cmd>
</xsl:when>
<xsl:otherwise>
</xsl:choose>
</xsl:when>
<xsl:when test="name($verse-type) = 'wers_cd'">
- <cmd name="hspace" ><parm>12em</parm></cmd>
+ <cmd name="hspace" ><parm>8em</parm></cmd>
</xsl:when>
</xsl:choose>
<xsl:apply-templates select="$verse-content" mode="inline" />
</xsl:template>
<xsl:template match="motto_podpis">
- <cmd name="hspace"><parm>0.4<cmd name='linewidth' /></parm></cmd>
- <env name="minipage"><parm>0.6<cmd name='linewidth' /></parm>
- <env name="em">
- <xsl:apply-templates mode="inline" />
+ <env name="em">
+ <env name="flushright">
+ <xsl:apply-templates mode="inline"/>
</env>
</env>
</xsl:template>
<cmd name="hspace"><parm>0pt</parm></cmd>
<cmd name="footnotesize"><parm>
<cmd name="color"><parm>theme</parm><parm>
- <xsl:value-of select="." />
+ <xsl:apply-templates mode="inline" />
</parm></cmd>
</parm></cmd>
</parm></cmd>
+ <cmd name="vspace"><parm><cmd name="baselineskip" /></parm></cmd>
</parm>
</cmd>
</xsl:template>
<xsl:template match="extra|uwaga" />
<xsl:template match="extra|uwaga" mode="inline" />
+<xsl:template match="nota_red" />
<!-- ======== -->
<!-- = TEXT = -->