[latex3-commits] [latex3/latex2e] develop: Drop redundant l3doc patches to `\DocInclude` and `\@docinclude` (#1276) (91068601)

[github at latex-project.org]

Repository : https://github.com/latex3/latex2e
On branch  : develop
Link       : https://github.com/latex3/latex2e/commit/9106860103be67e1e048cdf9daf0e6971f792e66

>---------------------------------------------------------------

commit 9106860103be67e1e048cdf9daf0e6971f792e66
Author: Yukai Chou <muzimuzhi at gmail.com>
Date:   Wed Feb 14 15:29:48 2024 +0800

    Drop redundant l3doc patches to `\DocInclude` and `\@docinclude` (#1276)
    
    They are all shipped with l3kernel 2024-02-13. See commits
    
    - latex3/latex3 at 34338536 (\DocInclude never worked (because in 2e the argument
      was space delimited) ..., 2020-08-21)
    - latex3/latex3 at 8d816cf5 (and another missing space ..., 2020-08-21)
    - latex3/latex3 at 2e1ff83c (Check missing `\endgroup` at the end of `\DocInclude`,
      2024-02-12)


>---------------------------------------------------------------

9106860103be67e1e048cdf9daf0e6971f792e66
 base/source2edoc.cls | 80 +---------------------------------------------------
 1 file changed, 1 insertion(+), 79 deletions(-)

diff --git a/base/source2edoc.cls b/base/source2edoc.cls
index 12afa47e..da36a83d 100644
--- a/base/source2edoc.cls
+++ b/base/source2edoc.cls
@@ -2,7 +2,7 @@
 % This class is buggy and needs fixing
 
 \ProvidesClass{source2edoc}
-              [2024/02/12 v0.2d Quick hack to typeset source2.tex
+              [2024/02/14 v0.2d Quick hack to typeset source2.tex
                (not usable for anything else and buggy -- will vanish again)!]
 
 
@@ -50,84 +50,6 @@
   }
 
 
-  
-% some l3doc's def are buggy (already fixed there but not distributed yet)
-
-\RenewDocumentCommand \DocInclude { m }
-  {
-    \relax\clearpage
-    \docincludeaux
-    \IfFileExists{#1.fdd}
-      { \cs_set:Npn \currentfile{#1.fdd} }
-      { \cs_set:Npn \currentfile{#1.dtx} }
-    \int_compare:nNnTF \@auxout = \@partaux
-      { \@latexerr{\string\include\space cannot~be~nested}\@eha }
-      { \@docinclude {#1} }  % <--- braces needed!
-    \int_compare:nNnF { \tex_currentgrouplevel:D } = { 0 }
-      {
-        \int_compare:nNnT { \tex_interactionmode:D } = { 0 }
-          { \int_set:Nn \tex_interactionmode:D { 1 } }
-        \msg_fatal:nnn { source2edoc } { missing-endgroup } {#1}
-      }
-  }
-\msg_new:nnn { source2edoc } { missing-endgroup }
-  {
-    \str_if_eq:VnTF \@currenvir { document }
-      {
-        There~are~\int_use:N \tex_currentgrouplevel:D
-        \c_space_tl unclosed~groups~in~#1.dtx.
-      }
-      {
-        The~\@currenvir \c_space_tl environment~on~line~\@currenvline
-        \c_space_tl doesn't~have~a~matching~\iow_char:N\\end{\@currenvir}.
-      }
-  }
-\cs_gset:Npn \@docinclude #1
-  {
-    \clearpage
-    \immediate\write\@mainaux{\string\@input{#1.aux}}
-    \@tempswatrue
-    \if at partsw
-      \@tempswafalse
-      \cs_set:Npx \@tempb {#1}
-      \clist_map_inline:Nn \@partlist
-        {
-          \if_meaning:w \@tempa \@tempb
-            \@tempswatrue
-          \fi:
-        }
-    \fi
-    \if at tempswa
-      \cs_set_eq:NN \@auxout                 \@partaux
-      \immediate\openout\@partaux #1.aux
-      \immediate\write\@partaux{\relax}
-      \cs_set_eq:NN \@ltxdoc at PrintIndex      \PrintIndex
-      \cs_set_eq:NN \PrintIndex              \relax
-      \cs_set_eq:NN \@ltxdoc at PrintChanges    \PrintChanges
-      \cs_set_eq:NN \PrintChanges            \relax
-      \cs_set_eq:NN \@ltxdoc at theglossary     \theglossary
-      \cs_set_eq:NN \@ltxdoc at endtheglossary  \endtheglossary
-      \part{\currentfile}
-      {
-        \cs_set_eq:NN \ttfamily\relax
-        \cs_gset:Npx \filekey
-          { \filekey,~ \thepart = { \ttfamily \currentfile } } % <-- mising spaces considered harmful
-      }
-      \DocInput{\currentfile}
-      \cs_set_eq:NN \PrintIndex              \@ltxdoc at PrintIndex
-      \cs_set_eq:NN \PrintChanges            \@ltxdoc at PrintChanges
-      \cs_set_eq:NN \theglossary             \@ltxdoc at theglossary
-      \cs_set_eq:NN \endtheglossary          \@ltxdoc at endtheglossary
-      \clearpage
-      \@writeckpt{#1}
-      \immediate \closeout \@partaux
-    \else
-      \@nameuse{cp@#1}
-    \fi
-    \cs_set_eq:NN \@auxout \@mainaux
-  }
-
-
 % change the setup here: we have a lot of long names so better run raggeded
   
 \cs_set_protected:Npn \__codedoc_macro_end_style:n #1