texlive[53170] Master: gettitlestring split from oberdiek (18dec19)

commits+karl at tug.org commits+karl at tug.org
Wed Dec 18 00:27:04 CET 2019


Revision: 53170
          http://tug.org/svn/texlive?view=revision&revision=53170
Author:   karl
Date:     2019-12-18 00:27:03 +0100 (Wed, 18 Dec 2019)
Log Message:
-----------
gettitlestring split from oberdiek (18dec19)

Modified Paths:
--------------
    trunk/Master/tlpkg/bin/tlpkg-ctan-check
    trunk/Master/tlpkg/tlpsrc/collection-latex.tlpsrc

Added Paths:
-----------
    trunk/Master/texmf-dist/doc/latex/gettitlestring/
    trunk/Master/texmf-dist/doc/latex/gettitlestring/README.md
    trunk/Master/texmf-dist/doc/latex/gettitlestring/gettitlestring.pdf
    trunk/Master/texmf-dist/source/latex/gettitlestring/
    trunk/Master/texmf-dist/source/latex/gettitlestring/gettitlestring.dtx
    trunk/Master/texmf-dist/tex/generic/gettitlestring/
    trunk/Master/texmf-dist/tex/generic/gettitlestring/gettitlestring.sty
    trunk/Master/tlpkg/tlpsrc/gettitlestring.tlpsrc

