summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/path
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-04-11 17:57:51 +0000
committerKarl Berry <karl@freefriends.org>2011-04-11 17:57:51 +0000
commitbb76a9ac936acff10cbcca285f378a397668a069 (patch)
tree5ab2ba978bb6d67b40915fe556956f902100d78b /Master/texmf-dist/tex/generic/path
parent610e564d1cff124980887e2bfe889d64b17ea4ab (diff)
path (8apr11)
git-svn-id: svn://tug.org/texlive/trunk@22045 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/path')
-rw-r--r--Master/texmf-dist/tex/generic/path/path.sty56
1 files changed, 37 insertions, 19 deletions
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