summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/tex4ht/titlesec.4ht
blob: 4d23d936f7065813bb43ad58d3322b6a45ea1b66 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
% titlesec.4ht (2021-03-02-13:43), generated from tex4ht-4ht.tex
% Copyright 2000-2009 Eitan M. Gurari
% Copyright 2009-2021 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 2021-03-02-13:43}

\ifx \ttl@assign@ii\:Undef
   \ifx \ttl@sect\:UnDef\else
     \pend:defII\ttl@sect{%
  \@ifstar {}{\SkipRefstepAnchor}}
\let\ttl:select=\ttl@select
\def\ttl@select#1#2#3#4#5{%
  \edef\sc:tp{\ifttl@label\else like\fi #1}\def\c:secnumdepth{#5}%
  \ttl:select{#1}{#2}{#3}{#4}{#5}}
\let\ttl@write\:gobbleIII

   \fi
   \ifx \ttl@useclass\:UnDef\else
     \pend:defII\ttl@useclass{%
  \@ifstar {}{\SkipRefstepAnchor}}
\let\ttl:select\ttl@select
\def\ttl@select#1{%
  \edef\sc:tp{\ifttl@label\else like\fi
             #1}\def\c:secnumdepth{\@nameuse{ttll@#1}}%
  \ttl:select{#1}}
\let\ttl@write\:gobbleII
\let\ttl@glcmds\relax
\let\ttl@beginlongest\@empty
\let\ttl@midlongest\@empty
\let\ttl@endlongest\@empty

   \fi
   \let\ttlh:hang\ttlh@hang
\def\ttlh@hang#1#2#3#4#5#6#7#8{%
   \HtmlEnv
   \expandafter\def\csname thetitle\sc:tp\endcsname{#2}%
   \csname no:\sc:tp\endcsname{#8}%
   \par \ttlh:hang{}{}{#3}{}{}{#6}{#7}{}}
\let\:seccntformat=\@seccntformat
\def\@seccntformat#1{\ifnum 0=0\the\csname c@#1\endcsname\else
   \:seccntformat{#1}\fi}

\else
   \let\ttl:straight@i\ttl@straight@i
\def\ttl@straight@i#1[#2]#3{%
  \gdef\NR:Title{\a:newlabel{#3}}%
%
  \ifttl@label \else
     \def\:temp{#1}\edef\:tempa{\expandafter
    \expandafter\expandafter\:gobble
    \expandafter\string\csname section\endcsname}\ifx \:temp\:tempa \else
       \edef\:tempa{\expandafter\expandafter\expandafter\:gobble
  \expandafter\string\csname subsection\endcsname}\ifx \:temp\:tempa \else
     {\ttl@labeltrue \ttl@addcontentsline{like#1}{#3}}%
\fi
%
\fi
%
  \fi
  \edef\sc:tp{\ifttl@label\else like\fi #1}%
  \ttl:straight@i{#1}[{#2}]{#3}%
}
\def\ttlh@hang#1#2#3#4#5#6#7#8{%
   \def\c:secnumdepth{\@nameuse{ttll@\sc:tp}}%
   \:StartSec {\sc:tp}{%
         \ifttl@label \ifnum \c:secnumdepth >\c@secnumdepth
         \else \csname the\sc:tp\endcsname \fi \fi
       }{#8}%
}
\def\:tempc#1#2#3#4{%
  \begingroup
  \let\everypar\@gobble% don't let titlesec to break our paragraph handling
  \edef\sc:tp{\ifttl@label\else like\fi #1}%
   \let\ttl@savewrite\empty
   \o:ttl@select:{#1}{#2}{#3}{#4}
   \endgroup
}

\HLet\ttl@select\:tempc
\let\ttlh@runin\ttlh@hang
\let\ttlh@display\ttlh@hang
\def\ttl@addcontentsline#1#2{\nobreak}

\fi
\Hinput{titlesec}
\endinput