savefnmark

git-svn-id: svn://tug.org/texlive/trunk@1293 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 45 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/savefnmark/savefnmark.sty b/Master/texmf-dist/tex/latex/savefnmark/savefnmark.sty
new file mode 100644
index 00000000000..2ec309b4e58
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/savefnmark/savefnmark.sty
@@ -0,0 +1,45 @@
+%%
+%% This is file `savefnmark.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% savefnmark.dtx  (with options: `package')
+%% 
+%% File: savefnmark.dtx Copyright (C) 2000 Volker Kuhlmann
+%% All rights are reserved.
+%%
+\NeedsTeXFormat{LaTeX2e}[1998/06/01]
+\ProvidesPackage{savefnmark}
+       [2000/05/11 v1.0 save footnote marks for multiple use (VK)]
+%%
+%% \CharacterTable
+%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%%   Digits        \0\1\2\3\4\5\6\7\8\9
+%%   Exclamation   \!     Double quote  \"     Hash (number) \#
+%%   Dollar        \$     Percent       \%     Ampersand     \&
+%%   Acute accent  \'     Left paren    \(     Right paren   \)
+%%   Asterisk      \*     Plus          \+     Comma         \,
+%%   Minus         \-     Point         \.     Solidus       \/
+%%   Colon         \:     Semicolon     \;     Less than     \<
+%%   Equals        \=     Greater than  \>     Question mark \?
+%%   Commercial at \@     Left bracket  \[     Backslash     \\
+%%   Right bracket \]     Circumflex    \^     Underscore    \_
+%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
+%%   Right brace   \}     Tilde         \~}
+%%
+\newcommand\saveFN[1]{%
+    \newcommand{#1}{}%
+    \xdef#1{\noexpand\@useFN{\@mpfn}{\the\csname c@\@mpfn\endcsname}}%
+    %\show#1%
+}
+\newcommand\useFN[1]{\begingroup\let\@footnotetext\relax#1\endgroup}
+\newcommand\@useFN[2]{%
+    \def\@mpfn{#1}%
+    \expandafter\let\expandafter\thempfn\csname the#1\endcsname
+    \@xfootnote[#2]%
+}
+\endinput
+%%
+%% End of file `savefnmark.sty'.