1530 lines
45 KiB
TeX
1530 lines
45 KiB
TeX
% +--------------------------------------------------+
|
|
% | Typeset titlesec.tex to get the documentation. |
|
|
% +--------------------------------------------------+
|
|
%
|
|
% Copyright (c) 1998-2007 by Javier Bezos.
|
|
% All Rights Reserved.
|
|
%
|
|
% This file is part of the titlesec distribution release 2.8
|
|
% -----------------------------------------------------------
|
|
%
|
|
% It may be distributed and/or modified under the
|
|
% conditions of the LaTeX Project Public License, either version 1.3
|
|
% 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.3 or later is part of all distributions of LaTeX
|
|
% version 2003/12/01 or later.
|
|
%
|
|
% This work has the LPPL maintenance status "maintained".
|
|
%
|
|
% The Current Maintainer of this work is Javier Bezos.
|
|
|
|
% History of v1.0
|
|
% ~~~~~~~~~~~~~~~
|
|
% 1998/02/25: Added nops option
|
|
% 1998/02/28: Added \@mkboth stuff in \setmarks
|
|
% 1998/03/01: Changed test in \ttl@secnum
|
|
% 1998/03/03: Corrected some \fil... commands
|
|
% 1998/03/03: Replaced the faulty \@hangfrom by new commands
|
|
% 1998/03/03: Some \def replaced by \newcommand
|
|
% 1998/03/04: .dtx/.ins scheme finally rejected. Useless
|
|
% for users, obtrusive for `readers' and proned
|
|
% to errors
|
|
% 1998/03/04: Tidied up documentation
|
|
% 1998/03/06: \wordsep renamed and documented
|
|
% 1998/03/06: Added dummy asignation in \ttl@chap.
|
|
% 1998/03/06: Removed \ttl@xsect and merged into \tl@sect
|
|
% 1998/03/06: Added \ProvidesPackage
|
|
|
|
% History of v1.1
|
|
% ~~~~~~~~~~~~~~~~
|
|
% 1998/03/25: \chapter corrected, as well as the size options
|
|
% 1998/03/26: Added compact option
|
|
% 1998/03/26: Added flushleft, flushright and center options
|
|
% 1998/04/08: Changed all instances of \noindent by \parindent\z@
|
|
% 1998/04/14: Added \filinner, \filouter
|
|
% 1998/04/14: Added drop shape
|
|
% 1998/05/01: Added rightmargin shape (and margin renamed to
|
|
% leftmargin)
|
|
% 1998/05/03: Added \setheadindent
|
|
%
|
|
% History of v1.2 (unreleased)
|
|
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
%
|
|
% 1998/06/01: Compatibility with AMS classes
|
|
% 1998/06/08: On-demand loading of shapes
|
|
% 1998/06/11: Frame shape. Some \fil... command
|
|
% modified to work in the label of this
|
|
% chapter shape.
|
|
% 1998/07/03: Bottomtitle option (at last...)
|
|
% 1998/07/14: ...margin styles bug fixed using a method
|
|
% similar to bottomtitle.
|
|
% 1998/07/29: \titleline
|
|
|
|
%
|
|
% History of v2.0
|
|
% ~~~~~~~~~~~~~~~~
|
|
%
|
|
% 1998/08/05 to
|
|
% 1998/08/29: Fully reimplemented
|
|
%
|
|
% History of v2.1
|
|
% ~~~~~~~~~~~~~~~~
|
|
% 1999/01/05: We define in this file the three basic shapes.
|
|
% Additional ones remain defined in external files.
|
|
% Unified the shapes for sections and chapters.
|
|
% 1999/01/05: \ttl@shape merged into \ttl@format@iii.
|
|
% 1999/01/05: \titlerule
|
|
% 1999/01/07: \ttl@defkeys splitted from \ttl@keys
|
|
% 1999/01/10: Added the \part stuff, including a definition of \@openright
|
|
% 1999/01/11: Removed unnecessary \ttl@numsecfalse in \ttl@sect@i.
|
|
% 1999/01/14: Optimized \titlerule
|
|
% 1999/01/27: Changed \titleline to correct the spacing at the
|
|
% top page and to fix a bug which changed the mode
|
|
% to horizontal, thus introducing unwanted space
|
|
% (\makebox -> \@makebox).
|
|
% 1999/02/02: \ttl@secnum renamed to \ttl@write and introduced the
|
|
% \ttl@savewrite mechanism to sincronize the toc/marks
|
|
% with the title in case there is a \newpage in <after>.
|
|
% 1999/02/03: wrap shape
|
|
% 1999/02/03: Added a \kern\z@ for not to avoid hyphenation
|
|
% of the last word. Not strictly necessary, but
|
|
% it is more LaTeX-like.
|
|
% 1999/02/05: \partmark defined (and in \setmarks, too).
|
|
% 1999/02/08: \ttl@row@i simplified.
|
|
% 1999/02/08: \ttl@savefn mechanism.
|
|
% 1999/02/10: Removed extra \leavevmode in display
|
|
% 1999/02/13: Now \titleline doesn't add the width. It's set.
|
|
% 1999/02/17: The part mark is catched, even if unused.
|
|
% 1999/02/17: old/newparttoc added.
|
|
% 1999/02/18: Changed many TeX assignments to the LaTeX
|
|
% counterpart.
|
|
% 1999/02/19: Introduced \ttl@startargs.
|
|
%
|
|
% History of v2.1.1
|
|
% ~~~~~~~~~~~~~~~~~
|
|
% 1999/08/04: Moved misplaced lines in \ttl@makeboth
|
|
%
|
|
% History of v2.2 (unreleased)
|
|
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
% 1999/11/03: We load titleps if pagestyles are required, but
|
|
% some old definitions are restored.
|
|
% 1999/11/06: Improved outermarks test in \ttl@sect@i. Formerly
|
|
% the section number could be printed if a page ended
|
|
% with an unnumebered section followed by a numbered one.
|
|
% 1999/11/06: \ttl@startargs now adds (and passes) automatically the
|
|
% section name. Involved macros modified accordingly.
|
|
% 1999/11/06: Replaced explicit part names by the parameter in
|
|
% \ttl@part@i. The same for chapter.
|
|
% 1999/11/21: \ttl@try's are not given explicitly, but built by
|
|
% \ttl@setkeys. Intruduced the \ttl@key@... and
|
|
% \ttl@extra@... commands.
|
|
% 1999/11/23: Minor problems with keys fixed.
|
|
% 1999/12/10: Added the nobottomtitles* option and \ttl@addstretch.
|
|
% 2000/01/07: First steps towards the calcwidth feature (basic code).
|
|
% 2000/01/08: (Continued.) \titleline* for rules of width \titlewidth.
|
|
% Option calcwidth implemented.
|
|
% 2000/01/12: Finished with changes in wrap.tss (no longer
|
|
% "experimental" :-) )
|
|
%
|
|
% History of v2.3
|
|
% ~~~~~~~~~~~~~~~
|
|
% 2000/01/19: All keys are grouped in a single file tttkeys. Removed
|
|
% page.tsk and deleted the corresponding code in the sty.
|
|
% 2000/01/19: Classes begun.
|
|
% 2000/01/19: The level numbers are stored in \ttll@ macros, and not
|
|
% passed as arguments.
|
|
% 2000/01/21: Introduced the new mark scheme. It's mostly compatible
|
|
% with the old one, but a compatibility mode seems
|
|
% imposible (it was introduced in a preliminary test
|
|
% but eventually removed).
|
|
% 2000/01/23: loadonly package option.
|
|
% 2000/02/01: Classes finished. Many things had to be rewritten.
|
|
% 2000/02/02: Made partially compatible with hyperref (dvips).
|
|
% 2000/02/08: \ttl@savewrite moved from shapes to classes. But
|
|
% explicit page breaks expand it, too, to avoid wrong
|
|
% toc entries.
|
|
% 2000/02/18: A new box named \ttl@box stores the title in runin
|
|
% leftmargin etc shapes, to increase reliability.
|
|
%
|
|
% (2.3.1 -- 2.3.3: No changes on this file)
|
|
%
|
|
% History of v2.3.4
|
|
% ~~~~~~~~~~~~~~~~~
|
|
% 2000/05/12: nonindentfirst redefine \titlespacing instead of
|
|
% \@afterindent... so that they don't interfere with
|
|
% the first entry in tocs.
|
|
% 2000/05/17: The marks in \ttl@select are protected to prevent
|
|
% endless loop if the title is expanded, say, by
|
|
% \MakeUppercase.
|
|
%
|
|
% History of v2.3.5
|
|
% ~~~~~~~~~~~~~~~~~
|
|
% 2000/05/21: Restores missing test for secnumdepth in \ttl@mkchap,
|
|
% and instead of setting \ttl@toclevel in ttlps now is
|
|
% done in \secdef. Except inside the macros, \ttl@toclevel
|
|
% is false, so that an explicit \...mark works.
|
|
% 2000/06/04: \partmark defined with \providecommand
|
|
% 2000/06/14: A patch mechanism added, for small bug fixes.
|
|
%
|
|
% History of v2.4
|
|
% ~~~~~~~~~~~~~~~~
|
|
% 2001/01/18: Minor changes in code. Essentialy an incremental
|
|
% update.
|
|
% 2001/01/22: \titleformat has a new "easy" starred variant.
|
|
%
|
|
% History of v2.5
|
|
% ~~~~~~~~~~~~~~~
|
|
% 2002/01/02 New macros for \ttl@assign. Now * length allow
|
|
% non integer values.
|
|
% 2002/03/22 Added \ttl@calc and \ttl@calcneg to make titlesec
|
|
% calc-savvy.
|
|
% - Merged bug fixes of .new into this file.
|
|
% - Bugs in frame fixed -- gap in lines, misplaced
|
|
% label, wrong margins (sometimes),
|
|
% - \leftskip, \rightskip and \linewidth (re)set in
|
|
% margin shapes.
|
|
% - Removed obsolete flush... options.
|
|
% - indentafter and noindentafter, new names for
|
|
% indentfirst and nonindentfirst.
|
|
% - A new level (\titleclass) without its "location"
|
|
% now raises a meaningful error.
|
|
% - Bug in top-level \titleclass fixed.
|
|
% 2002/03/23 Tests for undefined and unformatted sectioning levels,
|
|
% and horizontal material in <format>.
|
|
% - Missing \if@openright inside \if@twoside in
|
|
% page class added.
|
|
% - Removed extra (but inoffensive) \expandafter
|
|
% in \ttl@class@iii.
|
|
% 2002/03/27 Added \titlewidthfirst and ...last
|
|
% - "Not definable" gives a more meaningful message in
|
|
% the context of the package.
|
|
%
|
|
% History of v.2.6
|
|
% ~~~~~~~~~~~~~~~~
|
|
% 2004/08/30 Corrected typo in margin \hsiz -> \hsize.
|
|
% 2004/10/17 Added a couple of missing \noexpand's in drop.
|
|
% 2004/12/01 Removed the error about the mode in block because this
|
|
% style is general purpose.
|
|
% 2005/01/16 Missing braces around #2 in the last else part of
|
|
% \ttl@headinline added
|
|
% - Replaced explicit \makeatother's by a saved value as
|
|
% the macros can be used in a class/package file.
|
|
% 2005/01/18 newlinetospace mechanism
|
|
% 2005/01/18 // does not break pages; option pageatnewline to
|
|
% restore the LaTeX behaviour.
|
|
% 2005/01/19 \...break in top shape.
|
|
% - Renumbered several scratch registers to follow the
|
|
% TeXbook (p. 346), with \ttl@box in a few cases. In
|
|
% wrap \titlewidthfirst and \titlewidthlast made global.
|
|
% - Float heads and foots have now a further argument for
|
|
% additional stuff (eg, to remove rules). Option is now
|
|
% psfloats while floatps enters in compatibility mode.
|
|
% - \ttl@savetitle in all classes. Option toctitles.
|
|
% 2005/01/21 Changed pageatnewline to make it compatible with
|
|
% titletoc, with \ttl@changecentercr.
|
|
% 2005/01/22 \...tolist in top class.
|
|
%
|
|
% History of v.2.7
|
|
% ~~~~~~~~~~~~~~~~
|
|
% 2007-03-27 Added the `explicit' option.
|
|
% 2007-03-27 Added \titlepagestyle.
|
|
% 2007-03-29 Fixed wrong number for chapter in log
|
|
% 2007-03-29 Patch file named .270 instead of .new
|
|
% 2007-05-09 Added <after> to leftmargin, so that you can add stuff
|
|
% at the beginning of the paragraph, eg, the sec number.
|
|
% 2007-07-07 Removed the patch mechanism.
|
|
% 2007-08-07 `explicit' improved.
|
|
%
|
|
% History of v.2.8
|
|
% ~~~~~~~~~~~~~~~~
|
|
% 2007-08-12 \titlepagestyle already used by KOMA-Script. Renamed
|
|
% to \assignpagestyle.
|
|
%
|
|
% Notes
|
|
% ~~~~~
|
|
%
|
|
% The following tags are used:
|
|
% ttl@ : the generic tag used through the style
|
|
% ttlh@ : a shape definition
|
|
% ttlf@ : a macro containing the title format
|
|
% ttls@ : id. the title space
|
|
% ttlp@ : page key related macros
|
|
% ttll@ : level number
|
|
%
|
|
% The ttlf@ and ttls@ contains data in the form {..}{..}.
|
|
% Perhaps in future releases they should be converted
|
|
% to a prop-like list, similar to that proposed by the
|
|
% latex team.
|
|
%
|
|
% Admittedly, the current implementation seems too
|
|
% complicated, but that's necessary in order to provide
|
|
% certain compatibility with the sections as defined by the
|
|
% used class. Other packages opt for providing the sections
|
|
% as defined by standard classes ignoring the class; for
|
|
% instance sectsty which does a simple task in a simple and
|
|
% nice way. However, that was not my goal.
|
|
%
|
|
% Release
|
|
% ~~~~~~~
|
|
|
|
\NeedsTeXFormat{LaTeX2e}
|
|
\ProvidesPackage{titlesec}[2007/08/12 v2.8 Sectioning titles]
|
|
|
|
% Initialization
|
|
% ~~~~~~~~~~~~~~
|
|
|
|
\newif\ifttl@ps
|
|
\ttl@psfalse
|
|
|
|
% The \ttl@label switch is used when printing the label in titles.
|
|
% A numberless variant makes it to true.
|
|
% There is a \ttl@toclabel as well, which is true iff the
|
|
% title is numbered; used in toc entries (except default part
|
|
% and chapter) and marks (only in titlesec pagestyles).
|
|
|
|
\newif\ifttl@label
|
|
\newif\ifttl@toclabel
|
|
|
|
\newbox\ttl@box
|
|
|
|
% A provision for the report style:
|
|
|
|
\@ifundefined{if@mainmatter}
|
|
{\let\if@mainmatter\iftrue}{}
|
|
|
|
\@ifundefined{if@openright}
|
|
{\let\if@openright\iftrue}{}
|
|
|
|
% and the ams styles as well
|
|
|
|
\@ifundefined{@chapapp}
|
|
{\let\@chapapp\chaptername}{}
|
|
|
|
\def\ttl@trylist{\ttl@try{}}
|
|
|
|
\def\ttl@getkeys#1#2{%
|
|
\if\expandafter @\@gobble#1@\@empty
|
|
\edef\ttl@b{\expandafter\@gobble\string#1}%
|
|
\let\ttl@a\ttl@b
|
|
\else
|
|
\makeatletter
|
|
\edef\ttl@d{%
|
|
\noexpand\input{ttlkeys.def}%
|
|
\catcode`\noexpand\@=\the\catcode`\@}%
|
|
\ttl@d
|
|
\ttl@getkeys{#1}{#2}%
|
|
\fi}
|
|
|
|
% A more meaningful error for \@notdefinable
|
|
|
|
\expandafter\AtEndOfPackage\expandafter{\expandafter
|
|
\gdef\expandafter\@notdefinable\expandafter{\@notdefinable}}
|
|
|
|
\def\@notdefinable{%
|
|
\PackageError{titlesec}%
|
|
{Incompatible package}%
|
|
{Titlesec cannot continue defining its own macros
|
|
because\MessageBreak
|
|
\@backslashchar\reserved@a\space is already used by other package,
|
|
the class\MessageBreak
|
|
or the document.}}
|
|
|
|
% +-----------------+
|
|
% | C L A S S E S |
|
|
% +-----------------+
|
|
|
|
\def\ttl@useclass#1#2{%
|
|
\@ifstar
|
|
{\ttl@labelfalse#1{#2}[]}%
|
|
{\ttl@labeltrue\@dblarg{#1{#2}}}}
|
|
|
|
\def\ttl@straightclass{\ttl@useclass\ttl@straight@i}
|
|
\def\ttl@partclass{\ttl@useclass\ttl@part@i}
|
|
\def\ttl@topclass{\ttl@useclass\ttl@top@i}
|
|
\def\ttl@pageclass{\ttl@useclass\ttl@page@i}
|
|
|
|
\newcommand\titleclass[1]{%
|
|
\edef\ttl@a{\expandafter\@gobble\string#1}%
|
|
\@ifnextchar[{\@tempswatrue\ttl@class@i{#1}}%
|
|
{\@tempswafalse\ttl@class@ii{#1}}}
|
|
|
|
\def\ttl@class@i#1[#2]{%
|
|
\@namedef{ttll@\ttl@a}{#2}%
|
|
\expandafter\providecommand\csname\ttl@a title\endcsname{}%%%%
|
|
\@ifundefined{ttl@toplevel}{}%
|
|
{\expandafter\let\csname ttlss@\ttl@a\expandafter\endcsname
|
|
\csname ttlss@\ttl@toplevel\endcsname}%
|
|
\edef\ttl@toplevel{\ttl@a}%
|
|
\ttl@class@ii{#1}}
|
|
|
|
\def\ttl@class@ii#1#2{%
|
|
\@ifundefined{ttl@#2class}%
|
|
{\PackageError{titlesec}{Unknown sectioning class}%
|
|
{Valid names are top, page and stright}}%
|
|
{\expandafter\let\csname ttl@compat\ttl@a\endcsname\relax
|
|
\@ifundefined{\ttl@a mark}%
|
|
{\@namedef{\ttl@a mark}{\@gobble}}%
|
|
{}%
|
|
\edef#1{%
|
|
\expandafter\noexpand\csname ttl@#2class\endcsname{\ttl@a}}}%
|
|
\if@tempswa
|
|
\expandafter\@gobble
|
|
\else
|
|
\expandafter\@firstofone
|
|
\fi
|
|
{\@ifnextchar[%
|
|
{\ttl@class@iii}%
|
|
{\@ifundefined{ttll@\ttl@a}%
|
|
{\PackageError{titlesec}{Unknown sectioning level}%
|
|
{\string\titleclass\space with no optional arguments\MessageBreak
|
|
only changes the class of an *existing* level}}}}}
|
|
|
|
\def\ttl@class@iii[#1]{%
|
|
\edef\ttl@b{\expandafter\@gobble\string#1}%
|
|
\expandafter\let\csname ttlss@\ttl@a\expandafter\endcsname
|
|
\csname ttlss@\ttl@b\endcsname
|
|
\expandafter\edef\csname ttlss@\ttl@b\endcsname{\ttl@a}%
|
|
\let\ttl@a\ttl@toplevel
|
|
\count@\csname ttll@\ttl@toplevel\endcsname
|
|
\ttl@class@iv}
|
|
|
|
\def\ttl@class@iv{%
|
|
\@ifundefined{ttlss@\ttl@a}{}%
|
|
{\advance\count@\@ne
|
|
\edef\ttl@a{\csname ttlss@\ttl@a\endcsname}%
|
|
\expandafter\edef\csname ttll@\ttl@a\endcsname{\the\count@}%
|
|
\ttl@class@iv}}
|
|
|
|
% Typesetting Classes: General tools
|
|
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
% The following command handles the *n spacing
|
|
% Some tricks are necessary to multiply a
|
|
% skip by a non integer number
|
|
|
|
\newskip\beforetitleunit
|
|
\beforetitleunit=1ex\@plus.3ex\@minus.06ex
|
|
\newskip\aftertitleunit
|
|
\aftertitleunit=1ex\@plus.1ex
|
|
|
|
\newdimen\ttl@plus
|
|
\newdimen\ttl@minus
|
|
|
|
\def\ttl@assign#1{%
|
|
\@ifstar
|
|
{\ttl@assign@i{#1}}%
|
|
{\ttl@assign@d{#1}}}
|
|
|
|
\def\ttl@assign@i#1#2\relax#3{%
|
|
\ttl@plus\z@
|
|
\ttl@minus\z@
|
|
\afterassignment\ttl@assign@ii
|
|
\dimen@\the#3, % <- space
|
|
#1 = #2\dimen@
|
|
plus #2\ttl@plus
|
|
minus #2\ttl@minus}
|
|
|
|
\def\ttl@assign@ii#1 {% <- space
|
|
\if#1,\else\afterassignment\ttl@assign@ii\fi
|
|
\csname ttl@\string#1\endcsname}
|
|
|
|
\def\ttl@assign@d#1#2\relax#3{\setlength#1{#2}}
|
|
|
|
% To be used with \v/vspace to make them calc-savvy
|
|
|
|
\def\ttl@calc#1#2{%
|
|
{\setlength\@tempskipa{#2}%
|
|
#1\@tempskipa}}
|
|
|
|
\def\ttl@calcneg#1#2{%
|
|
{\setlength\@tempskipa{#2}%
|
|
#1{-\@tempskipa}}}
|
|
|
|
% Gets from ttls@ and passes the spacing parameters:
|
|
|
|
\def\ttl@startargs#1#2{% Get the first arguments, with the spacing
|
|
\@ifundefined{ttlp@#2}%
|
|
{\let\ttl@key@page\@empty}%
|
|
{\ttlp@fetch{#2}}%
|
|
\begingroup
|
|
\def\ttl@b{ttls@#2}%
|
|
\edef\ttl@key@numberless{\ifttl@label//\else/*\fi}%
|
|
\def\ttl@a##1{\csname ttl@key@##1\endcsname}% Used as elt in try
|
|
\ttl@trylist
|
|
\xdef\ttl@b{\ttl@c}%
|
|
\endgroup
|
|
\ifx\ttl@b\@empty
|
|
\PackageError{titlesec}{Format/spacing not found}%
|
|
{I was unable to find the format corresponding to #2.\MessageBreak
|
|
Maybe you haven't set it with \string\titleformat\space and
|
|
\string\titlespacing}
|
|
\fi
|
|
\expandafter#1\ttl@b{#2}}
|
|
|
|
% Used in ttl@select
|
|
|
|
\def\ttl@savefn#1[#2]#3{%
|
|
\ifcase#1%
|
|
\footnotemark[#2]%
|
|
\gdef\ttl@fn{\footnotetext[#2]{#3}}%
|
|
\else
|
|
\footnotemark
|
|
\gdef\ttl@fn{\footnotetext{#3}}%
|
|
\fi}
|
|
|
|
\def\ttl@nest@error{%
|
|
\PackageError{titlesec}{Nested titles}{Titles must not be nested}}
|
|
|
|
\def\ttl@hmode@error{%
|
|
\PackageError{titlesec}{Entered in horizontal mode}
|
|
{The <format> argument cannot contain horizontal material\MessageBreak
|
|
such as text, \string\noindent, \string\makebox, etc.}}
|
|
|
|
% \ttl@select not only selects the right version to be
|
|
% used. It also take steps to ensure that a mark
|
|
% is not lost inside a box by saving it into \ttl@mk,
|
|
% which in turn is used by the sect and chap commands.
|
|
|
|
\newif\ifttl@explicit
|
|
|
|
\def\ttl@gmk#1{\gdef\ttl@mk{#1}}
|
|
|
|
\def\ttl@select#1#2#3#4{%
|
|
\ttl@Hy@saveanchor
|
|
\global\let\ttl@mk\@empty % global because of rigidchapters
|
|
\global\let\ttl@fn\@empty
|
|
\begingroup
|
|
\everypar{\setbox\z@\lastbox\strut}% or \hskip-\parindent?
|
|
\let\ttl@straight@i\ttl@nest@error
|
|
\let\ttl@top@i \ttl@nest@error
|
|
\let\ttl@part@i \ttl@nest@error
|
|
\let\ttl@page@i \ttl@nest@error
|
|
\let\ttl@newpage\newpage
|
|
\def\newpage{\ttl@savewrite\ttl@newpage}%
|
|
\def\markboth##1##2{\protect\ttl@gmk{\protect\markboth{##1}{##2}}}%
|
|
\def\markright##1{\protect\ttl@gmk{\protect\markright{##1}}}%
|
|
\def\@mkboth##1##2{\protect\ttl@gmk{\protect\@mkboth{##1}{##2}}}%
|
|
\def\footnote{\@ifnextchar[%
|
|
{\ttl@savefn\z@}{\ttl@savefn\@ne[]}}%
|
|
\edef\ttl@key@numberless{\ifttl@label//\else/*\fi}%
|
|
\def\ttl@b{ttlf@#1}%
|
|
\def\ttl@a##1{\csname ttl@key@##1\endcsname}% Used as elt in try
|
|
\ttl@trylist
|
|
\ifttl@explicit
|
|
\def\ttl@passexplicit{#4}%
|
|
\ttl@c{#4}{#2}{#3}{}% ttl@c is returned by ttl@try with ttlf@...
|
|
\else
|
|
\let\ttl@passexplicit\@empty
|
|
\ttl@c{#2}{#3}{#4}% ttl@c is returned by ttl@try with ttlf@...
|
|
\fi
|
|
\endgroup}
|
|
|
|
\let\ttl@savewrite\@empty
|
|
|
|
\def\ttl@finmarks{%
|
|
\ttl@savewrite
|
|
\ttl@mk % Contains a possible mark, returned by \ttl@select
|
|
\ttl@fn} % And a footnote
|
|
|
|
\def\ttl@try#1{%
|
|
\edef\ttl@c{#1}% #1 is a list in the form \ttl@a{key}\ttl@a{key}
|
|
\@ifundefined{\ttl@b\ttl@c}{}{%
|
|
\edef\ttl@c{\expandafter\noexpand\csname\ttl@b\ttl@c\endcsname}%
|
|
\def\ttl@a##1{\csname ttl@extra@##1\endcsname}%
|
|
#1%
|
|
\let\ttl@try\@gobble}} % locally modified to `break' testings
|
|
|
|
% \ttl@write writes marks and toc. tocdepth is taken
|
|
% care of when the toc is typesetted and not here.
|
|
% Used always through ttl@savewrite
|
|
|
|
\def\ttl@write#1#2{%
|
|
\ttl@blinemarks
|
|
\csname#1mark\endcsname{#2}%
|
|
\def\ttl@a{\protect\numberline{\@nameuse{the#1}}}%
|
|
\@nameuse{ttl@toc#1}% eg, \ttl@tocpart modifies \ttl@a
|
|
\ttl@addcontentsline{#1}{#2}% Depends on toctitles
|
|
\ttl@elinemarks
|
|
\global\ttl@toclabelfalse}
|
|
|
|
% Must be preceded by a default \ttl@savewrite, which is used
|
|
% in starred variants--\@empty in top and straight classes.
|
|
% In straight class, it is preceded by the setting of
|
|
% prev marks to provide a "fixed" top mark. Otherwise,
|
|
% the default prev mark (= curr mark) is used (restored
|
|
% after ttl@labelling in straight). This is the command
|
|
% to be hacked if you want to change the behaviour of
|
|
% starred variants.
|
|
|
|
\def\ttl@labelling#1#2{%
|
|
\let\ttl@Hy@saveanchor\@empty
|
|
\ifttl@label % First: if star
|
|
\def\ttl@savewrite{\ttl@write{#1}{#2}}%
|
|
\@nameuse{ttl@#1label}% eg, sets if mainmatter in chapter.
|
|
\ifttl@label % Second, eg, if not main matter
|
|
\ifnum\@nameuse{ttll@#1}>\c@secnumdepth\relax
|
|
\ttl@labelfalse % Third: if too deep
|
|
\else
|
|
\ttl@Hy@refstepcounter{#1}%
|
|
\@nameuse{ttl@#1out}%
|
|
\fi
|
|
\fi
|
|
\fi
|
|
\let\ifttl@toclabel\ifttl@label
|
|
\ifx\ttl@savewrite\@empty\else % If marks
|
|
\ifttl@ps
|
|
\ttl@blinemarks
|
|
\csname#1mark\endcsname{#2}%
|
|
\ttl@elinemarks
|
|
\fi
|
|
\ifttl@label\else\ttl@Hy@steplink{#1}\fi
|
|
\fi}
|
|
|
|
% Executed by ttl@labelling if the name of section is chapter:
|
|
|
|
\def\ttl@chapterlabel{\if@mainmatter\else\ttl@labelfalse\fi}
|
|
|
|
% Executed by ttl@labelling if chapter has a number. Note
|
|
% you can define messages for other sectioning levels (eg,
|
|
% \ttl@sectionout).
|
|
|
|
\def\ttl@chapterout{\typeout{\chaptertitlename\space\thechapter.}}
|
|
|
|
% Straight class
|
|
% ~~~~~~~~~~~~~
|
|
% Default for nobottomtitles. Changed by nobottomtitles*
|
|
|
|
\def\ttl@addstretch{\advance\@tempskipa-\pagestretch}
|
|
|
|
% 1:name 2:level 3:indent 4:before 5:after 6:afind [7]:cap 8:title
|
|
% The second argument of ttl@sect is the level, which
|
|
% is empty if the star version is used. In this case
|
|
% neither the toc nor the marks are written.
|
|
|
|
\def\ttl@straight@i#1[#2]#3{%
|
|
\def\@currentlabelname{#2}% for nameref
|
|
\gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
|
|
\let\ttl@savewrite\@empty
|
|
\def\ttl@savetitle{#3}%
|
|
\gdef\thetitle{\csname the#1\endcsname}%
|
|
\if@noskipsec \leavevmode \fi
|
|
\par
|
|
\ifttl@ps
|
|
\protected@xdef\ttl@prevmarks{\ttl@marks}%
|
|
\fi
|
|
\ttl@labelling{#1}{#2}%
|
|
\ifttl@ps
|
|
\gdef\ttl@prevmarks{\ttl@marks}%
|
|
\fi
|
|
\ttl@startargs\ttl@straight@ii{#1}{#3}}
|
|
|
|
% 1:left 2:right 3:before 4:after 5:afterindent 6:name 7:title
|
|
|
|
\def\ttl@straight@ii#1#2#3#4#5#6#7{%
|
|
\ttl@assign\@tempskipa#3\relax\beforetitleunit
|
|
\if@nobreak
|
|
\ttl@titlespace{\@tempskipa}%
|
|
\else
|
|
\@ifundefined{#6break}%
|
|
{\addpenalty{\@secpenalty}}%
|
|
{\csname#6break\endcsname}%
|
|
\@ifundefined{ttl@ps@\string#6}{}%
|
|
{\PackageWarning{titlesec}{Page style in straight class ignored}}%
|
|
\addvspace{\@tempskipa}%
|
|
\ifdim\bottomtitlespace<\z@
|
|
\else
|
|
\begingroup
|
|
\@tempskipb\pagegoal
|
|
\@tempskipa\pagegoal
|
|
\ttl@addstretch % \relax if nobottomtitle*
|
|
\advance\@tempskipa-\bottomtitlespace\relax % not a register
|
|
\pagegoal\@tempskipa
|
|
\def\@textbottom{\vskip\z@\@plus.0001fil}%
|
|
\penalty9999
|
|
\pagegoal\@tempskipb
|
|
\endgroup
|
|
\fi
|
|
\fi
|
|
\@afterindenttrue
|
|
\ifcase#5 \@afterindentfalse\fi
|
|
\ttl@assign\@tempskipb#4\relax\aftertitleunit
|
|
\ttl@select{#6}{#1}{#2}{#7}%
|
|
\ttl@finmarks
|
|
\@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}%
|
|
\if@noskipsec
|
|
\global\@nobreakfalse
|
|
\everypar{%
|
|
\if@noskipsec
|
|
\global\@noskipsecfalse
|
|
\clubpenalty\@M
|
|
\hskip-\parindent
|
|
\begingroup
|
|
\@svsechd\unskip{\hspace{\@tempskipb}}%
|
|
\endgroup
|
|
\else
|
|
\clubpenalty\@clubpenalty\everypar{}%
|
|
\fi}%
|
|
\else
|
|
\par\nobreak
|
|
\vspace{\@tempskipb}%
|
|
\@afterheading
|
|
\fi
|
|
\ignorespaces}
|
|
|
|
% Part class
|
|
% ~~~~~~~~~~
|
|
|
|
\providecommand\partmark[1]{\markboth{}{}}
|
|
|
|
\def\ttl@part@i#1[#2]#3{%
|
|
\gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
|
|
\def\ttl@savewrite{\ttl@write{#1}{#3}}% A default value. Not #2!
|
|
\def\ttl@savetitle{#3}%
|
|
\ttl@labelling{#1}{#2}%
|
|
\ttl@startargs\ttl@part@ii{#1}{#3}}
|
|
|
|
\def\ttl@part@ii#1#2#3#4#5#6#7{%
|
|
\ttl@assign\@tempskipa#3\relax\beforetitleunit
|
|
\vspace*{\@tempskipa}%
|
|
\@ifundefined{ttl@ps@\string#6}{}%
|
|
{\PackageWarning{titlesec}{Page style in part class ignored}}%
|
|
\global\@afterindenttrue
|
|
\ifcase#5 \global\@afterindentfalse \fi
|
|
\ttl@assign\@tempskipb#4\relax\aftertitleunit
|
|
\ttl@select{#6}{#1}{#2}{#7}%
|
|
\ttl@finmarks
|
|
\@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}%
|
|
\par\nobreak
|
|
\vspace{\@tempskipb}%
|
|
\@afterheading}
|
|
|
|
% Page class
|
|
% ~~~~~~~~~~
|
|
|
|
\def\ttl@page@i#1[#2]#3{%
|
|
\gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
|
|
\def\ttl@savewrite{\ttl@write{#1}{#3}}% A default value. Not #2!
|
|
\def\ttl@savetitle{#3}%
|
|
\ttl@labelling{#1}{#2}%
|
|
\ttl@startargs\ttl@page@ii{#1}{#3}}
|
|
|
|
\def\ttl@page@ii#1#2#3#4#5#6#7{%
|
|
\ttl@assign\@tempskipa#3\relax\beforetitleunit
|
|
\if@openright
|
|
\cleardoublepage
|
|
\else
|
|
\clearpage
|
|
\fi
|
|
\@ifundefined{ttl@ps@\string#6}%
|
|
{\thispagestyle{plain}}%
|
|
{\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
|
|
\if@twocolumn
|
|
\onecolumn
|
|
\@tempswatrue
|
|
\else
|
|
\@tempswafalse
|
|
\fi
|
|
\vspace*{\@tempskipa}%
|
|
\@afterindenttrue
|
|
\ifcase#5 \@afterindentfalse\fi
|
|
\ttl@assign\@tempskipb#4\relax\aftertitleunit
|
|
\ttl@select{#6}{#1}{#2}{#7}%
|
|
\ttl@finmarks
|
|
\@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}%
|
|
\vspace{\@tempskipb}%
|
|
\newpage
|
|
\if@twoside
|
|
\if@openright
|
|
\null
|
|
\@ifundefined{ttl@ps@\string#6}%
|
|
{\thispagestyle{empty}}%
|
|
{\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
|
|
\newpage
|
|
\fi
|
|
\fi
|
|
\if@tempswa
|
|
\twocolumn
|
|
\fi
|
|
\ignorespaces}
|
|
|
|
% Top class and some makechapterhead stuff
|
|
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
%
|
|
% \ttl@mkchap is the new make(s)chapterhead.
|
|
|
|
\def\ttl@mkchap#1#2#3#4#5#6#7{%
|
|
\gdef\ttl@savemark{\csname#6mark\endcsname{#7}}%
|
|
\let\ttl@savewrite\@empty
|
|
\let\ttl@Hy@saveanchor\@empty
|
|
\@ifundefined{ttl@ps@\string#6}{}%
|
|
{\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
|
|
\let\ifttl@toclabel\ifttl@label
|
|
\ttl@mkchap@i{#1}{#2}{#3}{#4}{#5}{#6}{#7}}
|
|
|
|
% But \ttl@mkchap@i is used by both makechapterhead and
|
|
% the top class.
|
|
|
|
\def\ttl@mkchap@i#1#2#3#4#5#6#7{%
|
|
\ttl@assign\@tempskipa#3\relax\beforetitleunit
|
|
\vspace*{\@tempskipa}%
|
|
\global\@afterindenttrue
|
|
\ifcase#5 \global\@afterindentfalse\fi
|
|
\ttl@assign\@tempskipb#4\relax\aftertitleunit
|
|
\ttl@topmode{\@tempskipb}{%
|
|
\ttl@select{#6}{#1}{#2}{#7}}%
|
|
\ttl@finmarks % Outside the box!
|
|
\@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}}
|
|
|
|
\def\ttl@top@i#1[#2]#3{%
|
|
\gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
|
|
\let\ttl@savewrite\@empty
|
|
\def\ttl@savetitle{#3}%
|
|
\ttl@labelling{#1}{#2}%
|
|
\ttl@startargs\ttl@top@ii{#1}{#3}}
|
|
|
|
\def\ttl@top@ii#1#2#3#4#5#6#7{%
|
|
\@ifundefined{#6break}%
|
|
{\if@openright
|
|
\cleardoublepage
|
|
\else
|
|
\clearpage
|
|
\fi}%
|
|
{\csname#6break\endcsname}%
|
|
\@ifundefined{ttl@ps@\string#6}%
|
|
{\thispagestyle{plain}}%
|
|
{\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
|
|
\global\@topnum\z@
|
|
\@ifundefined{#6tolists}%
|
|
{\addtocontents{lof}{\protect\ttl@tocsep}%
|
|
\addtocontents{lot}{\protect\ttl@tocsep}}
|
|
{\@nameuse{#6tolists}}%
|
|
\if@twocolumn
|
|
\@topnewpage[\ttl@mkchap@i{#1}{#2}{#3}{#4}{#5}{#6}{#7}]%
|
|
\else
|
|
\ttl@mkchap@i{#1}{#2}{#3}{#4}{#5}{#6}{#7}%
|
|
\@afterheading
|
|
\fi
|
|
\ignorespaces}
|
|
|
|
|
|
% \def\ttl@noskipsectrue{%
|
|
% \if@noskipsec
|
|
% \PackageError{titlesec}{Invalid shape for top class}%
|
|
% {The selected shape only makes sense when merged into\MessageBreak
|
|
% a paragraph. That is impossible in the top class}%
|
|
% \else
|
|
|
|
\newcommand\chaptertitlename{\@chapapp}
|
|
\def\ttl@tocsep{\addvspace{10\p@}}
|
|
|
|
% +-----------------+
|
|
% | S H A P E S |
|
|
% +-----------------+
|
|
%
|
|
% % Reformatting Titles: Interface
|
|
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
|
|
% The surrounding space is stored in a macro
|
|
% named \ttls@<section> whose content is
|
|
% {left}{right}{before}{after}{afterindent}.
|
|
% But if there is the page key, the name is
|
|
% \ttls@<section>/<page>
|
|
|
|
\newcommand\titlespacing{%
|
|
\@ifstar{\ttl@spacing@i{\z@}}{\ttl@spacing@i{\@ne}}}
|
|
|
|
\def\ttl@spacing@i#1#2#3#4#5{%
|
|
\ttl@getkeys{#2}{titlesec}%
|
|
\@ifnextchar[{%
|
|
\ttl@spacing@ii{#1}{#3}{#4}{#5}%
|
|
}{%
|
|
\ttl@spacing@ii{#1}{#3}{#4}{#5}[\z@]}}
|
|
|
|
\def\ttl@spacing@ii#1#2#3#4[#5]{%
|
|
\expandafter\def\csname ttls@\ttl@a\endcsname
|
|
{{#2}{#5}{#3}{#4}{#1}}}
|
|
|
|
% The section name is built in \ttl@a.
|
|
% The format is stored in a macro named \ttlf@<section>,
|
|
% or \ttlf@<section>/<page> if there is the page spec,
|
|
% or \ttlf@.../* if numberless is true
|
|
% whose content is
|
|
% \ttl@<shape>{format}{label}{sep}{before}{after}
|
|
|
|
\newtoks\ttl@toksa
|
|
|
|
\newcommand\titleformat{%
|
|
\@ifstar{\ttl@format@s}%
|
|
{\ttl@format@i}}
|
|
|
|
\def\ttl@format@s#1#2{%
|
|
\edef\ttl@a{\expandafter\@gobble\string #1}%
|
|
\@ifundefined{ttlf@\ttl@a}%
|
|
{\PackageError{titlesec}{Not allowed in `easy' settings}
|
|
{The sectiong command you are trying to redefine\MessageBreak
|
|
is not handled by the starred variant (eg, \string\part)}}{}
|
|
\expandafter\expandafter\expandafter
|
|
\ttl@format@si\csname ttlf@\ttl@a \endcsname
|
|
{#2}}
|
|
|
|
\def\ttl@format@si#1#2#3#4#5#6#7{%
|
|
\@namedef{ttlf@\ttl@a}{#1{#7}{#3}{#4}{#5}{#6}}}
|
|
|
|
\def\ttl@format@i#1{%
|
|
\@ifnextchar[{\ttl@format@ii{#1}}{\ttl@format@ii{#1}[hang]}}
|
|
|
|
\def\ttl@format@ii#1[#2]#3#4#5#6{%
|
|
\ttl@getkeys{#1}{titlesec}%
|
|
\ttl@toksa{{#3}{#4}{#5}{#6}}% Save arguments
|
|
\@ifnextchar[{%
|
|
\ttl@format@iii{#2}%
|
|
}{%
|
|
\ttl@format@iii{#2}[]}}
|
|
|
|
% First, we get the shape -- if not defined it loads
|
|
% the corresponding file.
|
|
|
|
|
|
\def\ttl@format@iii#1[#2]{%
|
|
\@ifundefined{ttlh@#1}{%
|
|
\begingroup
|
|
\makeatletter
|
|
\InputIfFileExists{#1.tss}{}{%
|
|
\PackageError{titlesec}{Unknown shape}%
|
|
{Shapes are defined in files with extension tss\MessageBreak
|
|
Either you have misspelled the shape\MessageBreak
|
|
or there is no a #1.tss file}}%
|
|
\endgroup}{}%
|
|
\@temptokena{#2}%
|
|
\ifttl@explicit
|
|
\edef\ttl@b{%
|
|
\def\expandafter\noexpand\csname ttlf@\ttl@a\endcsname####1%
|
|
{\expandafter\noexpand\csname ttlh@#1\endcsname
|
|
\the\ttl@toksa{\the\@temptokena}}}%
|
|
\else
|
|
\edef\ttl@b{%
|
|
\def\expandafter\noexpand\csname ttlf@\ttl@a\endcsname
|
|
{\expandafter\noexpand\csname ttlh@#1\endcsname
|
|
\the\ttl@toksa{\the\@temptokena}}}%
|
|
\fi
|
|
\ttl@b
|
|
\csname ttl@compat\ttl@a\endcsname}
|
|
|
|
% Styles
|
|
% ~~~~~~
|
|
|
|
% 1:global 2:label 3:sep 4:style 5:after 6:left 7:right 8:title
|
|
% \ttl@<shape> and \ttlh@<shape> take the following eight
|
|
% arguments:
|
|
% {format}{label}{sep}{before}{after}{left}{right}{title}
|
|
% where before and after refer to the format.
|
|
% With the option explicit, #4 contains the title and #8 is
|
|
% empty.
|
|
|
|
\def\ttlh@display#1#2#3#4#5#6#7#8{%
|
|
\gdef\ttl@makeline##1{\ttl@calc\hspace{#6}##1\ttl@calc\hspace{#7}}%
|
|
\setlength\leftskip{#6}%
|
|
\setlength\rightskip{#7}%
|
|
\interlinepenalty\@M
|
|
\ttl@changecentercr
|
|
\ttl@beginlongest
|
|
#1\ifhmode\ttl@hmode@error\fi
|
|
\ttl@glcmds
|
|
\parindent\z@
|
|
\ifttl@label
|
|
{#2\strut\@@par}\nobreak\ttl@calc\vspace{#3}%
|
|
\fi
|
|
#4{#8}%
|
|
\kern\z@\strut\@@par
|
|
\nobreak\ttl@midlongest#5\@@par
|
|
\ttl@endlongest}
|
|
|
|
\def\ttlh@hang#1#2#3#4#5#6#7#8{%
|
|
\gdef\ttl@makeline##1{\ttl@calc\hspace{#6}##1\ttl@calc\hspace{#7}}%
|
|
\setlength\leftskip{#6}%
|
|
\setlength\rightskip{#7}%
|
|
\interlinepenalty\@M
|
|
\ttl@changecentercr
|
|
\ttl@beginlongest
|
|
#1{\ifhmode\ttl@hmode@error\fi
|
|
\ttl@glcmds
|
|
\parindent\z@
|
|
\leavevmode
|
|
\begingroup
|
|
\ifttl@label
|
|
\sbox\z@{#2\strut\ttl@calc\hspace{#3}}%
|
|
\advance\leftskip\wd\z@
|
|
\llap{\box\z@}%
|
|
\fi
|
|
#4{#8}%
|
|
\kern\z@\strut\@@par
|
|
\endgroup
|
|
\nobreak\ttl@midlongest#5\@@par}%
|
|
\ttl@endlongest}
|
|
|
|
\def\ttlh@runin#1#2#3#4#5#6#7#8{%
|
|
\global\@noskipsectrue
|
|
\gdef\ttl@makeline##1{##1}%
|
|
\ttl@changecentercr
|
|
#1{\ifhmode\ttl@hmode@error\fi
|
|
\global\sbox\ttl@box{%
|
|
\ttl@calc\hspace{#6}%
|
|
\ifttl@label{\strut#2}\ttl@calc\hspace{#3}\fi
|
|
#4{#8}#5\unskip}}%
|
|
\gdef\@svsechd{\unhbox\ttl@box}}
|
|
|
|
% +-----------------+
|
|
% | T O O L S |
|
|
% +-----------------+
|
|
%
|
|
% calcwidth
|
|
% ~~~~~~~~~
|
|
% Implemented after code from soul (but much modified...)
|
|
|
|
\newdimen\titlewidth
|
|
\newdimen\titlewidthlast
|
|
\newdimen\titlewidthfirst
|
|
|
|
\let\ttl@glcmds\relax
|
|
\let\ttl@beginlongest\@empty
|
|
\let\ttl@midlongest\@empty
|
|
\let\ttl@endlongest\@empty
|
|
|
|
\def\ttl@xbeginlongest#1\ttl@endlongest{%
|
|
\titlewidth\z@
|
|
\titlewidthlast\z@
|
|
\setbox\ttl@box\vbox{%
|
|
\def\ttl@glcmds{%
|
|
\def\\{\@ifstar{\@ifnextchar[{\ttl@bs}{\newline}}%
|
|
{\@ifnextchar[{\ttl@bs}{\newline}}}%
|
|
\def\ttl@bs[####1]{\newline}%
|
|
\let\@centercr\\%
|
|
\def\ttl@midlongest####1\@@par{}% Very dirty...
|
|
\advance\rightskip 1\leftskip plus 1fil
|
|
\leftskip=\z@}%
|
|
#1}%
|
|
\ttl@boxprocess
|
|
#1}
|
|
|
|
\def\ttl@boxprocess{%
|
|
\setbox\ttl@box=\vbox{%
|
|
\unvcopy\ttl@box
|
|
\unskip\unpenalty
|
|
\global\setbox\@ne=\lastbox}%
|
|
\ifvoid\@ne
|
|
\else
|
|
\setbox\tw@=\hbox{\hskip-\leftskip\unhbox\@ne\hskip-\rightskip}%
|
|
\titlewidthfirst\wd\tw@
|
|
\ifdim\titlewidth<\titlewidthfirst
|
|
\titlewidth\titlewidthfirst
|
|
\fi
|
|
\ifdim\titlewidthlast=\z@
|
|
\titlewidthlast\titlewidthfirst
|
|
\fi
|
|
\expandafter\ttl@boxprocess
|
|
\fi}
|
|
|
|
% Rules
|
|
% ~~~~~
|
|
|
|
\providecommand\titleline{%
|
|
\@ifstar{\ttl@line@i{\hb@xt@\titlewidth}}%
|
|
{\ttl@line@i{}}}
|
|
|
|
\def\ttl@line@i#1{%
|
|
\@ifnextchar[{\ttl@line{#1}}{\ttl@line{#1}[s]}}
|
|
|
|
\def\ttl@line#1[#2]#3{%
|
|
\vskip\topskip
|
|
\hrule \@height \z@
|
|
\nobreak
|
|
\vskip-\topskip
|
|
\begingroup
|
|
\parindent\z@
|
|
\everypar{}%
|
|
\leftskip\z@
|
|
\rightskip\z@ % #1 is either \hb@xt@\titlewidth or empty:
|
|
\@makebox[\hsize][#2]{\ttl@makeline{#1{#3}}}%
|
|
\par
|
|
\endgroup
|
|
\hrule height \z@
|
|
\nobreak}
|
|
|
|
\providecommand\titlerule{\@ifstar{\ttl@row}{\ttl@rule}}
|
|
|
|
\let\ttl@leaders\xleaders % For titletoc compatibility
|
|
|
|
\def\ttl@row{\@ifnextchar[{\ttl@row@i}{\ttl@row@i[\wd\z@]}}
|
|
\def\ttl@row@i[#1]#2{%
|
|
\ifvmode\expandafter\titleline\fi
|
|
{\sbox\z@{#2}%
|
|
\ttl@calcneg\hspace{#1}%
|
|
\hskip\wd\z@
|
|
\ttl@leaders\hb@xt@#1{\hss\box\z@}%
|
|
\hfill\kern\z@}}
|
|
|
|
\def\ttl@rule{\@ifnextchar[{\ttl@rule@i}{\ttl@rule@i[.4\p@]}}
|
|
\def\ttl@rule@i[#1]{%
|
|
\ifvmode\expandafter\titleline\fi
|
|
{\leaders\hrule height #1\hfill\kern\z@}}
|
|
|
|
% Par shapes and space
|
|
% ~~~~~~~~~~~~~~~~~~~~
|
|
|
|
\providecommand\filright{%
|
|
\gdef\ttl@filleft##1{\hskip##1}%
|
|
\gdef\ttl@filright##1{\hfill}%
|
|
\let\\\@centercr
|
|
\advance\rightskip\z@ \@plus 1fil\relax}
|
|
\providecommand\filleft{%
|
|
\gdef\ttl@filleft##1{\hfill}%
|
|
\gdef\ttl@filright##1{\hskip##1}%
|
|
\let\\\@centercr
|
|
\advance\leftskip\z@ \@plus 1fil
|
|
\parfillskip\z@}
|
|
\providecommand\filcenter{\filleft\filright
|
|
\gdef\ttl@filleft##1{\hfill}}
|
|
\providecommand\fillast{%
|
|
\gdef\ttl@filleft##1{\hfill}%
|
|
\gdef\ttl@filright##1{\hfill}%
|
|
\let\\\@centercr
|
|
\filleft\advance\rightskip\z@ \@plus -1fil
|
|
\parfillskip\z@ \@plus 2fil\relax}
|
|
\newcommand\filinner{%
|
|
\if@twoside
|
|
\ifodd\count\z@\filleft\else\filright\fi
|
|
\else
|
|
\filleft
|
|
\fi}
|
|
\newcommand\filouter{%
|
|
\if@twoside
|
|
\ifodd\count\z@\filright\else\filleft\fi
|
|
\else
|
|
\filright
|
|
\fi}
|
|
|
|
\newcommand\wordsep{\fontdimen\tw@\font \@plus
|
|
\fontdimen\thr@@\font \@minus \fontdimen4\font}
|
|
|
|
% +-----------------+
|
|
% | O P T I O N S |
|
|
% +-----------------+
|
|
|
|
|
|
\DeclareOption{pagestyles}{\let\sectiontitle\@empty}
|
|
\DeclareOption{floatps}{%
|
|
\ifx\sectiontitle\@empty
|
|
\let\ttl@replace\space
|
|
\else
|
|
\PackageWarning{titlesec}{Ignoring `floatps' without
|
|
`pagestyles'. This option is now deprecated.}%
|
|
\fi}
|
|
\DeclareOption{psfloats}{%
|
|
\ifx\sectiontitle\@empty
|
|
\let\ttl@replace\@empty
|
|
\else
|
|
\PackageWarning{titlesec}{Ignoring `psfloats' without
|
|
`pagestyles'}%
|
|
\fi}
|
|
|
|
\DeclareOption{loadonly}{\let\ttl@extract\@empty}
|
|
|
|
\DeclareOption{outermarks}{%
|
|
\def\ttl@titlemarks{\outertitlemarks}}
|
|
\DeclareOption{topmarks}{
|
|
\def\ttl@titlemarks{\toptitlemarks}}
|
|
\DeclareOption{botmarks}{%
|
|
\def\ttl@titlemarks{\bottitlemarks}}
|
|
\DeclareOption{innermarks}{%
|
|
\def\ttl@titlemarks{\innertitlemarks}}
|
|
|
|
\DeclareOption{footmarks}{} % Backward compat
|
|
|
|
\DeclareOption{explicit}{\ttl@explicittrue}
|
|
|
|
\DeclareOption{clearempty}{%
|
|
\def\cleardoublepage{%
|
|
\clearpage{\ps@empty\if@twoside\ifodd\c@page\else
|
|
\hbox{}\newpage\if@twocolumn\hbox{}\newpage\fi\fi\fi}}}
|
|
|
|
\DeclareOption{rigidchapters}{%
|
|
\def\ttl@topmode#1#2{\vbox to #1{#2\vfil}}%
|
|
\def\ttl@chapafter{.26\textheight}}
|
|
\DeclareOption{rubberchapters}{%
|
|
\def\ttl@topmode#1#2{{#2}\ttl@calc\vspace{#1}}%
|
|
\def\ttl@chapafter{40\p@}}
|
|
|
|
\DeclareOption{bottomtitles}{%
|
|
\def\bottomtitlespace{-1\p@}}
|
|
\DeclareOption{nobottomtitles}{%
|
|
\def\bottomtitlespace{.2\textheight}}
|
|
\DeclareOption{nobottomtitles*}{%
|
|
\let\ttl@addstretch\relax
|
|
\def\bottomtitlespace{.2\textheight}}
|
|
|
|
\DeclareOption{calcwidth}{%
|
|
\let\ttl@beginlongest\ttl@xbeginlongest}
|
|
|
|
\DeclareOption{aftersep}{%
|
|
\let\ttl@titlespace\@gobble}
|
|
\DeclareOption{largestsep}{%
|
|
\let\ttl@titlespace\addvspace}
|
|
|
|
\DeclareOption{oldparttoc}{%
|
|
\def\ttl@tocpart{\def\ttl@a{\thepart\hspace{1em}}}}
|
|
\DeclareOption{newparttoc}{%
|
|
\let\ttl@tocpart\relax}
|
|
|
|
\DeclareOption{rm}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\rmfamily}}
|
|
\DeclareOption{sf}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\sffamily}}
|
|
\DeclareOption{tt}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\ttfamily}}
|
|
\DeclareOption{md}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\mdseries}}
|
|
\DeclareOption{bf}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\bfseries}}
|
|
\DeclareOption{up}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\upshape}}
|
|
\DeclareOption{it}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\itshape}}
|
|
\DeclareOption{sl}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\slshape}}
|
|
\DeclareOption{sc}{%
|
|
\protected@xdef\ttl@fonts{\ttl@fonts\protect\scshape}}
|
|
|
|
\DeclareOption{big}{%
|
|
\gdef\ttl@sizes#1{\ifcase#1\relax\Huge\or\Large\or\large
|
|
\or\normalsize\or\or\or\huge\fi}}
|
|
\DeclareOption{medium}{%
|
|
\gdef\ttl@sizes#1{\ifcase#1\relax\huge\or\Large\or\large
|
|
\or\normalsize\or\or\or\LARGE\fi}}
|
|
\DeclareOption{small}{%
|
|
\gdef\ttl@sizes#1{\ifcase#1\relax\LARGE\or\large
|
|
\or\normalsize\or\normalsize\or\or\or\Large\fi}}
|
|
\DeclareOption{tiny}{%
|
|
\gdef\ttl@sizes#1{\ifcase#1\relax\large\or\normalsize\or
|
|
\normalsize\or\normalsize\or\or\or\normalsize\fi}}
|
|
|
|
\DeclareOption{raggedleft}{%
|
|
\gdef\ttl@fil{\filleft}}
|
|
\DeclareOption{center}{%
|
|
\gdef\ttl@fil{\filcenter}}
|
|
\DeclareOption{raggedright}{%
|
|
\gdef\ttl@fil{\filright}}
|
|
|
|
\DeclareOption{compact}{%
|
|
\gdef\ttl@space{1}%
|
|
\gdef\ttl@chapafter{30\p@}}
|
|
|
|
% Deprecated. To be remmoved in a major upgrade (3.0)
|
|
\DeclareOption{indentfirst}{%
|
|
\gdef\@afterindentfalse{\let\if@afterindent\iftrue}%
|
|
\@afterindenttrue
|
|
\def\titlespacing{%
|
|
\@ifstar{\ttl@spacing@i{\@ne}}{\ttl@spacing@i{\@ne}}}}
|
|
\DeclareOption{nonindentfirst}{%
|
|
\def\titlespacing{%
|
|
\@ifstar{\ttl@spacing@i{\z@}}{\ttl@spacing@i{\z@}}}}
|
|
|
|
% New names
|
|
\DeclareOption{indentafter}{%
|
|
\gdef\@afterindentfalse{\let\if@afterindent\iftrue}%
|
|
\@afterindenttrue
|
|
\def\titlespacing{%
|
|
\@ifstar{\ttl@spacing@i{\@ne}}{\ttl@spacing@i{\@ne}}}}
|
|
\DeclareOption{noindentafter}{%
|
|
\def\titlespacing{%
|
|
\@ifstar{\ttl@spacing@i{\z@}}{\ttl@spacing@i{\z@}}}}
|
|
|
|
% newlinetospace
|
|
\let\ttl@blinemarks\relax
|
|
\let\ttl@elinemarks\relax
|
|
|
|
\DeclareRobustCommand\ttl@linetosp{%
|
|
\@ifstar{\ttl@linetosp@i}{\ttl@linetosp@i}}%
|
|
|
|
\def\ttl@linetosp@i{%
|
|
\ifdim\lastskip>\z@\else\space\fi
|
|
\ignorespaces}
|
|
|
|
\DeclareOption{newlinetospace}{%
|
|
\def\ttl@blinemarks{%
|
|
\let\ttl@e\\%
|
|
\def\\{\ttl@linetosp}}%
|
|
\def\ttl@elinemarks{\let\\\ttl@e}}%
|
|
|
|
% toctitles
|
|
\def\ttl@addcontentsline#1#2{%
|
|
\addcontentsline{toc}{#1}{\ifttl@toclabel\ttl@a\fi#2}}
|
|
|
|
\DeclareOption{toctitles}{%
|
|
\def\ttl@addcontentsline#1#2{%
|
|
\addcontentsline{toc}{#1}{\ifttl@toclabel\ttl@a\fi\ttl@savetitle}}}
|
|
|
|
% pageatnewline
|
|
|
|
\def\ttl@changecentercr{%
|
|
\let\ttl@centercr\@centercr
|
|
\def\@centercr{\@ifstar{\ttl@centercr*}{\ttl@centercr*}}}
|
|
|
|
\DeclareOption{pageatnewline}{\let\ttl@changecentercr\relax}
|
|
|
|
\def\ttl@fonts{}
|
|
|
|
\ExecuteOptions{rubberchapters,bottomtitles,aftersep,oldparttoc,%
|
|
innermarks}
|
|
|
|
\ProcessOptions
|
|
|
|
% +-----------------+
|
|
% | H Y P E R R E F |
|
|
% +-----------------+
|
|
%
|
|
% These two commands are provided by hyperref. But if they
|
|
% are not defined at \begin{document} hyperref has not been
|
|
% loaded or it is an old version.
|
|
|
|
\AtBeginDocument{%
|
|
\ifx\ttl@Hy@steplink\@undefined
|
|
\let\ttl@Hy@steplink\@gobble
|
|
\let\ttl@Hy@refstepcounter\refstepcounter
|
|
\fi}
|
|
|
|
% +-----------------+
|
|
% | PAGE STYLES |
|
|
% +-----------------+
|
|
%
|
|
% This is generic:
|
|
|
|
\newcommand\assignpagestyle[2]{\@namedef{ttl@ps@\string#1}{#2}}
|
|
|
|
% Old pagestyles
|
|
% ~~~~~~~~~~~~~~
|
|
|
|
\providecommand\newpagestyle{%
|
|
\let\ttl@compatps\@empty % marks the ``old interface''
|
|
\makeatletter
|
|
\edef\ttl@d{%
|
|
\noexpand\input{ttlps.def}%
|
|
\catcode`\noexpand\@=\the\catcode`\@}%
|
|
\ttl@d
|
|
\newpagestyle}
|
|
|
|
\providecommand\renewpagestyle{%
|
|
\let\ttl@compatps\@empty % marks the ``old interface''
|
|
\makeatletter
|
|
\edef\ttl@d{%
|
|
\noexpand\input{ttlps.def}%
|
|
\catcode`\noexpand\@=\the\catcode`\@}%
|
|
\ttl@d
|
|
\renewpagestyle}
|
|
|
|
\providecommand\widenhead{%
|
|
\let\ttl@compatps\@empty % marks the ``old interface''
|
|
\makeatletter
|
|
\edef\ttl@d{%
|
|
\noexpand\input{ttlps.def}%
|
|
\catcode`\noexpand\@=\the\catcode`\@}%
|
|
\ttl@d
|
|
\widenhead}
|
|
|
|
% New pagestyles
|
|
% ~~~~~~~~~~~~~~
|
|
|
|
\@ifundefined{sectiontitle}{}{\input{ttlps.def}}
|
|
|
|
% +-----------------+
|
|
% | C O M P A T |
|
|
% +-----------------+
|
|
% Easy setup, i.e., that of package options, is
|
|
% taken care of, if necessary.
|
|
|
|
\renewcommand\secdef[2]{%
|
|
\@ifstar
|
|
{\ttl@labelfalse
|
|
#2}
|
|
{\ttl@labeltrue
|
|
\ifx#1\@chapter
|
|
\if@mainmatter\else\ttl@labelfalse\fi
|
|
\ifnum\ttll@chapter>\c@secnumdepth\ttl@labelfalse\fi
|
|
\else\ifx#1\@part
|
|
\ifnum\ttll@part>\c@secnumdepth\ttl@labelfalse\fi
|
|
\fi\fi
|
|
\let\ifttl@toclabel\ifttl@label
|
|
\@dblarg{#1}}}
|
|
|
|
\@ifundefined{ttl@extract}{}{\endinput}
|
|
|
|
\newcommand\titlelabel[1]{%
|
|
\def\@seccntformat##1{#1}}
|
|
|
|
\expandafter\ifx\csname chapter\endcsname\relax
|
|
|
|
\def\ttl@compatpart{\titleclass{\part}{part}\relax}
|
|
|
|
\else
|
|
|
|
\def\ttl@compatchapter{%
|
|
\def\@makechapterhead{%
|
|
\ttl@labeltrue
|
|
\if@mainmatter\else\ttl@labelfalse\fi
|
|
\ifnum\ttll@chapter>\c@secnumdepth\ttl@labelfalse\fi
|
|
\ttl@startargs\ttl@mkchap{chapter}}%
|
|
\def\@makeschapterhead{%
|
|
\ttl@labelfalse
|
|
\if@mainmatter\else\ttl@labelfalse\fi
|
|
\ifnum\ttll@chapter>\c@secnumdepth\ttl@labelfalse\fi
|
|
\ttl@startargs\ttl@mkchap{chapter}}}
|
|
|
|
\def\ttl@compatpart{\titleclass{\part}{page}\relax}
|
|
|
|
\fi
|
|
|
|
\def\ttl@@extract#1\@startsection#2#3#4#5#6#7#8{%
|
|
\@tempskipa=#5
|
|
\@tempskipb=#6
|
|
\ifdim\@tempskipa<\z@
|
|
\toks@{\titlespacing*#8{#4}}%
|
|
\@tempskipa-\@tempskipa
|
|
\else
|
|
\toks@{\titlespacing#8{#4}}%
|
|
\fi
|
|
\@ifundefined{ttl@space}{}{%
|
|
\ttl@assign\@tempskipa*\ttl@space\relax\beforetitleunit}%
|
|
\ifdim\@tempskipb<\z@
|
|
\if@tempswa
|
|
\titleformat#8[runin]%
|
|
{\ttl@fonts\ttl@sizes{#3}}{\@seccntformat{#2}}%
|
|
{\z@}\ttl@passexplicit
|
|
\else
|
|
\titleformat#8[runin]%
|
|
{#7}{\@seccntformat{#2}}%
|
|
{\z@}\ttl@passexplicit
|
|
\fi
|
|
\@tempskipb-\@tempskipb
|
|
\else
|
|
\if@tempswa
|
|
\titleformat#8%
|
|
{\ttl@fil\ttl@fonts\ttl@sizes{#3}}{\@seccntformat{#2}}%
|
|
{\z@}\ttl@passexplicit
|
|
\else
|
|
\titleformat#8%
|
|
{#7}{\@seccntformat{#2}}%
|
|
{\z@}\ttl@passexplicit
|
|
\fi
|
|
\@ifundefined{ttl@space}{}{%
|
|
\ttl@assign\@tempskipb*\ttl@space\relax\aftertitleunit}%
|
|
\fi
|
|
\edef\ttl@a{\the\toks@{\the\@tempskipa}{\the\@tempskipb}}
|
|
\ttl@a}
|
|
|
|
\def\ttl@extract#1{%
|
|
\expandafter\in@\expandafter\@startsection\expandafter{#1}%
|
|
\ifin@
|
|
\expandafter\ttl@@extract#1#1%
|
|
\else
|
|
\PackageWarningNoLine{titlesec}%
|
|
{Non standard sectioning command detected\MessageBreak
|
|
Using default spacing and no format}
|
|
\titlespacing*#1{\z@}{*3}{*2}%
|
|
\fi}
|
|
|
|
\@tempswafalse
|
|
|
|
\ifx\ttl@fonts\@empty
|
|
\def\ttl@fonts{\bfseries}
|
|
\else
|
|
\@tempswatrue
|
|
\fi
|
|
|
|
\expandafter\ifx\csname ttl@sizes\endcsname\relax
|
|
\gdef\ttl@sizes#1{\ifcase#1\relax\Huge\or\Large\or\large
|
|
\or\normalsize\or\or\or\huge\fi}
|
|
\else
|
|
\@tempswatrue
|
|
\fi
|
|
|
|
\expandafter\ifx\csname ttl@fil\endcsname\relax
|
|
\let\ttl@fil\@empty
|
|
\else
|
|
\@tempswatrue
|
|
\fi
|
|
|
|
\if@tempswa
|
|
|
|
\expandafter\ifx\csname chapter\endcsname\relax\else
|
|
\titleformat\chapter[display]%
|
|
{\@ifundefined{ttl@fil}{\raggedright}{\ttl@fil}\ttl@fonts\ttl@sizes6}
|
|
{\@chapapp\space\thechapter}{.8\baselineskip}{\ttl@sizes\z@\ttl@passexplicit}
|
|
\fi
|
|
|
|
\fi
|
|
|
|
\ttl@extract\section
|
|
\ttl@extract\subsection
|
|
\ttl@extract\subsubsection
|
|
\ttl@extract\paragraph
|
|
\ttl@extract\subparagraph
|
|
|
|
\let\ttl@extract\@undefined
|
|
\let\ttl@@extract\@undefined
|
|
|
|
\def\ttl@toplevel{part}
|
|
|
|
\expandafter\ifx\csname chapter\endcsname\relax
|
|
|
|
\@namedef{ttll@part}{0}
|
|
\titleclass{\section}{straight}[\part]
|
|
|
|
\titlespacing*{\part}
|
|
{\z@}
|
|
{4ex}
|
|
{3ex}
|
|
|
|
\else
|
|
|
|
\let\ttl@save@mkchap\@makechapterhead
|
|
\let\ttl@save@mkschap\@makeschapterhead
|
|
|
|
\def\@makechapterhead#1{%
|
|
\gdef\ttl@savemark{\chaptermark{#1}}%
|
|
\ttl@save@mkchap{#1}%
|
|
\@ifundefined{ttl@ps@\string\chapter}{}%
|
|
{\thispagestyle{\@nameuse{ttl@ps@\string\chapter}}}}
|
|
|
|
\def\@makeschapterhead#1{%
|
|
\gdef\ttl@savemark{\chaptermark{#1}}%
|
|
\ttl@save@mkschap{#1}%
|
|
\@ifundefined{ttl@ps@\string\chapter}{}%
|
|
{\thispagestyle{\@nameuse{ttl@ps@\string\chapter}}}}
|
|
|
|
\@namedef{ttll@part}{-1}
|
|
\@namedef{ttlss@part}{chapter}
|
|
\@namedef{ttll@chapter}{0}
|
|
\titleclass{\section}{straight}[\chapter]
|
|
|
|
% The following is unoperant, unless when \chapter / \part
|
|
% format is redefined
|
|
|
|
\titlespacing*{\part}
|
|
{\z@}
|
|
{\z@\@plus1fil}
|
|
{\z@\@plus1fil}
|
|
|
|
\titlespacing*\chapter
|
|
{\z@}%
|
|
{50\p@}%
|
|
{\ttl@chapafter}%
|
|
|
|
\fi
|
|
|
|
\titleclass{\subsection} {straight}[\section]
|
|
\titleclass{\subsubsection}{straight}[\subsection]
|
|
\titleclass{\paragraph} {straight}[\subsubsection]
|
|
\titleclass{\subparagraph} {straight}[\paragraph]
|
|
|
|
\endinput
|