metanorma-iso 2.4.8 → 2.5.1

data/lib/isodoc/iso/iso.international-standard.xsl

@@ -1353,38 +1353,35 @@
 						<xsl:call-template name="insertHeaderFooter"/>
 						<fo:flow flow-name="xsl-region-body">
 
-							<fo:block-container>
-								<!-- Information and documentation — Codes for transcription systems -->
-								<!-- <fo:block font-size="16pt" font-weight="bold" margin-bottom="18pt">
-									<xsl:value-of select="$title-en"/>
-								</fo:block>
-								 -->
+							<!-- Information and documentation — Codes for transcription systems -->
+							<!-- <fo:block-container>
+								
 								<fo:block font-size="18pt" font-weight="bold" margin-top="40pt" margin-bottom="20pt" line-height="1.1" role="H1">
-
+								
 									<fo:block role="SKIP">
-
+									
 										<xsl:apply-templates select="/iso:iso-standard/iso:bibdata/iso:title[@language = $lang and @type = 'title-intro']"/>
-
+										
 										<xsl:apply-templates select="/iso:iso-standard/iso:bibdata/iso:title[@language = $lang and @type = 'title-main']"/>
-
+										
 										<xsl:apply-templates select="/iso:iso-standard/iso:bibdata/iso:title[@language = $lang and @type = 'title-part']">
 											<xsl:with-param name="isMainLang">true</xsl:with-param>
 											<xsl:with-param name="isMainBody">true</xsl:with-param>
 										</xsl:apply-templates>
-
+										
 									</fo:block>
 									<fo:block role="SKIP">
 										<xsl:apply-templates select="/iso:iso-standard/iso:bibdata/iso:title[@language = $lang and @type = 'title-part']/node()"/>
 									</fo:block>
-
+									
 									<xsl:apply-templates select="/iso:iso-standard/iso:bibdata/iso:title[@language = $lang and @type = 'title-amd']">
 										<xsl:with-param name="isMainLang">true</xsl:with-param>
 										<xsl:with-param name="isMainBody">true</xsl:with-param>
 									</xsl:apply-templates>
-
+									
 								</fo:block>
-
-							</fo:block-container>
+							
+							</fo:block-container> -->
 							<!-- Clause(s) -->
 							<fo:block>
 
@@ -1757,6 +1754,31 @@
 		</xsl:if>
 	</xsl:template>
 
+	<xsl:template match="iso:sections/iso:p[@class = 'zzSTDTitle1']" priority="4">
+		<fo:block font-size="18pt" font-weight="bold" margin-top="40pt" margin-bottom="20pt" line-height="1.1" role="H1">
+			<xsl:if test="following-sibling::*[1][self::iso:p][starts-with(@class, 'zzSTDTitle')]">
+				<xsl:attribute name="margin-bottom">0pt</xsl:attribute>
+			</xsl:if>
+			<xsl:apply-templates/>
+		</fo:block>
+	</xsl:template>
+
+	<xsl:template match="iso:sections/iso:p[@class = 'zzSTDTitle1']/iso:span[@class = 'nonboldtitle']" priority="3">
+		<!-- Example: <span class="nonboldtitle">Part 1:</span> -->
+		<fo:block font-weight="normal" margin-top="12pt" line-height="1.1" role="SKIP">
+			<xsl:apply-templates/>
+		</fo:block>
+	</xsl:template>
+
+	<xsl:template match="iso:sections/iso:p[@class = 'zzSTDTitle2']" priority="4">
+		<!-- Example: <p class="zzSTDTitle2" displayorder="3">AMENDMENT 1: Mass fraction of extraneous matter, milled rice (nonglutinous), sample dividers and recommendations relating to storage and transport conditions</p> -->
+		<xsl:if test="$doctype = 'amendment'">
+			<fo:block font-size="18pt" margin-top="12pt" margin-bottom="20pt" margin-right="0mm" font-weight="normal" line-height="1.1" role="H1">
+				<xsl:apply-templates/>
+			</fo:block>
+		</xsl:if>
+	</xsl:template>
+
 	<!-- ==================== -->
 	<!-- END display titles   -->
 	<!-- ==================== -->
