<xsl:apply-templates select="." mode="synopfragment.number"/>
</xsl:variable>
<xsl:text> </xsl:text>
- <!-- * If we have a group of Synopfragments, we only want to output a -->
- <!-- * line of space before the first; so when we find a Synopfragment -->
- <!-- * whose first preceding sibling is another Synopfragment, we back -->
- <!-- * up one line vertically to negate the line of vertical space -->
- <!-- * that's added by the .HP macro -->
+ If we have a group of Synopfragments, we only want to output a
+ line of space before the first; so when we find a Synopfragment
+ whose first preceding sibling is another Synopfragment, we back
+ use the pinch-together template to close up the line of space
+ that would otherwise be generated by the .HP macro
<xsl:if test="preceding-sibling::*[1][self::synopfragment]">
- <xsl:text>.sp -1 </xsl:text>
+ <xsl:call-template name="pinch.together"/>
</xsl:if>
<xsl:text>.HP </xsl:text>
<!-- * For each Synopfragment, make a hanging paragraph, with the -->
<!-- * Output table title -->
<!-- * ============================================================== -->
<xsl:if test="$title != '' or parent::td">
- <xsl:call-template name="title-preamble"/>
+ <xsl:call-template name="pinch.together"/>
<xsl:text>.</xsl:text>
<xsl:value-of select="$tbl.font.title"/>
<xsl:text> </xsl:text>
<!-- * The nested-section-title template is called for refsect3, and any -->
<!-- * refsection nested more than 2 levels deep. -->
<xsl:template name="nested-section-title">
- <xsl:call-template name="title-preamble"/>
+ <xsl:call-template name="pinch.together"/>
<xsl:text>.ps +1 </xsl:text>
<xsl:call-template name="make.bold.title"/>
</xsl:template>
- <xsl:template name="title-preamble">
+ <xsl:template name="pinch.together">
<!-- * arcane roff code to suppress line spacing after headings -->
<xsl:text>.sp </xsl:text>
<xsl:text>.it 1 an-trap </xsl:text>