1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
|
% mlp.sty An idea of Bernard Gaulle 97/10/31
% Copyright Bernard Gaulle as in french.doc
%
% last mods 97/11/21
%
% A Multi-Lingual Package for LaTeX
%
% \documentclass[options]{any_class}
% \usepackage[options]{mlp}
%
% Among options you can choose at least: french, english, ...
%
% The last language option wil be the default document language.
%
% The last language is the one to use for other options. That way, the
% two following cases are identical:
% \usepackage[english,german,french]{mlp}
% \usepackage[anglais,allemand,francais][mlp}
% but don't mix languages in the list of language names.
%
% This is currently just a try, work is in progress...
%
%%
%% checksum = "04455 63 236 2269"
%%
\ifnum\catcode`\@=11\else\expandafter\catcode`\@=11\fi%
%
\ProvidesPackage{mlp}[1997/12/26 The Multi-Lingual Package by --bg /V0.02/]%
%
% Get the last option which is the main document language.
%
\def\@lastoption{}% Default last option-name to empty ie no parm.
\DeclareOption*{\edef\@lastoption{\CurrentOption}%As any option could be unused
\PassOptionsToPackage{\CurrentOption}{mlp-opts}% pass them to
}% the package.
\ProcessOptions*% get last option and keep maximum 8 chars.
\edef\@required{}%
\def\@requirepackage#1{\protected@edef\@required{\@required%
\protect\RequirePackage{#1}}}%
%
% Define usual code useful for packages.
%
\def\addcaptionnames#1{\@nodocument#1\expandafter\g@addto@macro%
\csname captions\languagename\endcsname{#1}}%
%
% Process all options
%
\def\@tempa{}%
\ifx\@lastoption\empty\input internat.mlp % For global options.
\def\@tempa{\ProcessOptions}% and process them.
\else% If any option provided then
\def\@tempa{\RequirePackage{mlp-opts}}% translate and validate all options.
\fi%
\@tempa%
%
\@required% Load required packages.
\let\@required\undefined\let\@requirepackage\undefined%
%
% Define the first language to use after \begin{document} :
%
\edef\beginlanguage{\expandafter\noexpand\csname \@lastoption\endcsname}%
%
\endinput%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|