From ebd5a2a14b82b327a95dfbae9e0544289faa5662 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 12 Jan 2006 23:53:07 +0000 Subject: clefval git-svn-id: svn://tug.org/texlive/trunk@762 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/clefval/clefval.sty | 61 +++++++++++++++++++++++++ 1 file changed, 61 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/clefval/clefval.sty (limited to 'Master/texmf-dist/tex/latex/clefval') diff --git a/Master/texmf-dist/tex/latex/clefval/clefval.sty b/Master/texmf-dist/tex/latex/clefval/clefval.sty new file mode 100644 index 00000000000..374e8c2e1ca --- /dev/null +++ b/Master/texmf-dist/tex/latex/clefval/clefval.sty @@ -0,0 +1,61 @@ +%% +%% This is file `clefval.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% clefval.dtx (with options: `package,packfra') +%% This is a generated file. +%% +%% Copyright (C) 2004 Y. Henel, le TeXnicien de surface +%% +%% +%% This file may be distributed and/or modified under the conditions of +%% the LaTeX Project Public License, either version 1.2 of this license +%% or (at your option) any later version. The latest version of this +%% license is in: +%% +%% http://www.latex-project.org/lppl.txt +%% +%% and version 1.2 or later is part of all distributions of LaTeX version +%% 1999/12/01 or later. +%%%% Copyright (C) 2004 by Josselin Noirel +%%%% and Yvon Henel +%%%% -------------------------------------------------------- +\NeedsTeXFormat{LaTeX2e} +\def\fileversion{v0} +\def\filedate{2004/05/22} +\def\fileinfo{d\'efinir et utiliser des paires cle/valeurs} +\ProvidesPackage{clefval} + [\filedate\space\fileversion\space\fileinfo] +\newcommand*{\@setTheValue}[2]{% + \ifx#1\relax + \protect\G@refundefinedtrue + \nfss@text{\reset@font\bfseries^^a0????}% +\@latex@warning{Valeur de #2 en page \thepage\space non d\'efinie}% + \else #1\null \fi} +\newcommand*{\TheValue}[1]{\expandafter\@setTheValue\csname + V@#1\endcsname{#1}} +\newcommand*{\@newk@ey}[3]{{% + \@ifundefined{#1@#2}% + {\relax}% + {\gdef \@multiplekeys {% +\@latex@warning@no@line{Des clefs sont d\'efinies plusieurs fois.}}% +\@latex@warning@no@line{La clef #2 est d\'efinie plusieurs fois}}% + \global\@namedef{#1@#2}{#3}}} +\def\newkey{\@newk@ey V} +\@onlypreamble\@newk@ey +\AtEndDocument{\let\@newk@ey=\@testdef} +\long\def \@protected@write#1{% + \begingroup + \let\protect\@unexpandable@protect + \edef\reserved@a{% + \write\@auxout{#1}}% + \reserved@a \endgroup \if@nobreak\ifvmode\nobreak\fi\fi } +\let \@multiplekeys \relax +\def\TheKey#1#2{{\@bsphack + \@protected@write{\string\newkey{#1}{#2}}% + \@esphack}} +\endinput +%% +%% End of file `clefval.sty'. -- cgit v1.2.3