From bb76a9ac936acff10cbcca285f378a397668a069 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 11 Apr 2011 17:57:51 +0000 Subject: path (8apr11) git-svn-id: svn://tug.org/texlive/trunk@22045 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/generic/path/path.sty | 56 +++++++++++++++++++---------- 1 file changed, 37 insertions(+), 19 deletions(-) (limited to 'Master/texmf-dist/tex/generic/path/path.sty') diff --git a/Master/texmf-dist/tex/generic/path/path.sty b/Master/texmf-dist/tex/generic/path/path.sty index 19b0fe178ac..74b662956f2 100644 --- a/Master/texmf-dist/tex/generic/path/path.sty +++ b/Master/texmf-dist/tex/generic/path/path.sty @@ -1,17 +1,22 @@ -%%% @LaTeX-style-file +%%% @TeX-style-file %%% { %%% author = "Philip Taylor", -%%% version = "3.03b", -%%% date = "22 July 1997", +%%% version = "3.05", +%%% date = "7 April 2011", %%% time = "15:59:31 BST", %%% filename = "path.sty", -%%% address = "The Computer Centre -%%% RHBNC, University of London -%%% Egham Hill -%%% Egham, Surrey TW20 0EX, ENGLAND", -%%% telephone = "Tel: +44 1784 443172", -%%% FAX = "Fax: +44 1784 434348", -%%% email = "P.Taylor@Vms.Rhbnc.Ac.Uk", +%%% license = "Unlimited copying and redistribution of this +%%% file are permitted as long as this file is +%%% not modified. Modifications are permitted, +%%% but only if the resulting file is not named +%%% path.sty regardless of case", +%%% address = "c/o The Hellenic Institute +%%% Royal Holloway, University of London +%%% Egham Hull, Egham +%%% Surrey TW20 0EX +%%% United Kingdom", +%%% telephone = "Tel: +44 1622 820 735", +%%% email = "P.Taylor@Rhul.Ac.Uk", %%% codetable = "ISO/ASCII", %%% keywords = "file name, filename, path name, pathname, %%% discretionary, discretionaries", @@ -102,7 +107,13 @@ % author credit in the file header above. [Gee, thanks ! ** Phil] % % Revision history (reverse time order): -% +% +% 3.05 [7-Apr-2011] +% Summary: Use \path instead of \ATcode to save the catcode of @. +% Expand \pathafterhook after \path's work is done. +% +% 3.04 [incorporated as part of Eplain] +% % 3.03b [22-Jul-1997] % Summary: No code changes. An out-of-date example removed, the syntax % for LaTeX2e changed to "\usepackage {path}", and the "checksum" @@ -136,13 +147,16 @@ % First released version. % ====================================================================== -\immediate\write16{This is path.sty, Version 3.03 <03-Dec-1991>} +\immediate \write 16 {This is path.sty, Version 3.05 <7-Apr-2011>} -%%% We will regrettably need one \count variable with an open name, -%%% in which to save the category code of commercial-at ... +%%% The use of `\path' as a temporary control sequence is a kludge, but +%%% it's a reasonably simple way to accomplish making @ a letter (to +%%% provide ``concealed'' control sequences) without overwriting something +%%% (without an `@' in its name) that might already be defined. -\newcount \ATcode -\ATcode = \catcode `\@ +\edef \path {\the \catcode `\@}% +\catcode `\@ = 11 +\let \oldc@tcode = \path %%% Make commercial-at a letter to provide concealed control sequences @@ -158,6 +172,10 @@ \newif \ifspecialpathdelimiters +%%% If desired, you can define \pathafterhook to take + +\let \pathafterhook = \relax + %%% We need to define control sequences which expand to both %%% active and passive spaces ... @@ -246,9 +264,9 @@ {\ifspecialpathdelimiters \begingroup \c@tcodes = 12 - \def \endp@th {\endgroup \endgroup}% + \def \endp@th {\endgroup \endgroup \pathafterhook}% \else - \let \endp@th = \endgroup + \def \endp@th {\endgroup \pathafterhook}% \fi \p@th } @@ -322,7 +340,7 @@ %%% We restore the original catcode of commercial-at -\catcode `\@ = \ATcode +\catcode `\@ = \oldc@tcode %%% Define a default set of discretionary break characters %%% to include all punctuation characters except vertical -- cgit v1.2.3