% Copyright 2006 by Till Tantau % % This file may be distributed and/or modified % % 1. under the LaTeX Project Public License and/or % 2. under the GNU Public License. % % See the file doc/generic/pgf/licenses/LICENSE for more details. % The purpose of this file is to define the command % \ProvidesPackageRCS, which should be followed by an RCS id % string. This command will also be available in plain TeX, where it % prints out a message to the log. \def\pgfversion{1.09} \ifx\pgfrcsloaded\undefined \def\pgfrcsloaded{} \edef\pgfrcsatcode{\the\catcode`\@} \catcode`\@=11 \def\@empty{} % Get date and version from RCS Ids \def\pgf@parseid $#1: #2.#3,v #4 #5/#6/#7 #8${% \pgf@parsercsfile$#2/$ \def\pgf@rcssuffix{#3} \def\pgf@rcsrevision{#4} \def\pgf@rcsdate{#5/#6/#7} } \def\pgf@parsercsfile$#1/#2${ \def\pgf@temp{#2} \ifx\pgf@temp\@empty \def\pgf@rcsfile{#1} \else \pgf@parsercsfile$#2$ \fi} \def\ProvidesFileRCS{% \def\pgfrcs@marshal{\ProvidesFile{\pgf@rcsfile.\pgf@rcssuffix}}% \pgfrcs@parserest% } \def\ProvidesPackageRCS{% \def\pgfrcs@marshal{\ProvidesPackage{\pgf@rcsfile}}% \pgfrcs@parserest% } \def\pgfrcs@parserest{% \def\pgf@rcsadditional{}% \afterassignment\pgfrcs@checkforoptional\let\next=} \def\pgfrcs@checkforoptional{% \ifx\next[% \let\next=\pgfrcs@getoptional% \else \let\next=\pgfrcs@package% \fi% \next}%} \def\pgfrcs@getoptional#1] ${% \def\pgf@rcsadditional{#1}% \pgfrcs@package% } \def\pgfrcs@package#1${ \pgf@parseid $#1$ \pgfrcs@marshal[\pgf@rcsdate\space\pgf@rcsadditional\space(rcs-revision \pgf@rcsrevision)] } \def\ProvidesClassRCS $#1$ [#2]{% \pgf@parseid $#1$ \ProvidesClass{\pgf@rcsfile}[\pgf@rcsdate\space#2\space (rcs-revision \pgf@rcsrevision)] } \ifx\ProvidesPackage\@undefined % plain tex \def\ProvidesPackage#1[#2]{\wlog{Loading package #1 version #2.}} \fi \ifx\ProvidesFile\@undefined % plain tex \def\ProvidesFile#1[#2]{\wlog{Loading file #1 version #2.}} \fi \ProvidesPackageRCS[v\pgfversion] $Header: /cvsroot/pgf/pgf/generic/pgf/utilities/pgfrcs.code.tex,v 1.12 2006/10/11 15:22:26 tantau Exp $ \catcode`\@=\pgfrcsatcode \fi