From a0ee1be019cc1fb6421bf81cc552cfb85ac9fa13 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 26 Mar 2010 23:28:47 +0000 Subject: svn-prov 1747 (25mar10) git-svn-id: svn://tug.org/texlive/trunk@17569 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/svn-prov/svn-prov.sty | 32 +++++++++++++++++------ 1 file changed, 24 insertions(+), 8 deletions(-) (limited to 'Master/texmf-dist/tex/latex/svn-prov') diff --git a/Master/texmf-dist/tex/latex/svn-prov/svn-prov.sty b/Master/texmf-dist/tex/latex/svn-prov/svn-prov.sty index 2a74bc8a8f2..96ad3ff3403 100644 --- a/Master/texmf-dist/tex/latex/svn-prov/svn-prov.sty +++ b/Master/texmf-dist/tex/latex/svn-prov/svn-prov.sty @@ -25,7 +25,7 @@ %% This work consists of the files svn-prov.dtx, svn-prov.ins %% and the derived file svn-prov.sty. %% -\def\svnprov@version{v1.\rev} +\def\svnprov@version{v2.\rev} \NeedsTeXFormat{LaTeX2e}[1999/12/01] \def\ProvidesClassSVN{% \svnprov@generic\ProvidesClass{\svnprov@filebase}% @@ -39,20 +39,34 @@ \def\svnprov@generic#1#2{% \def\svnprov@ltxprov{#1}% \def\svnprov@filemask{#2}% + \begingroup + \svnprov@catcodes \@ifnextchar{[}% {\svnprov@getid}% {\svnprov@getid[\svnprov@svnfilename]}% } -\def\svnprov@getid[#1]#2{% +\def\svnprov@catcodes{% + \catcode`\ =10% + \catcode`\$=3% + \@makeother\:% + \@makeother\-% +} +\begingroup +\svnprov@catcodes +\gdef\svnprov@getid[#1]#2{% + \endgroup \def\svnprov@filename{#1}% \svnprov@scanid #2\relax $% - Id: unknown.xxx 0 0000-00-00 00:00:00Z user $\svnprov@endmarker + Id: unknown.xxx 0 0000-00-00 00:00:00Z user $\empty\svnprov@endmarker } -\def\svnprov@scanid#1$% +\gdef\svnprov@scanid#1$% Id: #2 #3 #4-#5-#6 #7 $#8{% \def\next{% - \PackageWarning{svn-prov}{Did not found valid SVN Id line in file - '#2'.}{}{}{}% + \begingroup + \def\@tempa####1>####2 {####2}% + \PackageWarning{svn-prov}{Invalid SVN Id line found! File name might be + '#2' or '\expandafter\@tempa\meaning\@filef@und'. This occured}{}{}{}% + \endgroup \svnprov@gobbleopt }% \ifx\relax#1\relax @@ -61,11 +75,12 @@ \svnprov@splitfilename{#2}% \def\svnprov@filerev{#3}% \def\svnprov@filedate{#4/#5/#6}% - \def\next{\svnprov@buildstring}% + \def\next{\begingroup\svnprov@catcodes\svnprov@buildstring}% \fi \fi \expandafter\next\svnprov@gobblerest }% $ +\endgroup \def\svnprov@splitfilename#1{% \edef\g@tempa{#1}% \let\svnprov@filebase\@gobble @@ -94,6 +109,7 @@ (SVN Rev:\space\svnprov@filerev)% } \newcommand*\svnprov@buildstring[1][\svnprov@defaultdesc]{% + \endgroup \begingroup \let\rev\svnprov@filerev \let\filerev\svnprov@filerev @@ -150,7 +166,7 @@ \def\svnprov@fileinfoonly{#2}% \fi } -\ProvidesPackageSVN{$Id: svn-prov.dtx 1049 2009-05-03 00:24:49Z martin $}% +\ProvidesPackageSVN{$Id: svn-prov.dtx 1747 2010-03-25 20:25:48Z martin $}% [\svnprov@version\space Package Date/Version from SVN Keywords] \endinput -- cgit v1.2.3