3.3 Right Apostrophes

<..replace characters..>
 <script element="PARA" >
   <set name="apostro" >
      <.open xslt script.>
      <.right apostrophe in prose.>
      <.delimiters in marks of enumerated lists.>
      <.remove empty paragraphs.>
      <.close xslt script.>
   </set>
   <xslt name="." xml="." xsl="apostro" />
 </script>
-_-_-

<..right apostrophe in prose..>
 <xsl:template match="span[
      (@class = ’char-del’)
     and  child::span [ @class = ’ch 2019’ ]
 ]" >
    <xsl:text>’</xsl:text>
 </xsl:template>
-_-_-