stable 1998.04.15

1 files changed, 182 insertions, 181 deletions

diff --git a/tex/context/base/lang-lab.tex b/tex/context/base/lang-lab.tex
index a5c19a31b..68b796d7c 100644
--- a/tex/context/base/lang-lab.tex
+++ b/tex/context/base/lang-lab.tex
@@ -1,181 +1,182 @@
-%D \module
-%D   [       file=lang-lab,
-%D        version=1997.08.27,
-%D          title=\CONTEXT\ Language Macros,
-%D       subtitle=Language Head and Label Texts,
-%D         author=Hans Hagen / Tobias Burnus,
-%D           date=\currentdate,
-%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
-%C
-%C This module is part of the \CONTEXT\ macro||package and is
-%C therefore copyrighted by \PRAGMA. Non||commercial use is
-%C granted.
-
-\writestatus{loading}{Language Head and Label Texts}
-
-\unprotect
-
-%D In this module we deal with language dependant labels and
-%D prefixes, like in {\em Figure~12} and {\em Chapter 1}. In
-%D this file we set the default values. Users can easily
-%D overrule these.
-%D
-%D This module is dedicated to the grandfather of Tobias
-%D Burnus, who's extensive languages oriented library helped us
-%D a lot in finding the right translations. All those labels 
-%D are collected in files that reflect their common ancestor.
-
-%D \macros
-%D   {setupheadtext, setuplabeltext}
-%D
-%D First we present some macros that deal with what we will
-%D call head and label texts. Such texts are defines by:
-%D
-%D \showsetup{\y!setupheadtext}
-%D \showsetup{\y!setuplabeltext}
-%D
-%D In a few paragraphs we'll show quite a lot of examples
-%D of its use.
-
-\def\setupheadtext%
-  {\dosetupsometextprefix\v!kop}
-
-\def\setuplabeltext%
-  {\dosetupsometextprefix\c!label}
-
-\let\handletextprefix=\relax
-
-\def\dodosetupsometextprefix#1%
-  {\def\dododosetupsometextprefix[##1][##2]%
-     {\ifsecondargument
-        \def\docommando####1{\dodocommando[#1##1][####1]}%
-        \processcommalist[##2]\docommando
-      \else
-        \def\docommando####1{\dodocommando[#1\currentmainlanguage][####1]}%
-        \processcommalist[##1]\docommando
-      \fi}%
-   \dodoubleempty\dododosetupsometextprefix}
-
-\def\dosetupsometextprefix#1%
-  {\def\dodocommando[##1][##2=##3]%
-     {\setvalue{##1##2}{\handletextprefix{##3}}}%
-   \dodosetupsometextprefix{#1}}
-
-%D By setting \type{\handletextprefix} to something else than
-%D \type{\relax}, like \type{\uppercase}, one can influence the
-%D conversion.
-%D
-%D These commands accept all kind of inputs: 
-%D
-%D \starttypen
-%D \setuplabeltext [language] [label=text]
-%D \setuplabeltext [language] [label=text,label=text,...]
-%D \setuplabeltext            [label=text]
-%D \setuplabeltext            [label=text,label=text,...]
-%D \stoptypen
-%D 
-%D The last two cases concern the current language. 
-
-%D \macros
-%D   {headtext, labeltext, LABELTEXT}
-%D
-%D Once defined, head and label texts can be called upon using:
-%D
-%D \showsetup{\y!headtext}
-%D \showsetup{\y!labeltext}
-%D
-%D The latter one has an upcased alternative \type{\LABELTEXT}.
-
-\def\labellanguage{\currentmainlanguage}
-\def\headlanguage {\currentmainlanguage}
-
-\def\headtext%
-  {\dogetupsometextprefix\headlanguage\v!kop}
-
-\def\labeltext%
-  {\dogetupsometextprefix\labellanguage\c!label}
-
-\def\LABELTEXT#1%
-  {\bgroup
-   \let\handletextprefix=\uppercase
-   \the\everyuppercase
-   \dogetupsometextprefix\labellanguage\c!label{#1}% not \labeltext (see \MONTH)
-   \egroup}
-
-\unexpanded\def\dogetupsometextprefix#1#2#3%
-  {\doifdefinedelse{#2#1#3}
-     {\getvalue{#2#1#3}}
-     {\doifdefinedelse{#1#3}
-        {\getvalue{#2#3}}
-        {{\tttf[#2: #3/#1]~}}}}
-
-%D \macros
-%D   {presetheadtext,presetlabeltext}
-%D
-%D The next two macros enable us to automatically define
-%D head and label texts without replacing predefined ones.
-%D This are internal macros.
-
-\def\dopresetsometextprefix#1%
-  {\def\dodocommando[##1][##2=##3]%
-     {\doifundefined{##1##2}
-        {\setvalue{##1##2}{\handletextprefix{##3}}}}%
-   \dodosetupsometextprefix{#1}}
-
-\def\presetheadtext%
-  {\dopresetsometextprefix\v!kop}
-
-\def\presetlabeltext%
-  {\dopresetsometextprefix\c!label}
-
-%D \macros
-%D   {translate}
-%D   {}
-%D
-%D Sometismes macros contain language specific words that are to
-%D be typeset. Such macros can be made (more) language
-%D independant by using:
-%D
-%D \showsetup{\y!translate}
-%D
-%D like for instance:
-%D
-%D \starttypen
-%D \translate[en=something,nl=iets]
-%D \stoptypen
-%D
-%D which expands to {\em something} or {\em iets}, depending on
-%D de current language.
-
-\def\dotranslate[#1]% 
-  {\getparameters[\??lg][#1]%
-   \getvalue{\??lg\currentlanguage}}
-
-\unexpanded\def\translate%
-  {\dosingleempty\dotranslate}
-
-%D When used without argument, the last defined values are
-%D used. This enables repetitive use like
-%D
-%D \starttypen
-%D \en \translate\ means \nl \translate
-%D \stoptypen
-
-%D \macros
-%D   {assigntranslation}
-%D   {}
-%D
-%D This macro is a system macro, and can be used to assign a
-%D translation to a macro. Its form is:
-%D
-%D \starttypen
-%D \assigntranslation[en=something,nl=iets]\to\command
-%D \stoptypen
-
-\def\assigntranslation[#1]\to#2%
-  {\getparameters[\??lg][#1]%
-   \edef#2{\getvalue{\??lg\currentlanguage}}}
-
-\protect
-
-\endinput
+%D \module

+%D   [       file=lang-lab,

+%D        version=1997.08.27,

+%D          title=\CONTEXT\ Language Macros,

+%D       subtitle=Language Head and Label Texts,

+%D         author=Hans Hagen / Tobias Burnus,

+%D           date=\currentdate,

+%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]

+%C

+%C This module is part of the \CONTEXT\ macro||package and is

+%C therefore copyrighted by \PRAGMA. Non||commercial use is

+%C granted.

+

+\writestatus{loading}{Language Head and Label Texts}

+

+\unprotect

+

+%D In this module we deal with language dependant labels and

+%D prefixes, like in {\em Figure~12} and {\em Chapter 1}. In

+%D this file we set the default values. Users can easily

+%D overrule these.

+%D

+%D This module is dedicated to the grandfather of Tobias

+%D Burnus, who's extensive languages oriented library helped us

+%D a lot in finding the right translations. All those labels 

+%D are collected in files that reflect their common ancestor.

+

+%D \macros

+%D   {setupheadtext, setuplabeltext}

+%D

+%D First we present some macros that deal with what we will

+%D call head and label texts. Such texts are defines by:

+%D

+%D \showsetup{\y!setupheadtext}

+%D \showsetup{\y!setuplabeltext}

+%D

+%D In a few paragraphs we'll show quite a lot of examples

+%D of its use.

+

+\def\setupheadtext%

+  {\dosetupsometextprefix\v!kop}

+

+\def\setuplabeltext%

+  {\dosetupsometextprefix\c!label}

+

+\let\handletextprefix=\relax

+

+\def\dodosetupsometextprefix#1%

+  {\def\dododosetupsometextprefix[##1][##2]%

+     {\ifsecondargument

+        \def\docommando####1{\dodocommando[#1##1][####1]}%

+        \processcommalist[##2]\docommando

+      \else

+        \def\docommando####1{\dodocommando[#1\currentmainlanguage][####1]}%

+        \processcommalist[##1]\docommando

+      \fi}%

+   \dodoubleempty\dododosetupsometextprefix}

+

+\def\dosetupsometextprefix#1%

+  {\def\dodocommando[##1][##2=##3]%

+     {\setvalue{##1##2}{\handletextprefix{##3}}}%

+   \dodosetupsometextprefix{#1}}

+

+%D By setting \type{\handletextprefix} to something else than

+%D \type{\relax}, like \type{\uppercase}, one can influence the

+%D conversion.

+%D

+%D These commands accept all kind of inputs: 

+%D

+%D \starttypen

+%D \setuplabeltext [language] [label=text]

+%D \setuplabeltext [language] [label=text,label=text,...]

+%D \setuplabeltext            [label=text]

+%D \setuplabeltext            [label=text,label=text,...]

+%D \stoptypen

+%D 

+%D The last two cases concern the current language. 

+

+%D \macros

+%D   {headtext, labeltext, LABELTEXT}

+%D

+%D Once defined, head and label texts can be called upon using:

+%D

+%D \showsetup{\y!headtext}

+%D \showsetup{\y!labeltext}

+%D

+%D The latter one has an upcased alternative \type{\LABELTEXT}.

+

+\def\labellanguage{\currentmainlanguage}

+\def\headlanguage {\currentmainlanguage}

+

+\def\headtext%

+  {\dogetupsometextprefix\headlanguage\v!kop}

+

+\def\labeltext%

+  {\dogetupsometextprefix\labellanguage\c!label}

+

+\def\LABELTEXT#1%

+  {\bgroup

+   \let\handletextprefix=\uppercase

+   \the\everyuppercase

+   \dogetupsometextprefix\labellanguage\c!label{#1}% not \labeltext (see \MONTH)

+   \egroup}

+

+\unexpanded\def\dogetupsometextprefix#1#2#3%

+  {\doifdefinedelse{#2#1#3}

+     {\getvalue{#2#1#3}}

+     {\doifdefinedelse{#1#3}

+        {\getvalue{#2#3}}

+        {{\tttf[#2: #3/#1]~}}}}

+

+%D \macros

+%D   {presetheadtext,presetlabeltext}

+%D

+%D The next two macros enable us to automatically define

+%D head and label texts without replacing predefined ones.

+%D This are internal macros.

+

+\def\dopresetsometextprefix#1%

+  {\def\dodocommando[##1][##2=##3]%

+     {\doifundefined{##1##2}

+        {\setvalue{##1##2}{\handletextprefix{##3}}}}%

+   \dodosetupsometextprefix{#1}}

+

+\def\presetheadtext%

+  {\dopresetsometextprefix\v!kop}

+

+\def\presetlabeltext%

+  {\dopresetsometextprefix\c!label}

+

+%D \macros

+%D   {translate}

+%D   {}

+%D

+%D Sometismes macros contain language specific words that are to

+%D be typeset. Such macros can be made (more) language

+%D independant by using:

+%D

+%D \showsetup{\y!translate}

+%D

+%D like for instance:

+%D

+%D \starttypen

+%D \translate[en=something,nl=iets]

+%D \stoptypen

+%D

+%D which expands to {\em something} or {\em iets}, depending on

+%D de current language.

+

+\def\dotranslate[#1]% 

+  {\getparameters[\??lg][#1]%

+   \getvalue{\??lg\currentlanguage}}

+

+\unexpanded\def\translate%

+  {\dosingleempty\dotranslate}

+

+%D When used without argument, the last defined values are

+%D used. This enables repetitive use like

+%D

+%D \starttypen

+%D \en \translate\ means \nl \translate

+%D \stoptypen

+

+%D \macros

+%D   {assigntranslation}

+%D   {}

+%D

+%D This macro is a system macro, and can be used to assign a

+%D translation to a macro. Its form is:

+%D

+%D \starttypen

+%D \assigntranslation[en=something,nl=iets]\to\command

+%D \stoptypen

+

+\def\assigntranslation[#1]\to#2%

+  {\getparameters[\??lg][#1]%

+   \edef#2{\getvalue{\??lg\currentlanguage}}}

+

+\protect

+

+\endinput

+
\ No newline at end of file