paragraph commands, tex4ht r851

git-svn-id: svn://tug.org/texlive/trunk@57035 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 186 insertions, 218 deletions

diff --git a/Master/texmf-dist/tex/generic/tex4ht/ooffice.4ht b/Master/texmf-dist/tex/generic/tex4ht/ooffice.4ht
index 054332d05f6..50d8f2bace2 100644
--- a/Master/texmf-dist/tex/generic/tex4ht/ooffice.4ht
+++ b/Master/texmf-dist/tex/generic/tex4ht/ooffice.4ht
@@ -1,4 +1,4 @@
-% ooffice.4ht (2020-11-27-13:32), generated from tex4ht-ooffice.tex
+% ooffice.4ht (2020-11-29-14:07), generated from tex4ht-ooffice.tex
 % Copyright 2009-2019 TeX Users Group
 % Copyright 2001-2009 Maarten Wisse, James Naughton, Eitan M. Gurari
 %
@@ -17,7 +17,7 @@
 %
 % If you modify this program, changing the
 % version identification would be appreciated.
-\immediate\write-1{version 2020-11-27-13:32}
+\immediate\write-1{version 2020-11-29-14:07}
 
   \exit:ifnot{Preamble,% 
 algorithmicx,% 
@@ -186,6 +186,43 @@ xmlns:xlink="http://www.w3.org/1999/xlink"\Hnewline
     \Log:Note{For tracing of oo configurations,
        use the `info-oo' option}%
 \fi
+\def\:ParagraphStyle#1{%
+\NewConfigureOO{#1}%
+\ConfigureOO{#1}{%
+<style:style style:name="#1"
+                  style:family="paragraph"
+                  style:parent-style-name="Text-body"
+                  style:class="text">\Hnewline
+<style:paragraph-properties  fo:margin-top="0.5cm" />
+</style:style>
+}
+}
+\def\:DefineParagraph#1#2{%
+\Configure{#1}
+   {\IgnorePar\EndP \HCode{<!--start of #1 -->}}
+   {\IgnorePar\EndP \HCode{<!--start of #1 -->}}
+   {\bgroup\HTML:PAR{#1-p}{#1-p}\par\HCode{<text:span text:style-name="#2" >}}
+   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\egroup}
+\:ParagraphStyle{#1-p}
+}
+\def\:BoldStyle#1{%
+\NewConfigureOO{#1}
+\ConfigureOO{#1}{
+   <style:style style:name="#1" style:family="text">\Hnewline
+      <style:text-properties fo:font-style="normal"
+                        fo:font-weight="bold"/>\Hnewline
+   </style:style>\Hnewline
+}}
+
+\def\:ItalicStyle#1{%
+\NewConfigureOO{#1}
+\ConfigureOO{#1}{
+   <style:style style:name="#1" style:family="text">\Hnewline
+      <style:text-properties fo:font-style="italic"
+                        fo:font-weight="normal"/>\Hnewline
+   </style:style>\Hnewline
+}}
+
 \let\media:type\relax
 \let\:OOmanifest=\empty
 \def\OOmanifest#1{\edef\:OOmanifest{\:OOmanifest #1}}
@@ -3530,30 +3567,22 @@ style:display-name="Footnote anchor" style:family="text">
 \endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsection*-->}}
+   {\HCode{<text:h
+           text:style-name="\csname a:Heading-4\if@rl-rtl\fi
+\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -4925,30 +4954,22 @@ style:display-name="Footnote anchor" style:family="text">
 \endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsection*-->}}
+   {\HCode{<text:h
+           text:style-name="\csname a:Heading-4\if@rl-rtl\fi
+\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -6276,30 +6297,22 @@ style:display-name="Footnote anchor" style:family="text">
 \endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsection*-->}}
+   {\HCode{<text:h
+           text:style-name="\csname a:Heading-4\if@rl-rtl\fi
+\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -9264,30 +9277,22 @@ Y{0178}\i{00EF}%
 \endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsection*-->}}
+   {\HCode{<text:h
+           text:style-name="\csname a:Heading-4\if@rl-rtl\fi
+\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -10644,30 +10649,22 @@ Y{0178}\i{00EF}%
 \endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsection*-->}}
+   {\HCode{<text:h
+           text:style-name="\csname a:Heading-4\if@rl-rtl\fi
+\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -12025,30 +12022,22 @@ Y{0178}\i{00EF}%
 \endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsection*-->}}
+   {\HCode{<text:h
+           text:style-name="\csname a:Heading-4\if@rl-rtl\fi
+\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -13908,6 +13897,12 @@ Y{0178}\i{00EF}%
    {\HCode{<text:h text:style-name="\csname a:Heading-3\endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsubsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsubsection*-->}}
+   {\HCode{<text:h text:style-name="\csname a:Heading-4\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
 \ConfigureMark{subsubsection}
    {\ifnum \c:secnumdepth>\c@secnumdepth  \expandafter\:gobble
     \else \@seccntformat{subsubsection}\fi }
@@ -13922,30 +13917,17 @@ Y{0178}\i{00EF}%
     \HCode{</text:span>}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
 
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+
+% use the new mechanism for paragraph handling
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
+
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -15211,6 +15193,12 @@ Y{0178}\i{00EF}%
    {\HCode{<text:h text:style-name="\csname a:Heading-3\endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsubsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsubsection*-->}}
+   {\HCode{<text:h text:style-name="\csname a:Heading-4\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
 \ConfigureMark{subsubsection}
    {\ifnum \c:secnumdepth>\c@secnumdepth  \expandafter\:gobble
     \else \@seccntformat{subsubsection}\fi }
@@ -15225,30 +15213,17 @@ Y{0178}\i{00EF}%
     \HCode{</text:span>}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
 
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+
+% use the new mechanism for paragraph handling
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
+
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}
@@ -16579,6 +16554,12 @@ Y{0178}\i{00EF}%
    {\HCode{<text:h text:style-name="\csname a:Heading-3\endcsname"
                    \text:outlinelevel="3"  >}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
+\Configure{likesubsubsection}
+   {\IgnorePar\EndP \HCode{<!--start of subsubsection*-->}}
+   {\IgnorePar\EndP \HCode{<!--end of subsubsection*-->}}
+   {\HCode{<text:h text:style-name="\csname a:Heading-4\endcsname"
+                   \text:outlinelevel="4"  >}\IgnoreIndent}
+   {\HCode{</text:h>\Hnewline}\par\ShowPar}
 \ConfigureMark{subsubsection}
    {\ifnum \c:secnumdepth>\c@secnumdepth  \expandafter\:gobble
     \else \@seccntformat{subsubsection}\fi }
@@ -16593,30 +16574,17 @@ Y{0178}\i{00EF}%
     \HCode{</text:span>}\IgnoreIndent}
    {\HCode{</text:h>\Hnewline}\par\ShowPar}
 
-\Configure{paragraph}
-   {\par\ShowPar \noindent\HCode{<!--start of paragraph-->}}
-   {\HCode{<!--end of paragraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="paragraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\Configure{subparagraph}
-   {\par\ShowPar \noindent\HCode{<!--start of subparagraph-->}}
-   {\HCode{<!--end of subparagraph-->}\par\ShowPar}
-   {\HCode{<text:span text:style-name="subparagraph-h" >}}
-   {\HCode{</text:span><text:s/><text:s/>\Hnewline}\IgnorePar}
-\NewConfigureOO{paragraph-h}
-\ConfigureOO{paragraph-h}{
-   <style:style style:name="paragraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
-\NewConfigureOO{subparagraph-h}
-\ConfigureOO{subparagraph-h}{
-   <style:style style:name="subparagraph-h" style:family="text">\Hnewline
-      <style:text-properties fo:font-style="normal"
-                        fo:font-weight="bold"/>\Hnewline
-   </style:style>\Hnewline
-}
+
+% use the new mechanism for paragraph handling
+\:DefineParagraph{paragraph}{paragraph-h}
+\:DefineParagraph{likeparagraph}{paragraph-h}
+\:DefineParagraph{subparagraph}{subparagraph-h}
+\:DefineParagraph{likesubparagraph}{subparagraph-h}
+
+
+\:BoldStyle{paragraph-h}
+\:BoldStyle{subparagraph-h}
+
 
 \NewConfigure{Heading-1}{1}
 \Configure{Heading-1}{Heading-1}