Parent Directory
| 
Revision Log
| 
Revision Graph
Revision 1.1 - (view) (download)
| 1 : | xella | 1.1 | %% |
| 2 : | %% This is file `mcite.sty', | ||
| 3 : | %% generated with the docstrip utility. | ||
| 4 : | %% | ||
| 5 : | %% The original source files were: | ||
| 6 : | %% | ||
| 7 : | %% mcite.dtx (with options: `package') | ||
| 8 : | %% | ||
| 9 : | %% Copyright (C) 1994 by Thorsten.Ohl@Physik.TH-Darmstadt.de | ||
| 10 : | %% | ||
| 11 : | %% This file is NOT the source for mcite, because almost all comments | ||
| 12 : | %% have been stripped from it. It is NOT the preferred form of mcite | ||
| 13 : | %% for making modifications to it. | ||
| 14 : | %% | ||
| 15 : | %% Therefore you can NOT redistribute and/or modify THIS file. You can | ||
| 16 : | %% however redistribute the complete source (mcite.dtx and mcite.ins) | ||
| 17 : | %% and/or modify it under the terms of the GNU General Public License as | ||
| 18 : | %% published by the Free Software Foundation; either version 2, or (at | ||
| 19 : | %% your option) any later version. | ||
| 20 : | %% | ||
| 21 : | %% Mcite is distributed in the hope that it will be useful, but | ||
| 22 : | %% WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 23 : | %% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 24 : | %% GNU General Public License for more details. | ||
| 25 : | %% | ||
| 26 : | %% You should have received a copy of the GNU General Public License | ||
| 27 : | %% along with this program; if not, write to the Free Software | ||
| 28 : | %% Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | ||
| 29 : | %% | ||
| 30 : | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | ||
| 31 : | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | ||
| 32 : | %% \CheckSum{212} | ||
| 33 : | %% \CharacterTable | ||
| 34 : | %% {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 | ||
| 35 : | %% 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 | ||
| 36 : | %% Digits \0\1\2\3\4\5\6\7\8\9 | ||
| 37 : | %% Exclamation \! Double quote \" Hash (number) \# | ||
| 38 : | %% Dollar \$ Percent \% Ampersand \& | ||
| 39 : | %% Acute accent \' Left paren \( Right paren \) | ||
| 40 : | %% Asterisk \* Plus \+ Comma \, | ||
| 41 : | %% Minus \- Point \. Solidus \/ | ||
| 42 : | %% Colon \: Semicolon \; Less than \< | ||
| 43 : | %% Equals \= Greater than \> Question mark \? | ||
| 44 : | %% Commercial at \@ Left bracket \[ Backslash \\ | ||
| 45 : | %% Right bracket \] Circumflex \^ Underscore \_ | ||
| 46 : | %% Grave accent \` Left brace \{ Vertical bar \| | ||
| 47 : | %% Right brace \} Tilde \~} | ||
| 48 : | %% | ||
| 49 : | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | ||
| 50 : | \def\fileversion{v0.04} | ||
| 51 : | \NeedsTeXFormat{LaTeX2e} | ||
| 52 : | {\def\RCS#1#2\endRCS{% | ||
| 53 : | \ifx$#1% | ||
| 54 : | \@RCS $#2 \endRCS | ||
| 55 : | \else | ||
| 56 : | \@RCS $*: #1#2$ \endRCS | ||
| 57 : | \fi}% | ||
| 58 : | \def\@RCS $#1: #2,v #3 #4 #5 #6$ \endRCS{% | ||
| 59 : | \gdef\filename{#2}% | ||
| 60 : | \gdef\filerevision{v#3}% | ||
| 61 : | \gdef\filedate{#4}% | ||
| 62 : | \gdef\docdate{#4}}% | ||
| 63 : | \RCS $Id: mcite.sty,v 1.1 2007/01/26 02:48:05 bigliett Exp $ \endRCS}% | ||
| 64 : | \ProvidesPackage{mcite}[\filedate\space multiple citations] | ||
| 65 : | \typeout{Package: `mcite' | ||
| 66 : | \fileversion\space <\filedate> (tho) PRELIMINARY TEST RELEASE} | ||
| 67 : | \wlog{English documentation \@spaces<\docdate> (tho)} | ||
| 68 : | \def\@enamedef#1{\expandafter\edef\csname #1\endcsname} | ||
| 69 : | \def\mc@single#1{\global\@enamedef{mc*sg*#1}{}} | ||
| 70 : | \def\mc@head#1#2{\global\@enamedef{mc*hd*#1}{#2}} | ||
| 71 : | \def\mc@tail#1#2{\global\@enamedef{mc*tl*#1}{#2}} | ||
| 72 : | \def\mc@ifsingle#1#2#3{\@ifundefined{mc*sg*#1}{#3}{#2}} | ||
| 73 : | \def\mc@ifhead#1#2#3{\@ifundefined{mc*hd*#1}{#3}{#2}} | ||
| 74 : | \def\mc@iftail#1#2#3{\@ifundefined{mc*tl*#1}{#3}{#2}} | ||
| 75 : | \def\mc@thehead#1{\@nameuse{mc*tl*#1}} | ||
| 76 : | \def\mc@thetail#1{\@nameuse{mc*hd*#1}} | ||
| 77 : | \let\orig@cite\cite | ||
| 78 : | \def\mcite{% | ||
| 79 : | \@ifnextchar[% | ||
| 80 : | {\PackageWarning{mcite}% | ||
| 81 : | {optional argument to \protect\cite\space not supported}% | ||
| 82 : | \@tempswatrue | ||
| 83 : | \expandafter\mc@citex\mc@gobbleopt}% | ||
| 84 : | {\@tempswatrue | ||
| 85 : | \mc@cite}} | ||
| 86 : | \def\mc@gobbleopt[#1]{} | ||
| 87 : | \AtBeginDocument{\let\cite\mcite} | ||
| 88 : | \def\mc@cite#1{% | ||
| 89 : | \edef\mc@temp{#1}% | ||
| 90 : | \expandafter\mc@cite@\expandafter{\mc@temp}} | ||
| 91 : | \def\mc@cite@#1{% | ||
| 92 : | \mc@firsttrue | ||
| 93 : | \@for\mc@@@:=#1\do{% | ||
| 94 : | \expandafter\mc@ifstar\mc@@@\sentinel% | ||
| 95 : | {\ifmc@first | ||
| 96 : | \PackageWarning{mcite}% | ||
| 97 : | {tail `\mc@key' appears as first item in \protect\cite}% | ||
| 98 : | \mc@dohead | ||
| 99 : | \else | ||
| 100 : | \mc@dotail | ||
| 101 : | \fi}% | ||
| 102 : | {\mc@dohead}% | ||
| 103 : | \if@filesw | ||
| 104 : | \immediate\write\@auxout{\string\citation{\mc@key}}% | ||
| 105 : | \fi}% | ||
| 106 : | \expandafter\orig@cite\expandafter{\mc@list}} | ||
| 107 : | \def\mc@dohead{% | ||
| 108 : | \mc@iftail{\mc@key}% | ||
| 109 : | {\PackageWarning{mcite}% | ||
| 110 : | {head `\mc@key' already used as tail of `\mc@thehead{\mc@key}'}}% | ||
| 111 : | {}% | ||
| 112 : | \mc@head{\mc@key}{}% | ||
| 113 : | \edef\mc@curhead{\mc@key}% | ||
| 114 : | \ifmc@first | ||
| 115 : | \mc@firstfalse | ||
| 116 : | \edef\mc@list{\mc@key}% | ||
| 117 : | \else | ||
| 118 : | \edef\mc@list{\mc@list,\mc@key}% | ||
| 119 : | \fi} | ||
| 120 : | \def\mc@dotail{% | ||
| 121 : | \mc@ifhead{\mc@key}% | ||
| 122 : | {\PackageWarning{mcite}% | ||
| 123 : | {tail `\mc@key' already used as head}}% | ||
| 124 : | {}% | ||
| 125 : | \mc@tail{\mc@key}{\mc@curhead}} | ||
| 126 : | \def\mc@ifstar#1#2\sentinel#3#4{% | ||
| 127 : | \ifx*#1% | ||
| 128 : | \def\mc@key{#2}% | ||
| 129 : | #3% | ||
| 130 : | \else | ||
| 131 : | \def\mc@key{#1#2}% | ||
| 132 : | #4% | ||
| 133 : | \fi} | ||
| 134 : | \newif\ifmc@first | ||
| 135 : | \let\orig@bibitem\@bibitem | ||
| 136 : | \def\@bibitem#1{% | ||
| 137 : | \ifmc@bstsupport | ||
| 138 : | \mc@iftail{#1}% | ||
| 139 : | {;\space\ignorespaces}% | ||
| 140 : | {\ifmc@first\else.\fi\orig@bibitem{#1}} | ||
| 141 : | \mc@firstfalse | ||
| 142 : | \else | ||
| 143 : | \mc@iftail{#1}% | ||
| 144 : | {\ignorespaces}% | ||
| 145 : | {\orig@bibitem{#1}}% | ||
| 146 : | \fi}% | ||
| 147 : | \newif\ifmc@bstsupport | ||
| 148 : | \mc@bstsupportfalse | ||
| 149 : | \def\@lbibitem[#1]#2{% | ||
| 150 : | \PackageError{mcite}% | ||
| 151 : | {You can't use the optional argument of \protect\bibitem}% | ||
| 152 : | {Hey, *I* have to fool around with the labels!}% | ||
| 153 : | \@bibitem{#2}} | ||
| 154 : | \def\mcbibliography{% | ||
| 155 : | \mc@bstsupporttrue | ||
| 156 : | \mc@firsttrue | ||
| 157 : | \thebibliography} | ||
| 158 : | \def\endmcbibliography{% | ||
| 159 : | .% | ||
| 160 : | \endthebibliography} | ||
| 161 : | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | ||
| 162 : | \endinput | ||
| 163 : | %% | ||
| 164 : | %% End of file `mcite.sty'. |
| CERN Central CVS service | ViewVC Help |
| Powered by ViewVC 1.0.9 |