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

[Michal Hoftich]

Author: michal_h21
Date: 2022-04-14 14:12:45 +0000 (Thu, 14 Apr 2022)
New Revision: 1111

Modified:
   trunk/lit/ChangeLog
   trunk/lit/tex4ht-4ht.tex
Log:
Moved supporting commands from hyperref.sty

Modified: trunk/lit/ChangeLog
===================================================================
--- trunk/lit/ChangeLog	2022-04-13 14:59:07 UTC (rev 1110)
+++ trunk/lit/ChangeLog	2022-04-14 14:12:45 UTC (rev 1111)
@@ -1,8 +1,16 @@
+2022-04-14  Michal Hoftich  <michal.h21 at gmail.com>
+
+	* tex4ht-4ht.tex (hyperref.4ht): added supporting code for TeX4ht
+	from hyperref.sty.
+	https://puszcza.gnu.org.ua/bugs/?559
+
 2022-04-13  Michal Hoftich  <michal.h21 at gmail.com>
 
 	* tex4ht-4ht.tex (latex.4ht): added support for the \Ref command.
+	https://puszcza.gnu.org.ua/bugs/?559
 	* tex4ht-4ht.tex (latex.4ht,nameref.4ht): added support for the
 	\ref* command.
+	https://puszcza.gnu.org.ua/bugs/?559
 
 2022-04-05  Michal Hoftich  <michal.h21 at gmail.com>
 

Modified: trunk/lit/tex4ht-4ht.tex
===================================================================
--- trunk/lit/tex4ht-4ht.tex	2022-04-13 14:59:07 UTC (rev 1110)
+++ trunk/lit/tex4ht-4ht.tex	2022-04-14 14:12:45 UTC (rev 1111)
@@ -5506,6 +5506,35 @@
 \catcode`\:=11
 >>>
 
+The following code was originally placed directly in hyperref.sty.
+We moved it here, so Hyperref don't need to contain specific
+TeX4ht code.
+
+\<config hyperref\><<<
+\def\T at pageref#1{%
+  \Hy at safe@activestrue%
+  \expandafter\@setref\csname r@#1\endcsname\@secondoffive{#1}%
+  \Hy at safe@activesfalse%
+}%
+\def\T at Ref#1{%
+  \Hy at safe@activestrue%
+  \let\olda:rEfLiNK\rEfLiNK%%
+  \def\rEfLiNK##1##2{\Link{##1}{}\edef\:ref:currentlabel{##2}\expandafter\MakeUppercase\:ref:currentlabel\EndLink}%
+  \expandafter\@setref\csname r@#1\endcsname\@firstoffive{#1}%
+  \let\rEfLiNK\olda:rEfLiNK%
+  \Hy at safe@activesfalse%
+}%
+\def\@Refstar#1{%
+  \Hy at safe@activestrue
+  \let\olda:rEfLiNK\rEfLiNK%%
+  \def\rEfLiNK##1##2{\Link{##1}{}\edef\:ref:currentlabel{##2}\expandafter\MakeUppercase\:ref:currentlabel\EndLink}%
+  \expandafter\@setref\csname r@#1\endcsname\@firstoffive{#1}%
+  \let\rEfLiNK\olda:rEfLiNK%
+  \Hy at safe@activesfalse
+}%
+
+>>>
+
 %%%%%%%%%%%%%%%%%%%%%%%%%
 \SubSection{Forms}
 %%%%%%%%%%%%%%%%%%%%%%