@@ -2652,11 +2674,26 @@
 							<xsl:value-of select="$font_extended"/><xsl:text>, </xsl:text>
 						</xsl:if>
 
-						<xsl:value-of select="."/>
+						<xsl:variable name="font_family" select="."/>
 
-						<xsl:if test="$additional_fonts != ''">
-							<xsl:text>, </xsl:text><xsl:value-of select="$additional_fonts"/>
-						</xsl:if>
+						<xsl:choose>
+							<xsl:when test="$additional_fonts = ''">
+								<xsl:value-of select="$font_family"/>
+							</xsl:when>
+							<xsl:otherwise> <!-- $additional_fonts != '' -->
+								<xsl:choose>
+									<xsl:when test="contains($font_family, ',')">
+										<xsl:value-of select="substring-before($font_family, ',')"/>
+										<xsl:text>, </xsl:text><xsl:value-of select="$additional_fonts"/>
+										<xsl:text>, </xsl:text><xsl:value-of select="substring-after($font_family, ',')"/>
+									</xsl:when>
+									<xsl:otherwise>
+										<xsl:value-of select="$font_family"/>
+										<xsl:text>, </xsl:text><xsl:value-of select="$additional_fonts"/>
+									</xsl:otherwise>
+								</xsl:choose>
+							</xsl:otherwise>
+						</xsl:choose>
 					</xsl:attribute>
 				</xsl:when>
 				<xsl:otherwise>
@@ -5330,21 +5367,21 @@
 
 	<xsl:template match="*[local-name()='table']/*[local-name()='note' or local-name() = 'example']" priority="2">
 
-		<fo:block xsl:use-attribute-sets="table-note-style">
+				<fo:block xsl:use-attribute-sets="table-note-style">
 
-			<xsl:call-template name="refine_table-note-style"/>
+					<xsl:call-template name="refine_table-note-style"/>
 
-			<!-- Table's note/example name (NOTE, for example) -->
-			<fo:inline xsl:use-attribute-sets="table-note-name-style">
+					<!-- Table's note/example name (NOTE, for example) -->
+					<fo:inline xsl:use-attribute-sets="table-note-name-style">
 
-				<xsl:call-template name="refine_table-note-name-style"/>
+						<xsl:call-template name="refine_table-note-name-style"/>
 
-				<xsl:apply-templates select="*[local-name() = 'name']"/>
+						<xsl:apply-templates select="*[local-name() = 'name']"/>
 
-			</fo:inline>
+					</fo:inline>
 
-			<xsl:apply-templates select="node()[not(local-name() = 'name')]"/>
-		</fo:block>
+					<xsl:apply-templates select="node()[not(local-name() = 'name')]"/>
+				</fo:block>
 
 	</xsl:template> <!-- table/note -->
 
@@ -6429,6 +6466,9 @@
 	<!-- END Definition List -->
 	<!-- ===================== -->
 
+	<!-- default: ignore title in sections/p -->
+	<xsl:template match="*[local-name() = 'sections']/*[local-name() = 'p'][starts-with(@class, 'zzSTDTitle')]" priority="3"/>
+
 	<!-- ========================= -->
 	<!-- Rich text formatting -->
 	<!-- ========================= -->
