429 |
% Here we go: the start is somewhat obtuse since we figure out version |
% Here we go: the start is somewhat obtuse since we figure out version |
430 |
% number and date from RCS strings. This should really be done at |
% number and date from RCS strings. This should really be done at |
431 |
% docstrip time instead. Takers? |
% docstrip time instead. Takers? |
432 |
|
% \begin{macro}{\pr@version} |
433 |
% \begin{macrocode} |
% \begin{macrocode} |
434 |
%<*style> |
%<*style> |
435 |
%<*!active> |
%<*!active> |
436 |
\NeedsTeXFormat{LaTeX2e} \def\reserved@a #1#2$#3: |
\NeedsTeXFormat{LaTeX2e} \def\reserved@a #1#2$#3: |
437 |
#4${\edef#1{\reserved@c #2#4 $}} \def\reserved@c #1 #2${#1} |
#4${\edef#1{\reserved@c #2#4 $}} \def\reserved@c #1 #2${#1} |
438 |
\reserved@a\reserved@b $Name$ \ifx\reserved@b\@empty |
\reserved@a\pr@version $Name$ \ifx\pr@version\@empty |
439 |
\reserved@a\reserved@b CVS-$Revision$ \else \begingroup |
\reserved@a\pr@version CVS-$Revision$ \else \begingroup |
440 |
\lccode`\_=`. \catcode`\_=12 \def\next Release_{} |
\lccode`\_=`. \catcode`\_=12 \def\next Release_{} |
441 |
\edef\next{\lowercase{\endgroup |
\edef\next{\lowercase{\endgroup |
442 |
\def\noexpand\reserved@b{\expandafter\next\reserved@b}}} \next \fi |
\def\noexpand\pr@version{\expandafter\next\pr@version}}} \next \fi |
443 |
\reserved@a\next $Date$ |
\reserved@a\next $Date$ |
444 |
\edef\next{\noexpand\ProvidesPackage{preview}% |
\edef\next{\noexpand\ProvidesPackage{preview}% |
445 |
[\next\space \reserved@b (AUCTeX/preview-latex)]} |
[\next\space \pr@version (AUCTeX/preview-latex)]} |
446 |
\next |
\next |
447 |
% \end{macrocode} |
% \end{macrocode} |
448 |
|
% \end{macro} |
449 |
% Since many parts here will not be needed as long as the package is |
% Since many parts here will not be needed as long as the package is |
450 |
% inactive, we will include them enclosed with |<*active>| and |
% inactive, we will include them enclosed with |<*active>| and |
451 |
% |</active>| guards. That way, we can append all of this stuff at a |
% |</active>| guards. That way, we can append all of this stuff at a |