[tex4ht-commits] [SCM] tex4ht updated: r806 - trunk/lit

[michal_h21 at gnu.org.ua]

Author: michal_h21
Date: 2020-10-06 00:47:13 +0300 (Tue, 06 Oct 2020)
New Revision: 806

Modified:
   trunk/lit/ChangeLog
   trunk/lit/tex4ht-4ht.tex
Log:
fix for polyglossia fatal error

Modified: trunk/lit/ChangeLog
===================================================================
--- trunk/lit/ChangeLog	2020-10-05 21:02:56 UTC (rev 805)
+++ trunk/lit/ChangeLog	2020-10-05 21:47:13 UTC (rev 806)
@@ -1,6 +1,7 @@
 2020-10-05  Michal Hoftich  <michal.h21 at gmail.com>
 
 	* tex4ht-4ht.tex (biblatex.4ht): fix for ithenelse patching error.
+	* tex4ht-4ht.tex (usepackage.4ht): fix for Polyglossia fatal error.
 
 2020-10-03  Michal Hoftich  <michal.h21 at gmail.com>
 

Modified: trunk/lit/tex4ht-4ht.tex
===================================================================
--- trunk/lit/tex4ht-4ht.tex	2020-10-05 21:02:56 UTC (rev 805)
+++ trunk/lit/tex4ht-4ht.tex	2020-10-05 21:47:13 UTC (rev 806)
@@ -3801,20 +3801,15 @@
 \def\:temp{polyglossia}\ifx \@currname\:temp
 \ExplSyntaxOn
 \:AtEndOfPackage{
-
-\cs_set_eq:NN\orig_polyglossia at keys_define_lang:n\polyglossia at keys_define_lang:n
-\cs_set_protected:Npn \polyglossia at keys_define_lang:n #1 {
-  \orig_polyglossia at keys_define_lang:n{#1}
-  \keys_define:nn {polyglossia}{
-    #1 / direction
-    .  code:n = {},
-    #1 / script
-    .  code:n = {\ifdefined\XeTeXversion
-      \edef\:tempscript{\str_uppercase:f{\tl_head:n {#1}}\tl_tail:n{#1}}
-      \xeuniuseblock{#1}
-      \expandafter\xeuniuseblock\expandafter{\:tempscript}
-    \fi},
-  }
+\keys_define:nn {polyglossia}{
+  #1 / direction
+  .  code:n = {},
+  #1 / script
+  .  code:n = {\ifdefined\XeTeXversion
+    \edef\:tempscript{\str_uppercase:f{\tl_head:n {#1}}\tl_tail:n{#1}}
+    \xeuniuseblock{#1}
+    \expandafter\xeuniuseblock\expandafter{\:tempscript}
+  \fi},
 }
 \def\RequireBidi{}%
 }