Added: trunk/Master/texmf-dist/doc/latex/gettitlestring/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/gettitlestring/README.md	                        (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/gettitlestring/README.md	2019-12-17 23:27:03 UTC (rev 53170)
@@ -0,0 +1,10 @@
+# gettitlestring
+
+gettitlestring for LaTeX
+
+The LaTeX package addresses packages that are dealing with
+references to titles (\section, \caption, ...).
+The package tries to remove \label and other
+commands from title strings.
+
+


Property changes on: trunk/Master/texmf-dist/doc/latex/gettitlestring/README.md
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/gettitlestring/gettitlestring.pdf
===================================================================
(Binary files differ)

Index: trunk/Master/texmf-dist/doc/latex/gettitlestring/gettitlestring.pdf
===================================================================
--- trunk/Master/texmf-dist/doc/latex/gettitlestring/gettitlestring.pdf	2019-12-17 23:25:18 UTC (rev 53169)
+++ trunk/Master/texmf-dist/doc/latex/gettitlestring/gettitlestring.pdf	2019-12-17 23:27:03 UTC (rev 53170)

Property changes on: trunk/Master/texmf-dist/doc/latex/gettitlestring/gettitlestring.pdf
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/pdf
\ No newline at end of property
Added: trunk/Master/texmf-dist/source/latex/gettitlestring/gettitlestring.dtx
===================================================================
--- trunk/Master/texmf-dist/source/latex/gettitlestring/gettitlestring.dtx	                        (rev 0)
+++ trunk/Master/texmf-dist/source/latex/gettitlestring/gettitlestring.dtx	2019-12-17 23:27:03 UTC (rev 53170)
@@ -0,0 +1,812 @@
+% \iffalse meta-comment
+%
+% File: gettitlestring.dtx
+% Version: 2019/12/15 v1.6
+% Info: Cleanup title references
+%
+% Copyright (C)
+%    2009, 2010 Heiko Oberdiek
+%    2016-2019 Oberdiek Package Support Group
+%    https://github.com/ho-tex/gettitlestring/issues
+%
+% 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. This version of this license is in
+%    https://www.latex-project.org/lppl/lppl-1-3c.txt
+% and the latest version of this license is in
+%    https://www.latex-project.org/lppl.txt
+% and version 1.3 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 Maintainers of this work are
+% Heiko Oberdiek and the Oberdiek Package Support Group
+% https://github.com/ho-tex/gettitlestring/issues
+%
+% The Base Interpreter refers to any `TeX-Format',
+% because some files are installed in TDS:tex/generic//.
+%
+% This work consists of the main source file gettitlestring.dtx
+% and the derived files
+%    gettitlestring.sty, gettitlestring.pdf, gettitlestring.ins,
+%    gettitlestring.drv, gettitlestring-test1.tex,
+%    gettitlestring-test2.tex.
+%
+% Distribution:
+%    CTAN:macros/latex/contrib/gettitlestring/gettitlestring.dtx
+%    CTAN:macros/latex/contrib/gettitlestring/gettitlestring.pdf
+%
+% Unpacking:
+%    (a) If gettitlestring.ins is present:
+%           tex gettitlestring.ins
+%    (b) Without gettitlestring.ins:
+%           tex gettitlestring.dtx
+%    (c) If you insist on using LaTeX
+%           latex \let\install=y\input{gettitlestring.dtx}
+%        (quote the arguments according to the demands of your shell)
+%
+% Documentation:
+%    (a) If gettitlestring.drv is present:
+%           latex gettitlestring.drv
+%    (b) Without gettitlestring.drv:
+%           latex gettitlestring.dtx; ...
+%    The class ltxdoc loads the configuration file ltxdoc.cfg
+%    if available. Here you can specify further options, e.g.
+%    use A4 as paper format:
+%       \PassOptionsToClass{a4paper}{article}
+%
+%    Programm calls to get the documentation (example):
+%       pdflatex gettitlestring.dtx
+%       makeindex -s gind.ist gettitlestring.idx
+%       pdflatex gettitlestring.dtx
+%       makeindex -s gind.ist gettitlestring.idx
+%       pdflatex gettitlestring.dtx
+%
+% Installation:
+%    TDS:tex/generic/gettitlestring/gettitlestring.sty
+%    TDS:doc/latex/gettitlestring/gettitlestring.pdf
+%    TDS:source/latex/gettitlestring/gettitlestring.dtx
+%
+%<*ignore>
+\begingroup
+  \catcode123=1 %
+  \catcode125=2 %
+  \def\x{LaTeX2e}%
+\expandafter\endgroup
+\ifcase 0\ifx\install y1\fi\expandafter
+         \ifx\csname processbatchFile\endcsname\relax\else1\fi
+         \ifx\fmtname\x\else 1\fi\relax
+\else\csname fi\endcsname
+%</ignore>
+%<*install>
+\input docstrip.tex
+\Msg{************************************************************************}
+\Msg{* Installation}
+\Msg{* Package: gettitlestring 2019/12/15 v1.6 Cleanup title references (HO)}
+\Msg{************************************************************************}
+
+\keepsilent
+\askforoverwritefalse
+
+\let\MetaPrefix\relax
+\preamble
+
+This is a generated file.
+
+Project: gettitlestring
+Version: 2019/12/15 v1.6
+
+Copyright (C)
+   2009, 2010 Heiko Oberdiek
+   2016-2019 Oberdiek Package Support 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. This version of this license is in
+   https://www.latex-project.org/lppl/lppl-1-3c.txt
+and the latest version of this license is in
+   https://www.latex-project.org/lppl.txt
+and version 1.3 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 Maintainers of this work are
+Heiko Oberdiek and the Oberdiek Package Support Group
+https://github.com/ho-tex/gettitlestring/issues
+
+
+The Base Interpreter refers to any `TeX-Format',
+because some files are installed in TDS:tex/generic//.
+
+This work consists of the main source file gettitlestring.dtx
+and the derived files
+   gettitlestring.sty, gettitlestring.pdf, gettitlestring.ins,
+   gettitlestring.drv, gettitlestring-test1.tex,
+   gettitlestring-test2.tex.
+
+\endpreamble
+\let\MetaPrefix\DoubleperCent
+
+\generate{%
+  \file{gettitlestring.ins}{\from{gettitlestring.dtx}{install}}%
+  \file{gettitlestring.drv}{\from{gettitlestring.dtx}{driver}}%
+  \usedir{tex/generic/gettitlestring}%
+  \file{gettitlestring.sty}{\from{gettitlestring.dtx}{package}}%
+}
+
+\catcode32=13\relax% active space
+\let =\space%
+\Msg{************************************************************************}
+\Msg{*}
+\Msg{* To finish the installation you have to move the following}
+\Msg{* file into a directory searched by TeX:}
+\Msg{*}
+\Msg{*     gettitlestring.sty}
+\Msg{*}
+\Msg{* To produce the documentation run the file `gettitlestring.drv'}
+\Msg{* through LaTeX.}
+\Msg{*}
+\Msg{* Happy TeXing!}
+\Msg{*}
+\Msg{************************************************************************}
+
+\endbatchfile
+%</install>
+%<*ignore>
+\fi
+%</ignore>
+%<*driver>
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesFile{gettitlestring.drv}%
+  [2019/12/15 v1.6 Cleanup title references (HO)]%
+\documentclass{ltxdoc}
+\usepackage{holtxdoc}[2011/11/22]
+\begin{document}
+  \DocInput{gettitlestring.dtx}%
+\end{document}
+%</driver>
+% \fi
+%
+%
+%
+% \GetFileInfo{gettitlestring.drv}
+%
+% \title{The \xpackage{gettitlestring} package}
+% \date{2019/12/15 v1.6}
+% \author{Heiko Oberdiek\thanks
+% {Please report any issues at \url{https://github.com/ho-tex/gettitlestring/issues}}}
+%
+% \maketitle
+%
+% \begin{abstract}
+% The \LaTeX\ package addresses packages that are dealing with
+% references to titles (\cs{section}, \cs{caption}, \dots).
+% The package tries to remove \cs{label} and other
+% commands from title strings.
+% \end{abstract}
+%
+% \tableofcontents
+%
+% \section{Documentation}
+%
+% \subsection{Macros}
+%
+% \begin{declcs}{GetTitleStringSetup} \M{key value list}
+% \end{declcs}
+% The options are given as comma separated key value pairs.
+% See section \ref{sec:options}.
+%
+% \begin{declcs}{GetTitleString} \M{text}\\
+% \cs{GetTitleStringExpand} \M{text}\\
+% \cs{GetTitleStringNonExpand} \M{text}
+% \end{declcs}
+% Macro \cs{GetTitleString} tries to remove unwanted stuff from \meta{text}
+% the result is stored in Macro \cs{GetTitleStringResult}.
+% Two methods are available:
+% \begin{description}
+% \item[\cs{GetTitleStringExpand}:]
+% The \meta{text} is expanded in a context where the unwanted
+% macros are redefined to remove themselves.
+% This is the method used in packages \xpackage{titleref}~\cite{titleref},
+% \xpackage{zref-titleref}~\cite{zref}
+% or class \xclass{memoir}~\cite{memoir}.
+% \cs{protect} is supported, but fragile material might break.
+% \item[\cs{GetTitleStringNonExpand}:]
+% The \meta{text} is not expanded. Thus the removal of unwanted
+% material is more difficult. It is especially removed at the
+% start of the \meta{text} and spaces are removed from the end.
+% Currently only \cs{label} is removed in the whole string,
+% if it is not hidden inside curly braces or part of macro
+% definitions. Thus the removal of unwanted stuff might not be
+% complete, but fragile material will not break.
+% (But the result string can break at a later time, of course).
+% \end{description}
+% Option \xoption{expand} controls which method is used by
+% macro \cs{GetTitleString}.
+%
+% \begin{declcs}{GetTitleStringDisableCommands} \M{code}
+% \end{declcs}
+% The \meta{code} is called right before the
+% text is expanded in \cs{GetTitleStringExpand}.
+% Additional definitions can be given for macros that
+% should be removed.
+% Keep in mind that expansion means that the definitions
+% must work in expandable context. Macros like
+% \cs{@ifstar} or \cs{@ifnextchar} or optional arguments
+% will not work. The macro names in \meta{code} may contain
+% the at sign |@|, it has catcode 11 (letter).
+%
+% \subsection{Options}\label{sec:options}
+%
+% \begin{description}
+% \item[\xoption{expand}:] Boolean option, takes values |true| or |false|.
+% No value means |true|. The option specifies the method to remove
+% unwanted stuff from the title string, see below.
+% \end{description}
+% Options can be set at the following places:
+% \begin{itemize}
+% \item \cs{usepackage}
+% \item Configuration file \xfile{gettitlestring.cfg}.
+% \item \cs{GetTitleStringSetup}
+% \end{itemize}
+%
+% \StopEventually{
+% }
+%
+% \section{Implementation}
+%    \begin{macrocode}
+%<*package>
+%    \end{macrocode}
+%    Reload check, especially if the package is not used with \LaTeX.
+%    \begin{macrocode}
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode35=6 % #
+  \catcode39=12 % '
+  \catcode44=12 % ,
+  \catcode45=12 % -
+  \catcode46=12 % .
+  \catcode58=12 % :
+  \catcode64=11 % @
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \expandafter\let\expandafter\x\csname ver at gettitlestring.sty\endcsname
+  \ifx\x\relax % plain-TeX, first loading
+  \else
+    \def\empty{}%
+    \ifx\x\empty % LaTeX, first loading,
+      % variable is initialized, but \ProvidesPackage not yet seen
+    \else
+      \expandafter\ifx\csname PackageInfo\endcsname\relax
+        \def\x#1#2{%
+          \immediate\write-1{Package #1 Info: #2.}%
+        }%
+      \else
+        \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+      \fi
+      \x{gettitlestring}{The package is already loaded}%
+      \aftergroup\endinput
+    \fi
+  \fi
+\endgroup%
+%    \end{macrocode}
+%    Package identification:
+%    \begin{macrocode}
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode35=6 % #
+  \catcode39=12 % '
+  \catcode40=12 % (
+  \catcode41=12 % )
+  \catcode44=12 % ,
+  \catcode45=12 % -
+  \catcode46=12 % .
+  \catcode47=12 % /
+  \catcode58=12 % :
+  \catcode64=11 % @
+  \catcode91=12 % [
+  \catcode93=12 % ]
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \expandafter\ifx\csname ProvidesPackage\endcsname\relax
+    \def\x#1#2#3[#4]{\endgroup
+      \immediate\write-1{Package: #3 #4}%
+      \xdef#1{#4}%
+    }%
+  \else
+    \def\x#1#2[#3]{\endgroup
+      #2[{#3}]%
+      \ifx#1\@undefined
+        \xdef#1{#3}%
+      \fi
+      \ifx#1\relax
+        \xdef#1{#3}%
+      \fi
+    }%
+  \fi
+\expandafter\x\csname ver at gettitlestring.sty\endcsname
+\ProvidesPackage{gettitlestring}%
+  [2019/12/15 v1.6 Cleanup title references (HO)]%
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \catcode64=11 % @
+  \def\x{\endgroup
+    \expandafter\edef\csname GTS at AtEnd\endcsname{%
+      \endlinechar=\the\endlinechar\relax
+      \catcode13=\the\catcode13\relax
+      \catcode32=\the\catcode32\relax
+      \catcode35=\the\catcode35\relax
+      \catcode61=\the\catcode61\relax
+      \catcode64=\the\catcode64\relax
+      \catcode123=\the\catcode123\relax
+      \catcode125=\the\catcode125\relax
+    }%
+  }%
+\x\catcode61\catcode48\catcode32=10\relax%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\def\TMP at EnsureCode#1#2{%
+  \edef\GTS at AtEnd{%
+    \GTS at AtEnd
+    \catcode#1=\the\catcode#1\relax
+  }%
+  \catcode#1=#2\relax
+}
+\TMP at EnsureCode{42}{12}% *
+\TMP at EnsureCode{44}{12}% ,
+\TMP at EnsureCode{45}{12}% -
+\TMP at EnsureCode{46}{12}% .
+\TMP at EnsureCode{47}{12}% /
+\TMP at EnsureCode{91}{12}% [
+\TMP at EnsureCode{93}{12}% ]
+\edef\GTS at AtEnd{\GTS at AtEnd\noexpand\endinput}
+%    \end{macrocode}
+%
+% \subsection{Options}
+%
+%    \begin{macrocode}
+\RequirePackage{kvoptions}[2009/07/17]
+\SetupKeyvalOptions{%
+  family=gettitlestring,%
+  prefix=GTS@%
+}
+\newcommand*{\GetTitleStringSetup}{%
+  \setkeys{gettitlestring}%
+}
+\DeclareBoolOption{expand}
+\InputIfFileExists{gettitlestring.cfg}{}{}
+\ProcessKeyvalOptions*\relax
+%    \end{macrocode}
+%
+% \subsection{\cs{GetTitleString}}
+%
+%    \begin{macro}{\GetTitleString}
+%    \begin{macrocode}
+\newcommand*{\GetTitleString}{%
+  \ifGTS at expand
+    \expandafter\GetTitleStringExpand
+  \else
+    \expandafter\GetTitleStringNonExpand
+  \fi
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\GetTitleStringExpand}
+%    \begin{macrocode}
+\newcommand{\GetTitleStringExpand}[1]{%
+  \def\GetTitleStringResult{#1}%
+  \begingroup
+    \GTS at DisablePredefinedCmds
+    \GTS at DisableHook
+    \edef\x{\endgroup
+      \noexpand\def\noexpand\GetTitleStringResult{%
+        \GetTitleStringResult
+      }%
+    }%
+  \x
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\GetTitleString}
+%    \begin{macrocode}
+\newcommand{\GetTitleStringNonExpand}[1]{%
+  \def\GetTitleStringResult{#1}%
+  \global\let\GTS at GlobalString\GetTitleStringResult
+  \begingroup
+    \GTS at RemoveLeft
+    \GTS at RemoveRight
+  \endgroup
+  \let\GetTitleStringResult\GTS at GlobalString
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+% \subsubsection{Expand method}
+%
+%    \begin{macro}{\GTS at DisablePredefinedCmds}
+%    \begin{macrocode}
+\def\GTS at DisablePredefinedCmds{%
+  \let\label\@gobble
+  \let\zlabel\@gobble
+  \let\zref at label\@gobble
+  \let\zref at labelbylist\@gobbletwo
+  \let\zref at labelbyprops\@gobbletwo
+  \let\index\@gobble
+  \let\glossary\@gobble
+  \let\markboth\@gobbletwo
+  \let\@mkboth\@gobbletwo
+  \let\markright\@gobble
+  \let\phantomsection\@empty
+  \def\addcontentsline{\expandafter\@gobble\@gobbletwo}%
+  \let\raggedright\@empty
+  \let\raggedleft\@empty
+  \let\centering\@empty
+  \let\protect\@unexpandable at protect
+  \let\enit at format\@empty % package enumitem
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+%    \begin{macro}{\GTS at DisableHook}
+%    \begin{macrocode}
+\providecommand*{\GTS at DisableHook}{}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\GetTitleStringDisableCommands}
+%    \begin{macrocode}
+\def\GetTitleStringDisableCommands{%
+  \begingroup
+    \makeatletter
+    \GTS at DisableCommands
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\GTS at DisableCommands}
+%    \begin{macrocode}
+\long\def\GTS at DisableCommands#1{%
+    \toks0=\expandafter{\GTS at DisableHook}%
+    \toks2={#1}%
+    \xdef\GTS at GlobalString{\the\toks0 \the\toks2}%
+  \endgroup
+  \let\GTS at DisableHook\GTS at GlobalString
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+% \subsubsection{Non-expand method}
+%
+%    \begin{macrocode}
+\def\GTS at RemoveLeft{%
+  \toks@\expandafter\expandafter\expandafter{%
+    \expandafter\GTS at Car\GTS at GlobalString{}{}{}{}\GTS at Nil
+  }%
+  \edef\GTS at Token{\the\toks@}%
+  \GTS at PredefinedLeftCmds
+  \expandafter\futurelet\expandafter\GTS at Token
+  \expandafter\GTS at TestLeftSpace\GTS at GlobalString\GTS at Nil
+  \GTS at End
+}
+\def\GTS at End{}
+\long\def\GTS at TestLeft#1#2{%
+  \def\GTS at temp{#1}%
+  \ifx\GTS at temp\GTS at Token
+    \toks@\expandafter\expandafter\expandafter{%
+      \expandafter#2\GTS at GlobalString\GTS at Nil
+    }%
+    \expandafter\GTS at TestLeftEnd
+  \fi
+}
+\long\def\GTS at TestLeftEnd#1\GTS at End{%
+  \xdef\GTS at GlobalString{\the\toks@}%
+  \GTS at RemoveLeft
+}
+\long\def\GTS at Car#1#2\GTS at Nil{#1}
+\long\def\GTS at Cdr#1#2\GTS at Nil{#2}
+\long\def\GTS at CdrTwo#1#2#3\GTS at Nil{#3}
+\long\def\GTS at CdrThree#1#2#3#4\GTS at Nil{#4}
+\long\def\GTS at CdrFour#1#2#3#4#5\GTS at Nil{#5}
+\long\def\GTS at TestLeftSpace#1\GTS at Nil{%
+  \ifx\GTS at Token\@sptoken
+    \toks@\expandafter{%
+      \romannumeral-0\GTS at GlobalString
+    }%
+    \expandafter\GTS at TestLeftEnd
+  \fi
+}
+%    \end{macrocode}
+%    \begin{macro}{\GTS at PredefinedLeftCmds}
+%    \begin{macrocode}
+\def\GTS at PredefinedLeftCmds{%
+  \GTS at TestLeft\Hy at phantomsection\GTS at Cdr
+  \GTS at TestLeft\Hy at SectionAnchor\GTS at Cdr
+  \GTS at TestLeft\Hy at SectionAnchorHref\GTS at CdrTwo
+  \GTS at TestLeft\label\GTS at CdrTwo
+  \GTS at TestLeft\zlabel\GTS at CdrTwo
+  \GTS at TestLeft\index\GTS at CdrTwo
+  \GTS at TestLeft\glossary\GTS at CdrTwo
+  \GTS at TestLeft\markboth\GTS at CdrThree
+  \GTS at TestLeft\@mkboth\GTS at CdrThree
+  \GTS at TestLeft\addcontentsline\GTS at CdrFour
+  \GTS at TestLeft\enit at format\GTS at Cdr % package enumitem
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+%    \begin{macrocode}
+\def\GTS at RemoveRight{%
+  \toks@{}%
+  \expandafter\GTS at TestRightLabel\GTS at GlobalString
+      \label{}\GTS at Nil\@nil
+  \GTS at RemoveRightSpace
+}
+\begingroup
+  \def\GTS at temp#1{\endgroup
+    \def\GTS at RemoveRightSpace{%
+      \expandafter\GTS at TestRightSpace\GTS at GlobalString
+          \GTS at Nil#1\GTS at Nil\@nil
+    }%
+  }%
+\GTS at temp{ }
+\def\GTS at TestRightSpace#1 \GTS at Nil#2\@nil{%
+  \ifx\relax#2\relax
+  \else
+    \gdef\GTS at GlobalString{#1}%
+    \expandafter\GTS at RemoveRightSpace
+  \fi
+}
+\def\GTS at TestRightLabel#1\label#2#3\GTS at Nil#4\@nil{%
+  \def\GTS at temp{#3}%
+  \ifx\GTS at temp\@empty
+    \expandafter\gdef\expandafter\GTS at GlobalString\expandafter{%
+      \the\toks@
+      #1%
+    }%
+    \expandafter\@gobble
+  \else
+    \expandafter\@firstofone
+  \fi
+  {%
+    \toks@\expandafter{\the\toks@#1}%
+    \GTS at TestRightLabel#3\GTS at Nil\@nil
+  }%
+}
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\GTS at AtEnd%
+%</package>
+%    \end{macrocode}
+%% \section{Installation}
+%
+% \subsection{Download}
+%
+% \paragraph{Package.} This package is available on
+% CTAN\footnote{\CTANpkg{gettitlestring}}:
+% \begin{description}
+% \item[\CTAN{macros/latex/contrib/gettitlestring/gettitlestring.dtx}] The source file.
+% \item[\CTAN{macros/latex/contrib/gettitlestring/gettitlestring.pdf}] Documentation.
+% \end{description}
+%
+%
+% \paragraph{Bundle.} All the packages of the bundle `oberdiek'
+% are also available in a TDS compliant ZIP archive. There
+% the packages are already unpacked and the documentation files
+% are generated. The files and directories obey the TDS standard.
+% \begin{description}
+% \item[\CTANinstall{install/macros/latex/contrib/gettitlestring.tds.zip}]
+% \end{description}
+% \emph{TDS} refers to the standard ``A Directory Structure
+% for \TeX\ Files'' (\CTANpkg{tds}). Directories
+% with \xfile{texmf} in their name are usually organized this way.
+%
+% \subsection{Bundle installation}
+%
+% \paragraph{Unpacking.} Unpack the \xfile{oberdiek.tds.zip} in the
+% TDS tree (also known as \xfile{texmf} tree) of your choice.
+% Example (linux):
+% \begin{quote}
+%   |unzip oberdiek.tds.zip -d ~/texmf|
+% \end{quote}
+%
+% \subsection{Package installation}
+%
+% \paragraph{Unpacking.} The \xfile{.dtx} file is a self-extracting
+% \docstrip\ archive. The files are extracted by running the
+% \xfile{.dtx} through \plainTeX:
+% \begin{quote}
+%   \verb|tex gettitlestring.dtx|
+% \end{quote}
+%
+% \paragraph{TDS.} Now the different files must be moved into
+% the different directories in your installation TDS tree
+% (also known as \xfile{texmf} tree):
+% \begin{quote}
+% \def\t{^^A
+% \begin{tabular}{@{}>{\ttfamily}l@{ $\rightarrow$ }>{\ttfamily}l@{}}
+%   gettitlestring.sty & tex/generic/gettitlestring/gettitlestring.sty\\
+%   gettitlestring.pdf & doc/latex/gettitlestring/gettitlestring.pdf\\
+%   gettitlestring.dtx & source/latex/gettitlestring/gettitlestring.dtx\\
+% \end{tabular}^^A
+% }^^A
+% \sbox0{\t}^^A
+% \ifdim\wd0>\linewidth
+%   \begingroup
+%     \advance\linewidth by\leftmargin
+%     \advance\linewidth by\rightmargin
+%   \edef\x{\endgroup
+%     \def\noexpand\lw{\the\linewidth}^^A
+%   }\x
+%   \def\lwbox{^^A
+%     \leavevmode
+%     \hbox to \linewidth{^^A
+%       \kern-\leftmargin\relax
+%       \hss
+%       \usebox0
+%       \hss
+%       \kern-\rightmargin\relax
+%     }^^A
+%   }^^A
+%   \ifdim\wd0>\lw
+%     \sbox0{\small\t}^^A
+%     \ifdim\wd0>\linewidth
+%       \ifdim\wd0>\lw
+%         \sbox0{\footnotesize\t}^^A
+%         \ifdim\wd0>\linewidth
+%           \ifdim\wd0>\lw
+%             \sbox0{\scriptsize\t}^^A
+%             \ifdim\wd0>\linewidth
+%               \ifdim\wd0>\lw
+%                 \sbox0{\tiny\t}^^A
+%                 \ifdim\wd0>\linewidth
+%                   \lwbox
+%                 \else
+%                   \usebox0
+%                 \fi
+%               \else
+%                 \lwbox
+%               \fi
+%             \else
+%               \usebox0
+%             \fi
+%           \else
+%             \lwbox
+%           \fi
+%         \else
+%           \usebox0
+%         \fi
+%       \else
+%         \lwbox
+%       \fi
+%     \else
+%       \usebox0
+%     \fi
+%   \else
+%     \lwbox
+%   \fi
+% \else
+%   \usebox0
+% \fi
+% \end{quote}
+% If you have a \xfile{docstrip.cfg} that configures and enables \docstrip's
+% TDS installing feature, then some files can already be in the right
+% place, see the documentation of \docstrip.
+%
+% \subsection{Refresh file name databases}
+%
+% If your \TeX~distribution
+% (\TeX\,Live, \mikTeX, \dots) relies on file name databases, you must refresh
+% these. For example, \TeX\,Live\ users run \verb|texhash| or
+% \verb|mktexlsr|.
+%
+% \subsection{Some details for the interested}
+%
+% \paragraph{Unpacking with \LaTeX.}
+% The \xfile{.dtx} chooses its action depending on the format:
+% \begin{description}
+% \item[\plainTeX:] Run \docstrip\ and extract the files.
+% \item[\LaTeX:] Generate the documentation.
+% \end{description}
+% If you insist on using \LaTeX\ for \docstrip\ (really,
+% \docstrip\ does not need \LaTeX), then inform the autodetect routine
+% about your intention:
+% \begin{quote}
+%   \verb|latex \let\install=y\input{gettitlestring.dtx}|
+% \end{quote}
+% Do not forget to quote the argument according to the demands
+% of your shell.
+%
+% \paragraph{Generating the documentation.}
+% You can use both the \xfile{.dtx} or the \xfile{.drv} to generate
+% the documentation. The process can be configured by the
+% configuration file \xfile{ltxdoc.cfg}. For instance, put this
+% line into this file, if you want to have A4 as paper format:
+% \begin{quote}
+%   \verb|\PassOptionsToClass{a4paper}{article}|
+% \end{quote}
+% An example follows how to generate the
+% documentation with pdf\LaTeX:
+% \begin{quote}
+%\begin{verbatim}
+%pdflatex gettitlestring.dtx
+%makeindex -s gind.ist gettitlestring.idx
+%pdflatex gettitlestring.dtx
+%makeindex -s gind.ist gettitlestring.idx
+%pdflatex gettitlestring.dtx
+%\end{verbatim}
+% \end{quote}
+%
+% \begin{thebibliography}{9}
+%
+% \bibitem{memoir}
+% Peter Wilson, Lars Madsen:
+% \textit{The Memoir Class};
+% 2009/11/17 v1.61803398c;
+% \CTANpkg{memoir}
+%
+% \bibitem{titleref}
+% Donald Arsenau:
+% \textit{Titleref.sty};
+% 2001/04/05 ver 3.1;
+% \CTANpkg{titleref}
+%
+% \bibitem{zref}
+% Heiko Oberdiek:
+% \textit{The \xpackage{zref} package};
+% 2009/12/08 v2.7;
+% \CTANpkg{zref}
+%
+% \end{thebibliography}
+%
+% \begin{History}
+%   \begin{Version}{2009/12/08 v1.0}
+%   \item
+%     The first version.
+%   \end{Version}
+%   \begin{Version}{2009/12/12 v1.1}
+%   \item
+%     Short info shortened.
+%   \end{Version}
+%   \begin{Version}{2009/12/13 v1.2}
+%   \item
+%     Forgotten third argument for \cs{InputIfFileExists} added.
+%   \end{Version}
+%   \begin{Version}{2009/12/18 v1.3}
+%   \item
+%     \cs{Hy at SectionAnchorHref} added for filtering
+%     (hyperref 2009/12/18 v6.79w).
+%   \end{Version}
+%   \begin{Version}{2010/12/03 v1.4}
+%   \item
+%     Support of package \xpackage{enumitem}: removing
+%     \cs{enit at format} from title string (problem report by GL).
+%   \end{Version}
+%   \begin{Version}{2016/05/16 v1.5}
+%   \item
+%     Documentation updates.
+%   \end{Version}
+%   \begin{Version}{2019/12/15 v1.6}
+%   \item
+%     Documentation updates.
+%   \end{Version}
+% \end{History}
+%
+% \PrintIndex
+%
+% \Finale
+\endinput


Property changes on: trunk/Master/texmf-dist/source/latex/gettitlestring/gettitlestring.dtx
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/tex/generic/gettitlestring/gettitlestring.sty
===================================================================
--- trunk/Master/texmf-dist/tex/generic/gettitlestring/gettitlestring.sty	                        (rev 0)
+++ trunk/Master/texmf-dist/tex/generic/gettitlestring/gettitlestring.sty	2019-12-17 23:27:03 UTC (rev 53170)
@@ -0,0 +1,313 @@
+%%
+%% This is file `gettitlestring.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% gettitlestring.dtx  (with options: `package')
+%% 
+%% This is a generated file.
+%% 
+%% Project: gettitlestring
+%% Version: 2019/12/15 v1.6
+%% 
+%% Copyright (C)
+%%    2009, 2010 Heiko Oberdiek
+%%    2016-2019 Oberdiek Package Support 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. This version of this license is in
+%%    https://www.latex-project.org/lppl/lppl-1-3c.txt
+%% and the latest version of this license is in
+%%    https://www.latex-project.org/lppl.txt
+%% and version 1.3 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 Maintainers of this work are
+%% Heiko Oberdiek and the Oberdiek Package Support Group
+%% https://github.com/ho-tex/gettitlestring/issues
+%% 
+%% 
+%% The Base Interpreter refers to any `TeX-Format',
+%% because some files are installed in TDS:tex/generic//.
+%% 
+%% This work consists of the main source file gettitlestring.dtx
+%% and the derived files
+%%    gettitlestring.sty, gettitlestring.pdf, gettitlestring.ins,
+%%    gettitlestring.drv, gettitlestring-test1.tex,
+%%    gettitlestring-test2.tex.
+%% 
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode35=6 % #
+  \catcode39=12 % '
+  \catcode44=12 % ,
+  \catcode45=12 % -
+  \catcode46=12 % .
+  \catcode58=12 % :
+  \catcode64=11 % @
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \expandafter\let\expandafter\x\csname ver at gettitlestring.sty\endcsname
+  \ifx\x\relax % plain-TeX, first loading
+  \else
+    \def\empty{}%
+    \ifx\x\empty % LaTeX, first loading,
+      % variable is initialized, but \ProvidesPackage not yet seen
+    \else
+      \expandafter\ifx\csname PackageInfo\endcsname\relax
+        \def\x#1#2{%
+          \immediate\write-1{Package #1 Info: #2.}%
+        }%
+      \else
+        \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+      \fi
+      \x{gettitlestring}{The package is already loaded}%
+      \aftergroup\endinput
+    \fi
+  \fi
+\endgroup%
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode35=6 % #
+  \catcode39=12 % '
+  \catcode40=12 % (
+  \catcode41=12 % )
+  \catcode44=12 % ,
+  \catcode45=12 % -
+  \catcode46=12 % .
+  \catcode47=12 % /
+  \catcode58=12 % :
+  \catcode64=11 % @
+  \catcode91=12 % [
+  \catcode93=12 % ]
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \expandafter\ifx\csname ProvidesPackage\endcsname\relax
+    \def\x#1#2#3[#4]{\endgroup
+      \immediate\write-1{Package: #3 #4}%
+      \xdef#1{#4}%
+    }%
+  \else
+    \def\x#1#2[#3]{\endgroup
+      #2[{#3}]%
+      \ifx#1\@undefined
+        \xdef#1{#3}%
+      \fi
+      \ifx#1\relax
+        \xdef#1{#3}%
+      \fi
+    }%
+  \fi
+\expandafter\x\csname ver at gettitlestring.sty\endcsname
+\ProvidesPackage{gettitlestring}%
+  [2019/12/15 v1.6 Cleanup title references (HO)]%
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \catcode64=11 % @
+  \def\x{\endgroup
+    \expandafter\edef\csname GTS at AtEnd\endcsname{%
+      \endlinechar=\the\endlinechar\relax
+      \catcode13=\the\catcode13\relax
+      \catcode32=\the\catcode32\relax
+      \catcode35=\the\catcode35\relax
+      \catcode61=\the\catcode61\relax
+      \catcode64=\the\catcode64\relax
+      \catcode123=\the\catcode123\relax
+      \catcode125=\the\catcode125\relax
+    }%
+  }%
+\x\catcode61\catcode48\catcode32=10\relax%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\def\TMP at EnsureCode#1#2{%
+  \edef\GTS at AtEnd{%
+    \GTS at AtEnd
+    \catcode#1=\the\catcode#1\relax
+  }%
+  \catcode#1=#2\relax
+}
+\TMP at EnsureCode{42}{12}% *
+\TMP at EnsureCode{44}{12}% ,
+\TMP at EnsureCode{45}{12}% -
+\TMP at EnsureCode{46}{12}% .
+\TMP at EnsureCode{47}{12}% /
+\TMP at EnsureCode{91}{12}% [
+\TMP at EnsureCode{93}{12}% ]
+\edef\GTS at AtEnd{\GTS at AtEnd\noexpand\endinput}
+\RequirePackage{kvoptions}[2009/07/17]
+\SetupKeyvalOptions{%
+  family=gettitlestring,%
+  prefix=GTS@%
+}
+\newcommand*{\GetTitleStringSetup}{%
+  \setkeys{gettitlestring}%
+}
+\DeclareBoolOption{expand}
+\InputIfFileExists{gettitlestring.cfg}{}{}
+\ProcessKeyvalOptions*\relax
+\newcommand*{\GetTitleString}{%
+  \ifGTS at expand
+    \expandafter\GetTitleStringExpand
+  \else
+    \expandafter\GetTitleStringNonExpand
+  \fi
+}
+\newcommand{\GetTitleStringExpand}[1]{%
+  \def\GetTitleStringResult{#1}%
+  \begingroup
+    \GTS at DisablePredefinedCmds
+    \GTS at DisableHook
+    \edef\x{\endgroup
+      \noexpand\def\noexpand\GetTitleStringResult{%
+        \GetTitleStringResult
+      }%
+    }%
+  \x
+}
+\newcommand{\GetTitleStringNonExpand}[1]{%
+  \def\GetTitleStringResult{#1}%
+  \global\let\GTS at GlobalString\GetTitleStringResult
+  \begingroup
+    \GTS at RemoveLeft
+    \GTS at RemoveRight
+  \endgroup
+  \let\GetTitleStringResult\GTS at GlobalString
+}
+\def\GTS at DisablePredefinedCmds{%
+  \let\label\@gobble
+  \let\zlabel\@gobble
+  \let\zref at label\@gobble
+  \let\zref at labelbylist\@gobbletwo
+  \let\zref at labelbyprops\@gobbletwo
+  \let\index\@gobble
+  \let\glossary\@gobble
+  \let\markboth\@gobbletwo
+  \let\@mkboth\@gobbletwo
+  \let\markright\@gobble
+  \let\phantomsection\@empty
+  \def\addcontentsline{\expandafter\@gobble\@gobbletwo}%
+  \let\raggedright\@empty
+  \let\raggedleft\@empty
+  \let\centering\@empty
+  \let\protect\@unexpandable at protect
+  \let\enit at format\@empty % package enumitem
+}
+\providecommand*{\GTS at DisableHook}{}
+\def\GetTitleStringDisableCommands{%
+  \begingroup
+    \makeatletter
+    \GTS at DisableCommands
+}
+\long\def\GTS at DisableCommands#1{%
+    \toks0=\expandafter{\GTS at DisableHook}%
+    \toks2={#1}%
+    \xdef\GTS at GlobalString{\the\toks0 \the\toks2}%
+  \endgroup
+  \let\GTS at DisableHook\GTS at GlobalString
+}
+\def\GTS at RemoveLeft{%
+  \toks@\expandafter\expandafter\expandafter{%
+    \expandafter\GTS at Car\GTS at GlobalString{}{}{}{}\GTS at Nil
+  }%
+  \edef\GTS at Token{\the\toks@}%
+  \GTS at PredefinedLeftCmds
+  \expandafter\futurelet\expandafter\GTS at Token
+  \expandafter\GTS at TestLeftSpace\GTS at GlobalString\GTS at Nil
+  \GTS at End
+}
+\def\GTS at End{}
+\long\def\GTS at TestLeft#1#2{%
+  \def\GTS at temp{#1}%
+  \ifx\GTS at temp\GTS at Token
+    \toks@\expandafter\expandafter\expandafter{%
+      \expandafter#2\GTS at GlobalString\GTS at Nil
+    }%
+    \expandafter\GTS at TestLeftEnd
+  \fi
+}
+\long\def\GTS at TestLeftEnd#1\GTS at End{%
+  \xdef\GTS at GlobalString{\the\toks@}%
+  \GTS at RemoveLeft
+}
+\long\def\GTS at Car#1#2\GTS at Nil{#1}
+\long\def\GTS at Cdr#1#2\GTS at Nil{#2}
+\long\def\GTS at CdrTwo#1#2#3\GTS at Nil{#3}
+\long\def\GTS at CdrThree#1#2#3#4\GTS at Nil{#4}
+\long\def\GTS at CdrFour#1#2#3#4#5\GTS at Nil{#5}
+\long\def\GTS at TestLeftSpace#1\GTS at Nil{%
+  \ifx\GTS at Token\@sptoken
+    \toks@\expandafter{%
+      \romannumeral-0\GTS at GlobalString
+    }%
+    \expandafter\GTS at TestLeftEnd
+  \fi
+}
+\def\GTS at PredefinedLeftCmds{%
+  \GTS at TestLeft\Hy at phantomsection\GTS at Cdr
+  \GTS at TestLeft\Hy at SectionAnchor\GTS at Cdr
+  \GTS at TestLeft\Hy at SectionAnchorHref\GTS at CdrTwo
+  \GTS at TestLeft\label\GTS at CdrTwo
+  \GTS at TestLeft\zlabel\GTS at CdrTwo
+  \GTS at TestLeft\index\GTS at CdrTwo
+  \GTS at TestLeft\glossary\GTS at CdrTwo
+  \GTS at TestLeft\markboth\GTS at CdrThree
+  \GTS at TestLeft\@mkboth\GTS at CdrThree
+  \GTS at TestLeft\addcontentsline\GTS at CdrFour
+  \GTS at TestLeft\enit at format\GTS at Cdr % package enumitem
+}
+\def\GTS at RemoveRight{%
+  \toks@{}%
+  \expandafter\GTS at TestRightLabel\GTS at GlobalString
+      \label{}\GTS at Nil\@nil
+  \GTS at RemoveRightSpace
+}
+\begingroup
+  \def\GTS at temp#1{\endgroup
+    \def\GTS at RemoveRightSpace{%
+      \expandafter\GTS at TestRightSpace\GTS at GlobalString
+          \GTS at Nil#1\GTS at Nil\@nil
+    }%
+  }%
+\GTS at temp{ }
+\def\GTS at TestRightSpace#1 \GTS at Nil#2\@nil{%
+  \ifx\relax#2\relax
+  \else
+    \gdef\GTS at GlobalString{#1}%
+    \expandafter\GTS at RemoveRightSpace
+  \fi
+}
+\def\GTS at TestRightLabel#1\label#2#3\GTS at Nil#4\@nil{%
+  \def\GTS at temp{#3}%
+  \ifx\GTS at temp\@empty
+    \expandafter\gdef\expandafter\GTS at GlobalString\expandafter{%
+      \the\toks@
+      #1%
+    }%
+    \expandafter\@gobble
+  \else
+    \expandafter\@firstofone
+  \fi
+  {%
+    \toks@\expandafter{\the\toks@#1}%
+    \GTS at TestRightLabel#3\GTS at Nil\@nil
+  }%
+}
+\GTS at AtEnd%
+%% \section{Installation}
+\endinput
+%%
+%% End of file `gettitlestring.sty'.


Property changes on: trunk/Master/texmf-dist/tex/generic/gettitlestring/gettitlestring.sty
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Modified: trunk/Master/tlpkg/bin/tlpkg-ctan-check
===================================================================
--- trunk/Master/tlpkg/bin/tlpkg-ctan-check	2019-12-17 23:25:18 UTC (rev 53169)
+++ trunk/Master/tlpkg/bin/tlpkg-ctan-check	2019-12-17 23:27:03 UTC (rev 53170)
@@ -318,7 +318,7 @@
     gender geschichtsfrkl genealogy genealogytree gene-logic
     genmisc genmpage gentium-tug gentle gentombow geometry geometry-de
     german germbib germkorr
-    getfiledate getitems getmap getoptk gfnotation
+    getfiledate getitems getmap getoptk gettitlestring gfnotation
     gfsartemisia gfsbaskerville gfsbodoni gfscomplutum gfsdidot gfsdidotclassic
     gfsneohellenic gfsneohellenicmath
     gfsporson gfssolomos

Modified: trunk/Master/tlpkg/tlpsrc/collection-latex.tlpsrc
===================================================================
--- trunk/Master/tlpkg/tlpsrc/collection-latex.tlpsrc	2019-12-17 23:25:18 UTC (rev 53169)
+++ trunk/Master/tlpkg/tlpsrc/collection-latex.tlpsrc	2019-12-17 23:27:03 UTC (rev 53170)
@@ -20,6 +20,7 @@
 depend fancyhdr
 depend fix2col
 depend geometry
+depend gettitlestring
 depend graphics
 depend graphics-cfg
 depend grfext

Added: trunk/Master/tlpkg/tlpsrc/gettitlestring.tlpsrc
===================================================================


More information about the tex-live-commits mailing list