@@ -6512,7 +6552,7 @@
 	<xsl:variable name="regex_url_start">^(http://|https://|www\.)?(.*)</xsl:variable>
 	<xsl:template match="*[local-name()='tt']/text()" priority="2">
 		<xsl:choose>
-			<xsl:when test="java:replaceAll(java:java.lang.String.new(.), '$2', '') != ''">
+			<xsl:when test="java:replaceAll(java:java.lang.String.new(.), $regex_url_start, '$2') != ''">
 				 <!-- url -->
 				<xsl:call-template name="add-zero-spaces-link-java"/>
 			</xsl:when>
@@ -7045,10 +7085,13 @@
 			</xsl:choose>
 		</xsl:variable>
 
+		<!-- replace sequence #x200B to one &#x200B -->
+		<xsl:variable name="text10" select="java:replaceAll(java:java.lang.String.new($text9), '\u200b{2,}', '​')"/>
+
 		<!-- replace sequence #x200B and space TO space -->
-		<xsl:variable name="text10" select="java:replaceAll(java:java.lang.String.new($text9), '\u200b ', ' ')"/>
+		<xsl:variable name="text11" select="java:replaceAll(java:java.lang.String.new($text10), '\u200b ', ' ')"/>
 
-		<xsl:value-of select="$text10"/>
+		<xsl:value-of select="$text11"/>
 	</xsl:template>
 
 	<xsl:template name="add-zero-spaces-link-java">
@@ -7058,8 +7101,12 @@
 		<xsl:variable name="url_continue" select="java:replaceAll(java:java.lang.String.new($text), $regex_url_start, '$2')"/>
 		<!-- add zero-width space (#x200B) after characters: dash, dot, colon, equal, underscore, em dash, thin space, comma, slash, @  -->
 		<xsl:variable name="url" select="java:replaceAll(java:java.lang.String.new($url_continue),'(-|\.|:|=|_|—| |,|/|@)','$1​')"/>
+
+		<!-- replace sequence #x200B to one &#x200B -->
+		<xsl:variable name="url2" select="java:replaceAll(java:java.lang.String.new($url), '\u200b{2,}', '​')"/>
+
 		<!-- remove zero-width space at the end -->
-		<xsl:value-of select="java:replaceAll(java:java.lang.String.new($url), '​$', '')"/>
+		<xsl:value-of select="java:replaceAll(java:java.lang.String.new($url2), '​$', '')"/>
 	</xsl:template>
 
 	<!-- add zero space after dash character (for table's entries) -->
@@ -8556,8 +8603,12 @@
 		<xsl:variable name="isAdded" select="../@added"/>
 		<xsl:variable name="isDeleted" select="../@deleted"/>
 		<xsl:choose>
-			<xsl:when test="ancestor::*[local-name() = 'title']">
+			<xsl:when test="ancestor::*[local-name() = 'title'] or not(parent::*[local-name() = 'figure']) or parent::*[local-name() = 'p']">
 				<fo:inline padding-left="1mm" padding-right="1mm">
+					<xsl:if test="not(parent::*[local-name() = 'figure']) or parent::*[local-name() = 'p']">
+						<xsl:attribute name="padding-left">0mm</xsl:attribute>
+						<xsl:attribute name="padding-right">0mm</xsl:attribute>
+					</xsl:if>
 					<xsl:variable name="src">
 						<xsl:call-template name="image_src"/>
 					</xsl:variable>
@@ -8590,25 +8641,45 @@
 							<fo:external-graphic src="{$src}" fox:alt-text="Image {@alt}" xsl:use-attribute-sets="image-graphic-style">
 								<xsl:if test="not(@mimetype = 'image/svg+xml') and ../*[local-name() = 'name'] and not(ancestor::*[local-name() = 'table'])">
 
-									<xsl:variable name="img_src">
-										<xsl:choose>
-											<xsl:when test="not(starts-with(@src, 'data:'))"><xsl:value-of select="concat($basepath, @src)"/></xsl:when>
-											<xsl:otherwise><xsl:value-of select="@src"/></xsl:otherwise>
-										</xsl:choose>
-									</xsl:variable>
+									<xsl:if test="@width != '' and @width != 'auto' and @width != 'text-width' and @width != 'full-page-width' and @width != 'narrow'">
+										<xsl:attribute name="width">
+											<xsl:value-of select="@width"/>
+										</xsl:attribute>
+									</xsl:if>
 
-									<xsl:variable name="image_width_effective">
+									<xsl:if test="@height != '' and @height != 'auto'">
+										<xsl:attribute name="height">
+											<xsl:value-of select="@height"/>
+										</xsl:attribute>
+									</xsl:if>
 
-												<xsl:value-of select="$width_effective"/>
+									<xsl:choose>
+										<xsl:when test="@width != '' and @width != 'auto' and @height != '' and @height != 'auto'">
+											<xsl:attribute name="scaling">non-uniform</xsl:attribute>
+										</xsl:when>
+										<xsl:otherwise>
 
-									</xsl:variable>
+											<xsl:variable name="img_src">
+												<xsl:choose>
+													<xsl:when test="not(starts-with(@src, 'data:'))"><xsl:value-of select="concat($basepath, @src)"/></xsl:when>
+													<xsl:otherwise><xsl:value-of select="@src"/></xsl:otherwise>
+												</xsl:choose>
+											</xsl:variable>
 
-									<xsl:variable name="scale" select="java:org.metanorma.fop.Util.getImageScale($img_src, $image_width_effective, $height_effective)"/>
-									<xsl:if test="number($scale) &lt; 100">
+											<xsl:variable name="image_width_effective">
 
-												<xsl:attribute name="content-width"><xsl:value-of select="$scale"/>%</xsl:attribute>
+														<xsl:value-of select="$width_effective"/>
 
-									</xsl:if>
+											</xsl:variable>
+
+											<xsl:variable name="scale" select="java:org.metanorma.fop.Util.getImageScale($img_src, $image_width_effective, $height_effective)"/>
+											<xsl:if test="number($scale) &lt; 100">
+
+														<xsl:attribute name="content-width"><xsl:value-of select="$scale"/>%</xsl:attribute>
+
+											</xsl:if>
+										</xsl:otherwise>
+									</xsl:choose>
 
 								</xsl:if>
 
@@ -12266,7 +12337,7 @@
 	<xsl:template match="*[local-name() = 'span']" mode="update_xml_step1">
 		<xsl:apply-templates mode="update_xml_step1"/>
 	</xsl:template>
-	<xsl:template match="*[local-name() = 'sourcecode']//*[local-name() = 'span'][@class]" mode="update_xml_step1" priority="2">
+	<xsl:template match="*[local-name() = 'sections']/*[local-name() = 'p'][starts-with(@class, 'zzSTDTitle')]/*[local-name() = 'span'][@class] | *[local-name() = 'sourcecode']//*[local-name() = 'span'][@class]" mode="update_xml_step1" priority="2">
 		<xsl:copy>
 			<xsl:copy-of select="@*"/>
 			<xsl:apply-templates mode="update_xml_step1"/>

data/lib/isodoc/iso/presentation_xml_convert.rb

@@ -11,7 +11,7 @@ module IsoDoc
     class PresentationXMLConvert < IsoDoc::PresentationXMLConvert
       def convert1(docxml, filename, dir)
         @iso_class = instance_of?(IsoDoc::Iso::PresentationXMLConvert)
-        if amd(docxml)
+        if amd?(docxml)
           @oldsuppressheadingnumbers = @suppressheadingnumbers
           @suppressheadingnumbers = true
         end
@@ -38,12 +38,12 @@ module IsoDoc
       end
 
       def annex(isoxml)
-        amd(isoxml) and @suppressheadingnumbers = @oldsuppressheadingnumbers
+        amd?(isoxml) and @suppressheadingnumbers = @oldsuppressheadingnumbers
         super
         isoxml.xpath(ns("//annex//clause | //annex//appendix")).each do |f|
           clause1(f)
         end
-        amd(isoxml) and @suppressheadingnumbers = true
+        amd?(isoxml) and @suppressheadingnumbers = true
       end
 
       def figure1(node)
@@ -87,23 +87,25 @@ module IsoDoc
         end
       end
 
-      # we're assuming terms and clauses in the right place for display,
-      # to cope with multiple terms sections
-      def display_order(docxml)
-        i = 0
-        i = display_order_xpath(docxml, "//preface/*", i)
-        i = display_order_at(docxml, "//clause[@type = 'scope']", i)
-        i = display_order_at(docxml, @xrefs.klass.norm_ref_xpath, i)
-        i = display_order_xpath(docxml,
-                                "//sections/clause[not(@type = 'scope')] | " \
-                                "//sections/terms | //sections/definitions", i)
-        i = display_order_xpath(docxml, "//annex", i)
-        i = display_order_xpath(docxml, @xrefs.klass.bibliography_xpath, i)
-        display_order_xpath(docxml, "//indexsect", i)
-      end
-
       def admonition1(elem)
         super
+        admonition_inline_name(elem)
+        admonition_outside_clauses(elem)
+      end
+
+      def admonition_outside_clauses(elem)
+        elem.parent.name == "sections" or return
+        wrap_in_bold(elem)
+      end
+
+      def wrap_in_bold(cell)
+        cell.text? && cell.text.strip.empty? and return
+        cell.text? and cell.swap("<strong>#{cell.to_xml}</strong>")
+        %w(strong fn).include?(cell.name) and return
+        cell.children.each { |p| wrap_in_bold(p) }
+      end
+
+      def admonition_inline_name(elem)
         n = elem.at(ns("./name")) or return
         if (p = n.next_element) && p&.name == "p"
           p.children.first.previous = admonition_name(to_xml(n.remove.children))
@@ -161,6 +163,45 @@ module IsoDoc
         super
       end
 
+      def middle_title(docxml)
+        @meta.get[:doctitlemain].nil? || @meta.get[:doctitlemain].empty? and
+          return
+        s = docxml.at(ns("//sections")) or return
+        ret = "#{middle_title_main}#{middle_title_amd}"
+        s.children.first.previous = ret
+      end
+
+      def middle_title_main
+        ret = "<span class='boldtitle'>#{@meta.get[:doctitleintro]}"
+        ret += " &#x2014; " if @meta.get[:doctitleintro] && @meta.get[:doctitlemain]
+        ret += @meta.get[:doctitlemain]
+        ret += " &#x2014; " if @meta.get[:doctitlemain] && @meta.get[:doctitlepart]
+        ret += "</span>"
+        if a = @meta.get[:doctitlepart]
+          b = @meta.get[:doctitlepartlabel] and ret += "<span class='nonboldtitle'>#{b}:</span> "
+          ret += "<span class='boldtitle'>#{a}</span>"
+        end
+        "<p class='zzSTDTitle1'>#{ret}</p>"
+      end
+
+      def middle_title_amd
+        ret = ""
+        if a = @meta.get[:doctitleamdlabel]
+          ret += "<p class='zzSTDTitle2'>#{a}"
+          a = @meta.get[:doctitleamd] and ret += ": #{a}"
+          ret += "</p>"
+        end
+        a = @meta.get[:doctitlecorrlabel] and
+          ret += "<p class='zzSTDTitle2'>#{a}</p>"
+        ret
+      end
+
+      def move_norm_ref_to_sections(docxml)
+        if amd?(docxml)
+        else super
+        end
+      end
+
       include Init
     end
   end

data/lib/isodoc/iso/sections.rb

@@ -1,52 +1,12 @@
 module IsoDoc
   module Iso
     module BaseConvert
-      def middle_title(_isoxml, out)
-        middle_title_main(out)
-        middle_title_amd(out)
-      end
-
-      def middle_title_main(out)
-        out.p(class: "zzSTDTitle1") do |p|
-          p << @meta.get[:doctitleintro]
-          p << " &#x2014; " if @meta.get[:doctitleintro] && @meta.get[:doctitlemain]
-          p << @meta.get[:doctitlemain]
-          p << " &#x2014; " if @meta.get[:doctitlemain] && @meta.get[:doctitlepart]
-        end
-        a = @meta.get[:doctitlepart] and out.p(class: "zzSTDTitle2") do |p|
-          b = @meta.get[:doctitlepartlabel] and p << "#{b}: "
-          p << "<br/><b>#{a}</b>"
-        end
-      end
-
-      def middle_title_amd(out)
-        a = @meta.get[:doctitleamdlabel] and out.p(class: "zzSTDTitle2") do |p|
-          p << a
-          a = @meta.get[:doctitleamd] and p << ": #{a}"
-        end
-        a = @meta.get[:doctitlecorrlabel] and out.p(class: "zzSTDTitle2") do |p|
-          p << a
-        end
-      end
-
-      def annex(isoxml, out)
-        amd(isoxml) and @suppressheadingnumbers = @oldsuppressheadingnumbers
+      def annex(node, out)
+        amd?(node.document) and
+          @suppressheadingnumbers = @oldsuppressheadingnumbers
         super
-        amd(isoxml) and @suppressheadingnumbers = true
-      end
-
-=begin
-      def introduction(clause, out)
-        title_attr = { class: "IntroTitle" }
-        page_break(out)
-        out.div class: "Section3", id: clause["id"] do |div|
-          clause_name(clause, clause.at(ns("./title")), div, title_attr)
-          clause.elements.each do |e|
-            parse(e, div) unless e.name == "title"
-          end
-        end
+        amd?(node.document) and @suppressheadingnumbers = true
       end
-=end
 
       def foreword(clause, out)
         @foreword = true

data/lib/isodoc/iso/word_convert.rb

@@ -70,8 +70,8 @@ module IsoDoc
           make_body1(body, docxml)
           make_body2(body, docxml)
           make_body3(body, docxml)
-          indexsect(docxml, body)
-          colophon(body, docxml)
+          indexsect_section(docxml, body)
+          colophon_section(docxml, body)
         end
       end
 
@@ -80,23 +80,31 @@ module IsoDoc
                                     "mso-break-type:section-break"
       end
 
-      def colophon(body, _docxml)
+      MAIN_ELEMENTS =
+        "//sections/*[@displayorder] | //annex[@displayorder] | " \
+        "//bibliography/*[@displayorder]".freeze
+
+      def colophon_section(_isoxml, out)
         stage = @meta.get[:stage_int]
         return if !stage.nil? && stage < 60
 
-        br(body, "left")
-        body.div class: "colophon" do |div|
+        br(out, "left")
+        out.div class: "colophon" do |div|
         end
       end
 
-      def indexsect(isoxml, out)
+      def indexsect_section(isoxml, out)
         isoxml.xpath(ns("//indexsect")).each do |i|
-          indexsect_title(i, out)
-          br(out, "auto")
-          out.div class: "index" do |div|
-            i.children.each do |e|
-              parse(e, div) unless e.name == "title"
-            end
+          indexsect(i, out)
+        end
+      end
+
+      def indexsect(elem, out)
+        indexsect_title(elem, out)
+        br(out, "auto")
+        out.div class: "index" do |div|
+          elem.children.each do |e|
+            parse(e, div) unless e.name == "title"
           end
         end
       end
@@ -128,14 +136,14 @@ module IsoDoc
         { class: "BiblioTitle" }
       end
 
-      def bibliography(xml, out)
-        (f = xml.at(ns(bibliography_xpath)) and f["hidden"] != "true") or return
+      def bibliography(node, out)
+        node["hidden"] != "true" or return
         page_break(out)
         out.div do |div|
           div.h1 **bibliography_attrs do |h1|
-            f&.at(ns("./title"))&.children&.each { |c2| parse(c2, h1) }
+            node&.at(ns("./title"))&.children&.each { |c2| parse(c2, h1) }
           end
-          biblio_list(f, div, true)
+          biblio_list(node, div, true)
         end
       end
 
@@ -197,7 +205,6 @@ module IsoDoc
       end
 
       def annex_name(_annex, name, div)
-        preceding_floating_titles(name, div)
         return if name.nil?
 
         name&.at(ns("./strong"))&.remove # supplied by CSS list numbering

data/lib/isodoc/iso/word_dis_cleanup.rb

@@ -41,6 +41,7 @@ module IsoDoc
 
       def dis_styles1(docxml)
         amd_style(docxml)
+        middle_title_style(docxml)
         code_style(docxml)
         figure_style(docxml)
         formula_style(docxml)
@@ -71,6 +72,14 @@ module IsoDoc
         end
       end
 
+      def middle_title_style(docxml)
+        docxml.xpath("//p[@class = 'zzSTDTitle2']").each do |p|
+          p1 = p.previous_element && p1.name == p &&
+            p1["class"] = "zzSTDTitle2" or next
+          p1 << " #{p.remove.children.to_xml}"
+        end
+      end
+
       def dis_style_interactions(docxml)
         docxml.xpath("//p[@class = 'Code' or @class = 'Code-' or " \
                      "@class = 'Code--']" \

data/lib/isodoc/iso/word_dis_convert.rb

@@ -46,12 +46,6 @@ module IsoDoc
         { class: "TableTitle", style: "text-align:center;" }
       end
 
-      def span_parse(node, out)
-        out.span class: node["class"] do |x|
-          node.children.each { |n| parse(n, x) }
-        end
-      end
-
       def word_toc_preface(level)
         <<~TOC.freeze
           <span lang="EN-GB"><span
@@ -68,7 +62,7 @@ module IsoDoc
 
       def toWord(result, filename, dir, header)
         result = from_xhtml(word_cleanup(to_xhtml(result)))
-          .gsub(/-DOUBLE_HYPHEN_ESCAPE-/, "--")
+          .gsub("-DOUBLE_HYPHEN_ESCAPE-", "--")
         @wordstylesheet = wordstylesheet_update
         ::Html2Doc::IsoDIS.new(
           filename: filename,
@@ -86,30 +80,42 @@ module IsoDoc
         middle_title_dis(out)
       end
 
-      def middle_title_dis(out)
+      def middle_title_dis(node, out)
         out.p(class: "zzSTDTitle") do |p|
-          p << @meta.get[:doctitleintro]
-          @meta.get[:doctitleintro] && @meta.get[:doctitlemain] and p << " &#x2014; "
-          p << @meta.get[:doctitlemain]
-          @meta.get[:doctitlemain] && @meta.get[:doctitlepart] and p << " &#x2014; "
-          if @meta.get[:doctitlepart]
-            b = @meta.get[:doctitlepartlabel] and
-              p << "<span style='font-weight:normal'>#{b}:</span> "
-            p << " #{@meta.get[:doctitlepart]}"
+          node.children.each { |n| parse(n, p) }
+        end
+      end
+
+      def middle_title_amd(node, out)
+        out.p(class: "zzSTDTitle2") do |p|
+          p.span(style: "font-weight:normal") do |s|
+            node.children.each { |n| parse(n, s) }
           end
-          @meta.get[:doctitleamdlabel] || @meta.get[:doctitleamd] ||
-            @meta.get[:doctitlecorrlabel] and middle_title_dis_amd(p)
         end
       end
 
-      def middle_title_dis_amd(para)
-        para.span(style: "font-weight:normal") do |p|
-          if a = @meta.get[:doctitleamdlabel]
-            p << " #{a}"
-            a = @meta.get[:doctitleamd] and p << ": #{a}"
+      def para_parse(node, out)
+        case node["class"]
+        when "zzSTDTitle1" then middle_title_dis(node, out)
+        when "zzSTDTitle2" then middle_title_amd(node, out)
+        else super
+        end
+      end
+
+      def span_parse(node, out)
+        st = node["style"]
+        case node["class"]
+        when "nonboldtitle"
+          out.span **attr_code(style: "#{st};font-weight:normal") do |s|
+            node.children.each { |n| parse(n, s) }
+          end
+        when "boldtitle"
+          out.span **attr_code(style: st) do |s|
+            node.children.each { |n| parse(n, s) }
           end
-          if a = @meta.get[:doctitlecorrlabel]
-            p << " #{a}"
+        else
+          out.span **attr_code(class: node["class"], style: st) do |x|
+            node.children.each { |n| parse(n, x) }
           end
         end
       end