cprotect support, tex4ht r1395

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

4 files changed, 64 insertions, 2 deletions

diff --git a/Master/texmf-dist/source/generic/tex4ht/ChangeLog b/Master/texmf-dist/source/generic/tex4ht/ChangeLog
index c19010df419..310051b5894 100644
--- a/Master/texmf-dist/source/generic/tex4ht/ChangeLog
+++ b/Master/texmf-dist/source/generic/tex4ht/ChangeLog
@@ -1,3 +1,9 @@
+2023-10-18  Michal Hoftich  <michal.h21@gmail.com>
+
+	* tex4ht-4ht.tex (cprotect.4ht): remove spurious characters from the
+	\cprotect command.
+	https://puszcza.gnu.org.ua/bugs/?246
+
 2023-10-16  Michal Hoftich  <michal.h21@gmail.com>
 
 	* tex4ht-4ht.tex (hyperref.4ht): declare the \Hy@PageAnchorSlide
diff --git a/Master/texmf-dist/source/generic/tex4ht/mktex4ht-cnf.tex b/Master/texmf-dist/source/generic/tex4ht/mktex4ht-cnf.tex
index 67c9ab6e135..77190a86fe6 100644
--- a/Master/texmf-dist/source/generic/tex4ht/mktex4ht-cnf.tex
+++ b/Master/texmf-dist/source/generic/tex4ht/mktex4ht-cnf.tex
@@ -1,4 +1,4 @@
-% $Id: mktex4ht-cnf.tex 1392 2023-10-16 09:25:25Z michal_h21 $
+% $Id: mktex4ht-cnf.tex 1395 2023-10-18 20:38:31Z michal_h21 $
 % Manually-maintained file, listing *.4ht files created by tex4ht-4ht.tex.
 % Read by tex4ht-cond4ht.
 %
@@ -297,6 +297,7 @@
 \AddFile{7}{awesomebox}
 \AddFile{7}{transparent}
 \AddFile{7}{changepage}
+\AddFile{7}{cprotect}
 \AddFile{7}{alltt}
 \AddFile{9}{lb}
 \AddFile{7}{latin1}
diff --git a/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex b/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex
index 53ca499d287..d9c2de66c3b 100644
--- a/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex
+++ b/Master/texmf-dist/source/generic/tex4ht/tex4ht-4ht.tex
@@ -1,4 +1,4 @@
-% $Id: tex4ht-4ht.tex 1394 2023-10-16 13:06:26Z michal_h21 $
+% $Id: tex4ht-4ht.tex 1395 2023-10-18 20:38:31Z michal_h21 $
 % tex tex4ht-4ht   or   ht tex tex4ht-4ht
 %
 % Copyright 2009-2023 TeX Users Group    
@@ -33170,6 +33170,32 @@ format configuration.
 >>>
 
 %%%%%%%%%%%%%%%%%%%%%%%
+\Section{cprotect.sty}
+%%%%%%%%%%%%%%%%%%%%%%%
+\<cprotect.4ht\><<<
+% cprotect.4ht (|version), generated from |jobname.tex
+% Copyright 2023 TeX Users Group
+|<TeX4ht license text|>
+|<cprotect shared config|>
+\Hinput{cprotect}
+\endinput
+
+>>> \AddFile{7}{cprotect}
+
+Cprotect package can protect commands and environments. It adds some
+special characters at the end of the protected content. Because
+of chatcode issues caused by redefinition of the hat character by TeX4ht,
+these characters were displayed verbatim in the document. This definition
+should fix the catcode issue and prevent this problem
+
+\<cprotect shared config\><<<
+{
+\catcode`\^=7
+\gdef\CPT@hat@hat@E@hat@hat@L{^^E^^L}
+}
+>>>
+
+%%%%%%%%%%%%%%%%%%%%%%%
 \Section{alltt.sty}
 %%%%%%%%%%%%%%%%%%%%%%%
 
diff --git a/Master/texmf-dist/tex/generic/tex4ht/cprotect.4ht b/Master/texmf-dist/tex/generic/tex4ht/cprotect.4ht
new file mode 100644
index 00000000000..e62694ce6cb
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/tex4ht/cprotect.4ht
@@ -0,0 +1,29 @@
+% cprotect.4ht (2023-10-18-14:10), generated from tex4ht-4ht.tex
+% Copyright 2023 TeX Users Group
+%
+% This work may be distributed and/or modified under the
+% conditions of the LaTeX Project Public License, either
+% version 1.3c of this license or (at your option) any
+% later version. The latest version of this license is in
+%   http://www.latex-project.org/lppl.txt
+% and version 1.3c or later is part of all distributions
+% of LaTeX version 2005/12/01 or later.
+%
+% This work has the LPPL maintenance status "maintained".
+%
+% The Current Maintainer of this work
+% is the TeX4ht Project <http://tug.org/tex4ht>.
+%
+% If you modify this program, changing the
+% version identification would be appreciated.
+\immediate\write-1{version 2023-10-18-14:10}
+
+{
+\catcode`\^=7
+\gdef\CPT@hat@hat@E@hat@hat@L{^^E^^L}
+}
+
+\Hinput{cprotect}
+\endinput
+
+