From d8d36c9856a33d41334e7235ee6e873102f76bfc Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Glorieux?=
 <frederic.glorieux@fictif.org>
Date: Wed, 10 Apr 2024 16:51:10 +0200
Subject: [PATCH] send

---
 docx/docx_teilike.xsl | 8 ++++++++
 docx/styles.xml       | 3 +++
 docx/teilike_pcre.tsv | 2 +-
 3 files changed, 12 insertions(+), 1 deletion(-)

diff --git a/docx/docx_teilike.xsl b/docx/docx_teilike.xsl
index 956db4a..9718607 100644
--- a/docx/docx_teilike.xsl
+++ b/docx/docx_teilike.xsl
@@ -585,15 +585,23 @@ Seen
     </xsl:variable>
     <xsl:variable name="xml10">
       <xsl:choose>
+        <!-- allow unknown styles
         <xsl:when test="$style_name = '' or string($teinte_c/@element) = ''">
           <xsl:copy-of select="$xml5"/>
         </xsl:when>
+        -->
         <!-- redundant -->
         <xsl:when test="ancestor::w:hyperlink">
           <xsl:copy-of select="$xml5"/>
         </xsl:when>
         <xsl:when test="$teinte_c/@element != ''">
           <xsl:element name="{$teinte_c/@element}">
+            <!-- bad for reconnect -->
+            <xsl:if test="$teinte_c/@attribute">
+              <xsl:attribute name="{$teinte_c/@attribute}">
+                <xsl:value-of select="$teinte_c/@value"/>
+              </xsl:attribute>
+            </xsl:if>
             <xsl:copy-of select="$xml5"/>
           </xsl:element>
         </xsl:when>
diff --git a/docx/styles.xml b/docx/styles.xml
index 32ac894..7770421 100644
--- a/docx/styles.xml
+++ b/docx/styles.xml
@@ -246,6 +246,7 @@ LGPL  http://www.gnu.org/licenses/lgpl.html
   <style level="c" name="accentuationforte" element="b"/>
   <style level="c" name="actor" element="actor" doc="true"/>
   <style level="c" name="author" element="author" doc="true"/>
+  <style level="c" name="autregrc" element="foreign" attribute="xml:lang" value="grc"/>
   <style level="c" name="affiliation" element="affiliation" doc="true"/>
   <style level="c" name="age" element="age" doc="true"/>
   <style level="c" name="appelnotedebasdep"/><!-- Delete -->
@@ -296,6 +297,8 @@ LGPL  http://www.gnu.org/licenses/lgpl.html
   <style level="c" name="milestone" element="milestone" doc="true"/>
   <style level="c" name="name" element="name" doc="true"/>
   <style level="c" name="num" element="num" doc="true"/>
+  <style level="c" name="orth" element="orth" doc="true"/>
+  <style level="c" name="orthital" element="orth" attribute="rend" value="i"/>
   <style level="c" name="pagenumber" element="num"/>
   <style level="c" name="pagination" element="pb"/>
   <style level="c" name="pagenum" element="pb"/>
diff --git a/docx/teilike_pcre.tsv b/docx/teilike_pcre.tsv
index 273b909..70c995e 100644
--- a/docx/teilike_pcre.tsv
+++ b/docx/teilike_pcre.tsv
@@ -1,7 +1,7 @@
 search	replace	?comment
 # Variables		
 
-($inline)	(author|b|bg_\w+|emph|foreign|em|hi|i|id|phr|ref|sc|seg|strong|sup|tech|th|title|u)	
+($inline)	(author|b|bg_\w+|emph|foreign|em|hi|i|id|orth|phr|ref|sc|seg|strong|sup|tech|th|title|u)	
 ($atts)	( [^>]*)?	
 ($pun)	([,;:\.!?—–  \s]+)	keep () or [] in inlines
 ($block)	(head|note|p)