oberdiek update from tds zip (28aug06)

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

1 files changed, 838 insertions, 0 deletions

diff --git a/Master/texmf-dist/source/latex/oberdiek/kvsetkeys.dtx b/Master/texmf-dist/source/latex/oberdiek/kvsetkeys.dtx
new file mode 100644
index 00000000000..e3827ac5674
--- /dev/null
+++ b/Master/texmf-dist/source/latex/oberdiek/kvsetkeys.dtx
@@ -0,0 +1,838 @@
+% \iffalse meta-comment
+%
+% Copyright (C) 2006 by Heiko Oberdiek <oberdiek@uni-freiburg.de>
+%
+% This work may be distributed and/or modified under the
+% conditions of the LaTeX Project Public License, either
+% version 1.3 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.3 or later is part of all distributions of
+% LaTeX version 2005/12/01 or later.
+%
+% This work has the LPPL maintenance status "maintained".
+%
+% This Current Maintainer of this work is Heiko Oberdiek.
+%
+% This work consists of the main source file kvsetkeys.dtx
+% and the derived files
+%    kvsetkeys.sty, kvsetkeys.pdf, kvsetkeys.ins, kvsetkeys.drv.
+%
+% Distribution:
+%    CTAN:macros/latex/contrib/oberdiek/kvsetkeys.dtx
+%    CTAN:macros/latex/contrib/oberdiek/kvsetkeys.pdf
+%
+% Unpacking:
+%    (a) If kvsetkeys.ins is present:
+%           tex kvsetkeys.ins
+%    (b) Without kvsetkeys.ins:
+%           tex kvsetkeys.dtx
+%    (c) If you insist on using LaTeX
+%           latex \let\install=y\input{kvsetkeys.dtx}
+%        (quote the arguments according to the demands of your shell)
+%
+% Documentation:
+%    (a) If kvsetkeys.drv is present:
+%           latex kvsetkeys.drv
+%    (b) Without kvsetkeys.drv:
+%           latex kvsetkeys.dtx; ...
+%    The class ltxdoc loads the configuration file ltxdoc.cfg
+%    if available. Here you can specify further options, e.g.
+%    use A4 as paper format:
+%       \PassOptionsToClass{a4paper}{article}
+%
+%    Programm calls to get the documentation (example):
+%       pdflatex kvsetkeys.dtx
+%       makeindex -s gind.ist kvsetkeys.idx
+%       pdflatex kvsetkeys.dtx
+%       makeindex -s gind.ist kvsetkeys.idx
+%       pdflatex kvsetkeys.dtx
+%
+% Installation:
+%    TDS:tex/generic/oberdiek/kvsetkeys.sty
+%    TDS:doc/latex/oberdiek/kvsetkeys.pdf
+%    TDS:source/latex/oberdiek/kvsetkeys.dtx
+%
+%<*ignore>
+\begingroup
+  \def\x{LaTeX2e}
+\expandafter\endgroup
+\ifcase 0\ifx\install y1\fi\expandafter
+         \ifx\csname processbatchFile\endcsname\relax\else1\fi
+         \ifx\fmtname\x\else 1\fi\relax
+\else\csname fi\endcsname
+%</ignore>
+%<*install>
+\input docstrip.tex
+\Msg{************************************************************************}
+\Msg{* Installation}
+\Msg{* Package: kvsetkeys 2006/03/06 v1.0 Key value parser with default handler support (HO)}
+\Msg{************************************************************************}
+
+\keepsilent
+\askforoverwritefalse
+
+\preamble
+
+This is a generated file.
+
+Copyright (C) 2006 by Heiko Oberdiek <oberdiek@uni-freiburg.de>
+
+This work may be distributed and/or modified under the
+conditions of the LaTeX Project Public License, either
+version 1.3 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.3 or later is part of all distributions of
+LaTeX version 2005/12/01 or later.
+
+This work has the LPPL maintenance status "maintained".
+
+This Current Maintainer of this work is Heiko Oberdiek.
+
+This work consists of the main source file kvsetkeys.dtx
+and the derived files
+   kvsetkeys.sty, kvsetkeys.pdf, kvsetkeys.ins, kvsetkeys.drv.
+
+\endpreamble
+
+\generate{%
+  \file{kvsetkeys.ins}{\from{kvsetkeys.dtx}{install}}%
+  \file{kvsetkeys.drv}{\from{kvsetkeys.dtx}{driver}}%
+  \usedir{tex/generic/oberdiek}%
+  \file{kvsetkeys.sty}{\from{kvsetkeys.dtx}{package}}%
+}
+
+\obeyspaces
+\Msg{************************************************************************}
+\Msg{*}
+\Msg{* To finish the installation you have to move the following}
+\Msg{* file into a directory searched by TeX:}
+\Msg{*}
+\Msg{*     kvsetkeys.sty}
+\Msg{*}
+\Msg{* To produce the documentation run the file `kvsetkeys.drv'}
+\Msg{* through LaTeX.}
+\Msg{*}
+\Msg{* Happy TeXing!}
+\Msg{*}
+\Msg{************************************************************************}
+
+\endbatchfile
+%</install>
+%<*ignore>
+\fi
+%</ignore>
+%<*driver>
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesFile{kvsetkeys.drv}%
+  [2006/03/06 v1.0 Key value parser with default handler support (HO)]
+\documentclass{ltxdoc}
+\usepackage{holtxdoc}
+\begin{document}
+  \DocInput{kvsetkeys.dtx}
+\end{document}
+%</driver>
+% \fi
+%
+% \CheckSum{580}
+%
+% \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         \~}
+%
+% \GetFileInfo{kvsetkeys.drv}
+%
+% \title{The \xpackage{kvsetkeys} package}
+% \date{2006/03/06 v1.0}
+% \author{Heiko Oberdiek\\\xemail{oberdiek@uni-freiburg.de}}
+%
+% \maketitle
+%
+% \begin{abstract}
+% Package \xpackage{kvsetkeys} provides \cs{kvsetkeys}, a variant
+% of package \xpackage{keyval}'s \cs{setkeys}. It allows to specify
+% a handler that deals with unknown options. Active commas and equal
+% signs may be used (e.g. see \xpackage{babel}'s shorthands) and
+% only one level of curly braces are removed from the values.
+% \end{abstract}
+%
+% \tableofcontents
+%
+% \def\M#1{\texttt{\{}\meta{#1}\texttt{\}}}
+%
+% \section{Documentation}
+%
+% \cs{kvsetkeys} can be used as replacement for \xpackage{keyval}'s
+% \cs{setkeys}. Also it uses the same syntax. Before I describe
+% \cs{kvsetkeys} in more detail, first I want to explain, how
+% this package deals with key value lists. For the package also
+% provides low level interfaces that can be used by package authors.
+%
+% \subsection{Normalizing key value lists}
+%
+% \begin{declcs}{kv@normalize}\,\M{key value list}
+% \end{declcs}
+% Specifying key value lists, the user usually wants to have
+% nice formatted souce code, e.g.:
+% \begin{quote}
+%\begin{verbatim}
+%\hypersetup{
+%  pdftitle    = {...},
+%  pdfsubject  = {...},
+%  pdfauthor   = {...},
+%  pdfkeywords = {...},
+%  ...
+%}
+%\end{verbatim}
+% \end{quote}
+% Thus there can be spaces around keys, around |=| or around the value.
+% Also empty entries are possible by too many commas. Therefore these
+% spaces and empty entries are silently removed by package \xpackage{keyval}
+% and this package. Whereas the contents of the value can be protected
+% by curly braces, especially if spaces or commas are used inside,
+% a key name must not use spaces or other syntax characters.
+%
+% \cs{kv@normalize} takes a key value list and performs the cleanup:
+% \begin{itemize}
+% \item Spaces are removed.
+% \item Syntax characters (comma and equal sign) that are active
+%   are replaces by the same characters with standard catcode.
+%   (Example: \xpackage{babel}'s language option \xoption{turkish}
+%   uses the equal sign as active shorthand character.)
+% \end{itemize}
+% The result is stored in \cs{kv@list}, e.g.:
+% \begin{quote}
+% |\kv@list| $\rightarrow$ |,pdftitle={},pdfsubject={},...,|
+% \end{quote}
+% Empty entries are removed later. In fact it adds a comma at the begin
+% and end to protect the last value and an easier implementation.
+%
+% \subsection{Parsing key value lists}
+%
+% \begin{declcs}{kv@parse}\,\M{key value list}\,\M{processor}
+% \end{declcs}
+% It is easier to parse a normalized list, thus \cs{kv@parse}
+% normalizes the list and calls \cs{kv@parse@normalized}.
+%
+% \begin{declcs}{kv@parse@normalized}\,\M{key value list}%
+%   \,\M{processor}
+% \end{declcs}
+% Now the key value list is split into single key value pairs.
+% For further processing the key and value are given as arguments
+% for the \meta{processor}:
+% \begin{quote}
+%   \meta{processor}\,\M{key}\,\M{value}
+% \end{quote}
+% Also key and value are stored in macro names:
+% \begin{itemize}
+% \item \cs{kv@key} stores the key.
+% \item \cs{kv@value} stores the value or if the value was not
+%   specified it has the meaning \cs{relax}.
+% \end{itemize}
+% The behaviour in pseudo code:
+% \begin{quote}
+%   foreach (\meta{key}, \meta{value}) in (\meta{key value list})\\
+%   \hspace*{1.5em}\cs{kv@key} := \meta{key}\\
+%   \hspace*{1.5em}\cs{kv@value} := \meta{value}\\
+%   \hspace*{1.5em}\meta{processor}\,\M{key}\,\M{value}
+% \end{quote}
+%
+% \subsection{Processing key value pairs}
+%
+% \begin{declcs}{kv@processor@default}\,\M{family}\,\M{key}\,\M{value}
+% \end{declcs}
+% There are many possiblities to process key value pairs.
+% \cs{kv@processor@default} is the processor used in \cs{kvsetkeys}.
+% It reimplements and extends the behaviour of
+% \xpackage{keyval}'s \cs{setkeys}.
+% In case of unknown keys \cs{setkeys} raise an error.
+% This processer, however, calls a handler instead, if it
+% is provided by the family.
+%
+% The behaviour in pseudo code:
+% \begin{quote}
+%   if \meta{key} exists\\
+%   \hspace*{1.5em}call the keyval code of \meta{key}\\
+%   else\\
+%   \hspace*{1.5em}if \meta{handler} for \meta{family} exists\\
+%   \hspace*{3em}\meta{handler}\,\M{key}\,\M{value}\\
+%   \hspace*{1.5em}else\\
+%   \hspace*{3em}raise unknown key error\\
+%   \hspace*{1.5em}fi\\
+%   fi
+% \end{quote}
+%
+% \begin{declcs}{kv@set@family@handler}\,\M{family}\,\M{handler}
+% \end{declcs}
+% This sets the handler \meta{handler} for the keyval family
+% \meta{family}.
+%
+% \subsection{Do it all}
+%
+% \begin{declcs}{kvsetkeys}\,\M{family}\,\M{key value list}
+% \end{declcs}
+% The work is done by the previous commands. \cs{kvsetkeys}
+% just calls them:
+% \begin{quote}
+%   \cs{kv@parse}\,\M{key value list}^^A
+%   \texttt{\{}\cs{kv@processor@default}\,\M{family}\texttt{\}}
+% \end{quote}
+%
+% \StopEventually{
+% }
+%
+% \section{Implementation}
+%
+% \subsection{Identification}
+%
+%    \begin{macrocode}
+%<*package>
+%    \end{macrocode}
+%    Reload check, especially if the package is not used with \LaTeX.
+%    \begin{macrocode}
+\begingroup
+  \expandafter\let\expandafter\x\csname ver@kvsetkeys.sty\endcsname
+  \ifcase 0%
+    \ifx\x\relax % plain
+    \else
+      \ifx\x\empty % LaTeX
+      \else
+        1%
+      \fi
+    \fi
+  \else
+    \expandafter\ifx\csname PackageInfo\endcsname\relax
+      \def\x#1#2{%
+        \immediate\write-1{Package #1 Info: #2.}%
+      }%
+    \else
+      \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+    \fi
+    \x{kvsetkeys}{The package is already loaded}%
+    \endgroup
+    \expandafter\endinput
+  \fi
+\endgroup
+%    \end{macrocode}
+%    Package identification:
+%    \begin{macrocode}
+\begingroup
+  \expandafter\ifx\csname ProvidesPackage\endcsname\relax
+    \def\x#1#2#3[#4]{\endgroup
+      \immediate\write-1{Package: #3 #4}%
+      \xdef#1{#4}%
+    }%
+  \else
+    \def\x#1#2[#3]{\endgroup
+      #2[{#3}]%
+      \ifx#1\relax
+        \xdef#1{#3}%
+      \fi
+    }%
+  \fi
+\expandafter\x\csname ver@kvsetkeys.sty\endcsname
+\ProvidesPackage{kvsetkeys}%
+  [2006/03/06 v1.0 Key value parser with default handler support (HO)]
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\expandafter\edef\csname KVS@endinput\endcsname{%
+  \catcode39 \the\catcode39 % '
+  \catcode44 \the\catcode44 % ,
+  \catcode61 \the\catcode61 % =
+  \catcode64 \the\catcode64 % @
+  \catcode94 \the\catcode94 % ^
+  \catcode96 \the\catcode96 % `
+  \catcode126 \the\catcode126 % ~
+  \relax
+  \noexpand\endinput
+}
+\catcode39 12 % '
+\catcode44 12 % ,
+\catcode61 12 % =
+\catcode64 11 % @
+\catcode94 7 % ^
+\catcode96 12 % `
+\catcode126 13 % ~
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\def\KVS@empty{}
+\long\def\@ReturnAfterFi#1\fi{\fi#1}
+%    \end{macrocode}
+%
+% \subsection{Normalizing key value lists}
+%
+%    \begin{macro}{\kv@normalize}
+%    \begin{macrocode}
+\def\kv@normalize#1{%
+  \begingroup
+    \toks@{,#1}%
+    \KVS@comma
+    \KVS@equal
+    \KVS@spaceA
+    \KVS@spaceB{ }%
+    \KVS@spaceC
+    \KVS@spaceD{ }%
+    \xdef\kv@global{\the\toks@}%
+  \endgroup
+  \let\kv@list\kv@global
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\KVS@comma}
+%    Converts active commas into comma with catcode other.
+%    Also adds a comma at the end to protect the last value
+%    for next cleanup steps.
+%    \begin{macrocode}
+\begingroup
+  \lccode`\,=`\,%
+  \lccode`\~=`\,%
+\lowercase{\endgroup
+  \def\KVS@comma{%
+    \toks@\expandafter{\expandafter}\expandafter
+    \KVS@@comma\the\toks@~\KVS@nil
+  }
+  \def\KVS@@comma#1~#2\KVS@nil{%
+    \toks@\expandafter{\the\toks@#1,}%
+    \toks2{#2}%
+    \edef\x{\the\toks2}%
+    \ifx\x\KVS@empty
+    \else
+      \@ReturnAfterFi{%
+        \KVS@@comma#2\KVS@nil
+      }%
+    \fi
+  }%
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\KVS@equal}
+%    Converts active equal signs into catcode other characters.
+%    \begin{macrocode}
+\begingroup
+  \lccode`\==`\=%
+  \lccode`\~=`\=%
+\lowercase{\endgroup
+  \def\KVS@equal{%
+    \toks@\expandafter{\expandafter}\expandafter
+    \KVS@@equal\the\toks@~\KVS@nil
+  }
+  \def\KVS@@equal#1~#2\KVS@nil{%
+    \edef\x{\the\toks@}%
+    \ifx\x\KVS@empty
+      \toks@{#1}%
+    \else
+      \toks@\expandafter{\the\toks@=#1}%
+    \fi
+    \toks2{#2}%
+    \edef\x{\the\toks2}%
+    \ifx\x\KVS@empty
+    \else
+      \@ReturnAfterFi{%
+        \KVS@@equal#2\KVS@nil
+      }%
+    \fi
+  }%
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\KVS@spaceA}
+%    Removes one space after the equal sign. In theory also several
+%    spaces could be removed, but this is not really necessary,
+%    because \TeX\ usually collapses several spaces to one already.
+%    \begin{macrocode}
+\def\KVS@spaceA{%
+  \toks@\expandafter{\expandafter}\expandafter
+  \KVS@@spaceA\the\toks@= \KVS@nil
+}
+\def\KVS@@spaceA#1= #2\KVS@nil{%
+  \edef\x{\the\toks@}%
+  \ifx\x\KVS@empty
+    \toks@{#1}%
+  \else
+    \toks@\expandafter{\the\toks@=#1}%
+  \fi
+  \toks2{#2}%
+  \edef\x{\the\toks2}%
+  \ifx\x\KVS@empty
+  \else
+    \@ReturnAfterFi{%
+      \KVS@@spaceA#2\KVS@nil
+    }%
+  \fi
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\KVS@spaceB}
+%    Removes one space before the comma.
+%    \begin{macrocode}
+\def\KVS@spaceB#1{%
+  \toks@\expandafter{\expandafter}\expandafter
+  \KVS@@spaceB\the\toks@#1,\KVS@nil
+}
+\def\KVS@@spaceB#1 ,#2\KVS@nil{%
+  \edef\x{\the\toks@}%
+  \ifx\x\KVS@empty
+    \toks@{#1}%
+  \else
+    \toks@\expandafter{\the\toks@,#1}%
+  \fi
+  \toks2{#2}%
+  \edef\x{\the\toks2}%
+  \ifx\x\KVS@empty
+  \else
+    \@ReturnAfterFi{%
+      \KVS@@spaceB#2\KVS@nil
+    }%
+  \fi
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+%    \begin{macro}{\KVS@spaceC}
+%    Removes one space after the comma.
+%    \begin{macrocode}
+\def\KVS@spaceC{%
+  \toks@\expandafter{\expandafter}\expandafter
+  \KVS@@spaceC\the\toks@, \KVS@nil
+}
+\def\KVS@@spaceC#1, #2\KVS@nil{%
+  \edef\x{\the\toks@}%
+  \ifx\x\KVS@empty
+    \toks@{#1}%
+  \else
+    \toks@\expandafter{\the\toks@,#1}%
+  \fi
+  \toks2{#2}%
+  \edef\x{\the\toks2}%
+  \ifx\x\KVS@empty
+  \else
+    \@ReturnAfterFi{%
+      \KVS@@spaceC#2\KVS@nil
+    }%
+  \fi
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\KVS@spaceD}
+%    Removes one space before the equal sign.
+%    \begin{macrocode}
+\def\KVS@spaceD#1{%
+  \toks@\expandafter{\expandafter}\expandafter
+  \KVS@@spaceD\the\toks@#1=\KVS@nil
+}
+\def\KVS@@spaceD#1 =#2\KVS@nil{%
+  \edef\x{\the\toks@}%
+  \ifx\x\KVS@empty
+    \toks@{#1}%
+  \else
+    \toks@\expandafter{\the\toks@=#1}%
+  \fi
+  \toks2{#2}%
+  \edef\x{\the\toks2}%
+  \ifx\x\KVS@empty
+  \else
+    \@ReturnAfterFi{%
+      \KVS@@spaceD#2\KVS@nil
+    }%
+  \fi
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+% \subsection{Parsing key value lists}
+%
+%    \begin{macro}{\kv@parse}
+%    Normalizes and parses the key value list. Also sets \cs{kv@list}.
+%    \begin{macrocode}
+\def\kv@parse#1{%
+  \kv@normalize{#1}%
+  \expandafter\kv@parse@normalized\expandafter{\kv@list}%
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macro}{\kv@parse@normalized}
+%    \begin{macrocode}
+\def\kv@parse@normalized#1#2{%
+  \KVS@parse#1,\KVS@nil{#2}%
+}
+%    \end{macrocode}
+%    \end{macro}
+%    \begin{macrocode}
+\def\KVS@parse#1,#2\KVS@nil#3{%
+  \begingroup
+    \toks@{#1}%
+    \edef\x{\the\toks@}%
+  \expandafter\endgroup
+  \ifx\x\KVS@empty
+  \else
+    \KVS@process#1=\KVS@nil{#3}%
+  \fi
+  \begingroup
+    \toks@{#2}%
+    \edef\x{\the\toks@}%
+  \expandafter\endgroup
+  \ifx\x\KVS@empty
+  \else
+    \@ReturnAfterFi{%
+      \KVS@parse#2\KVS@nil{#3}%
+    }%
+  \fi
+}
+%    \end{macrocode}
+%    \begin{macrocode}
+\def\KVS@process#1=#2\KVS@nil#3{%
+  \def\kv@key{#1}%
+  \begingroup
+    \toks@{#2}%
+    \edef\x{\the\toks@}%
+  \expandafter\endgroup
+  \ifx\x\KVS@empty
+    \let\kv@value\relax
+    #3{#1}{}%
+  \else
+    \KVS@@process{#1}#2\KVS@nil{#3}%
+  \fi
+}
+\def\KVS@@process#1#2=\KVS@nil#3{%
+  \begingroup
+    \toks@{#2}%
+    \xdef\KVS@global{\the\toks@}%
+  \endgroup
+  \let\kv@value\KVS@global
+  #3{#1}{#2}%
+}
+%    \end{macrocode}
+%
+% \subsection{Processing key value pairs}
+%
+%    \begin{macro}{\kv@processor@default}
+%    \begin{macrocode}
+\def\kv@processor@default#1#2#3{%
+  \begingroup\expandafter\expandafter\expandafter\endgroup
+  \expandafter\ifx\csname KV@#1@#2\endcsname\relax
+    \begingroup\expandafter\expandafter\expandafter\endgroup
+    \expandafter\ifx\csname KVS@#1@handler\endcsname\relax
+      \kv@error@unknownkey{#1}{#2}%
+    \else
+      \csname KVS@#1@handler\endcsname{#2}{#3}%
+      \relax
+    \fi
+  \else
+    \ifx\kv@value\relax
+      \begingroup\expandafter\expandafter\expandafter\endgroup
+      \expandafter\ifx\csname KV@#1@#2@default\endcsname\relax
+        \kv@error@novalue{#1}{#2}%
+      \else
+        \csname KV@#1@#2@default\endcsname
+        \relax
+      \fi
+    \else
+      \csname KV@#1@#2\endcsname{#3}%
+    \fi
+  \fi
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+%    \begin{macro}{\kv@set@family@handler}
+%    \begin{macrocode}
+\def\kv@set@family@handler#1#{%
+  \expandafter\def\csname KVS@#1@handler\endcsname
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+% \subsection{Error handling}
+%
+%    \begin{macro}{\kv@error@novalue}
+%    Only a poor \cs{PackageError} is provided by \xfile{miniltx.tex}.
+%    \begin{macrocode}
+\expandafter\ifx\csname MessageBreak\endcsname\relax
+  \def\MessageBreak{^^J}%
+\fi
+\expandafter\ifx\csname @ehc\endcsname\relax
+  \def\@ehc{%
+    Try typing \space\string<return\string> %
+    \space to proceed.\MessageBreak
+    If that doesn't work, type \space X %
+    \string<return\string> \space to quit\string.%
+  }%
+\fi
+\def\kv@error@novalue{%
+  \kv@error@generic{No value specified for}%
+}
+\def\kv@error@unknownkey{%
+  \kv@error@generic{Undefined}%
+}
+\def\kv@error@generic#1#2#3{%
+  \begingroup
+    \newlinechar=10 %
+    \def\MessageBreak{^^J}%
+    \expandafter\ifx\csname PackageError\endcsname\relax
+      \edef\x{%
+        \errhelp{%
+          The keyval family of the key `#3' is `#2'.\MessageBreak
+          \MessageBreak
+          \@ehc
+        }%
+      }%
+      \x
+      \errmessage{kvsetkeys: #1 key `#3'}%
+    \else
+      \edef\x{%
+        \noexpand\PackageError{kvsetkeys}{%
+           #1 key `#3'%
+        }{%
+          The keyval family of the key `#3' is `#2'.\MessageBreak
+          \MessageBreak
+          \@ehc
+        }%
+      }%
+      \x
+    \fi
+  \endgroup
+}%
+%    \end{macrocode}
+%    \end{macro}
+%
+% \subsection{Do it all}
+%
+%    \begin{macro}{\kvsetkeys}
+%    \begin{macrocode}
+\def\kvsetkeys#1#2{%
+  \kv@parse{#2}{\kv@processor@default{#1}}%
+}
+%    \end{macrocode}
+%    \end{macro}
+%
+%    \begin{macrocode}
+\KVS@endinput
+%</package>
+%    \end{macrocode}
+% \section{Installation}
+%
+% \paragraph{CTAN.} This package is available on
+% CTAN\footnote{\url{ftp://ftp.ctan.org/tex-archive/}}:
+% \begin{description}
+% \item[\CTAN{macros/latex/contrib/oberdiek/kvsetkeys.dtx}] The source file.
+% \item[\CTAN{macros/latex/contrib/oberdiek/kvsetkeys.pdf}] Documentation.
+% \end{description}
+%
+% \paragraph{Unpacking.} The \xfile{.dtx} file is a self-extracting
+% \docstrip\ archive. The files are extracted by running the
+% \xfile{.dtx} through \plainTeX:
+% \begin{quote}
+%   \verb|tex kvsetkeys.dtx|
+% \end{quote}
+%
+% \paragraph{TDS.} Now the different files must be moved into
+% the different directories in your installation TDS tree
+% (also known as \xfile{texmf} tree):
+% \begin{quote}
+% \sbox0{^^A
+% \begin{tabular}{@{}>{\ttfamily}l@{$\quad\rightarrow\quad$}>{\ttfamily}l@{}}
+%   kvsetkeys.sty & tex/generic/oberdiek/kvsetkeys.sty\\
+%   kvsetkeys.pdf & doc/latex/oberdiek/kvsetkeys.pdf\\
+%   kvsetkeys.dtx & source/latex/oberdiek/kvsetkeys.dtx\\
+% \end{tabular}^^A
+% }%
+% \ifdim\wd0>\linewidth
+%   \mbox{}\nobreak\hskip0pt minus\leftmargin
+%   \usebox0
+%   \nobreak\hskip0pt minus\rightmargin
+% \else
+%   \usebox0
+% \fi
+% \end{quote}
+% If you have a \xfile{docstrip.cfg} that configures and enables \docstrip's
+% TDS installing feature, then some files can already be in the right
+% place, see the documentation of \docstrip.
+%
+% \paragraph{Refresh file databases.} If your \TeX~distribution
+% (\teTeX, \mikTeX, \dots) rely on file databases, you must refresh
+% these. For example, \teTeX\ users run \verb|texhash| or
+% \verb|mktexlsr|.
+%
+% \subsection{Some details for the interested}
+%
+% \paragraph{Attached source.}
+%
+% The PDF documentation on CTAN also includes the
+% \xfile{.dtx} source file. It can be extracted by
+% AcrobatReader 6 or higher. Another option is \textsf{pdftk},
+% e.g. unpack the file into the current directory:
+% \begin{quote}
+%   \verb|pdftk kvsetkeys.pdf unpack_files output .|
+% \end{quote}
+%
+% \paragraph{Unpacking with \LaTeX.}
+% The \xfile{.dtx} chooses its action depending on the format:
+% \begin{description}
+% \item[\plainTeX:] Run \docstrip\ and extract the files.
+% \item[\LaTeX:] Generate the documentation.
+% \end{description}
+% If you insist on using \LaTeX\ for \docstrip\ (really,
+% \docstrip\ does not need \LaTeX), then inform the autodetect routine
+% about your intension:
+% \begin{quote}
+%   \verb|latex \install=y\input{kvsetkeys.dtx}|
+% \end{quote}
+% Do not forget to quote the argument according to the demands
+% of your shell.
+%
+% \paragraph{Generating the documentation.}
+% You can use both the \xfile{.dtx} or the \xfile{.drv} to generate
+% the documentation. The process can be configured by the
+% configuration file \xfile{ltxdoc.cfg}. For instance, put this
+% line into this file, if you want to have A4 as paper format:
+% \begin{quote}
+%   \verb|\PassOptionsToClass{a4paper}{article}|
+% \end{quote}
+% An example follows how to generate the
+% documentation with pdf\LaTeX:
+% \begin{quote}
+%\begin{verbatim}
+%pdflatex kvsetkeys.dtx
+%makeindex -s gind.ist kvsetkeys.idx
+%pdflatex kvsetkeys.dtx
+%makeindex -s gind.ist kvsetkeys.idx
+%pdflatex kvsetkeys.dtx
+%\end{verbatim}
+% \end{quote}
+%
+% \begin{thebibliography}{9}
+%
+% \bibitem{keyval}
+%   David Carlisle:
+%   \textit{The \xpackage{keyval} package};
+%   1999/03/16 v1.13;
+%   \CTAN{macros/latex/required/graphics/keyval.dtx}.
+%
+% \end{thebibliography}
+%
+% \begin{History}
+%   \begin{Version}{2006/03/06 v1.0}
+%   \item
+%     First version.
+%   \end{Version}
+% \end{History}
+%
+% \PrintIndex
+%
+% \Finale
+\endinput