summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/third/letter/extension/corres.nle
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/context/third/letter/extension/corres.nle')
-rw-r--r--Master/texmf-dist/tex/context/third/letter/extension/corres.nle87
1 files changed, 44 insertions, 43 deletions
diff --git a/Master/texmf-dist/tex/context/third/letter/extension/corres.nle b/Master/texmf-dist/tex/context/third/letter/extension/corres.nle
index 6a68de79d8e..21eb2612a70 100644
--- a/Master/texmf-dist/tex/context/third/letter/extension/corres.nle
+++ b/Master/texmf-dist/tex/context/third/letter/extension/corres.nle
@@ -1,43 +1,44 @@
-%D \module
-%D [ file=corres,
-%D version=2008.07.05,
-%D title=\CONTEXT\ Letter Extension,
-%D subtitle=XML Handling,
-%D author=Wolfgang Schuster,
-%D date=\currentdate,
-%D copyright=Public Domain]
-
-\unprotect
-
-\startconstants all
-
- prefix: prefix
- suffix: suffix
- initials: initials
- formalname: formalname
- informalname: informalname
-\stopconstants
-
-\usemodule[corres]
-
-\setupletter
- [\c!prefix=\XMLflush{prefix},
- \c!suffix=\XMLflush{suffix},
- \c!initials=\XMLflush{initials},
- \c!formalname=\XMLflush{formalname},
- \c!informalname=\XMLflush{informalname}]
-
-\setupletter
- [\c!toaddress=\XMLflush{address}]
-
-\startsetups[letter:opening]
-\lettervalue\c!prefix
-\doiflettervalue\c!formalname\space
-\lettervalue\c!formalname
-\stopsetups
-
-\startsetups[contact:handle]
-\setups[letter:place]
-\stopsetups
-
-\protect \endinput
+%D \module
+%D [ file=corres,
+%D version=2008.10.27,
+%D title=\CONTEXT\ Letter Extension,
+%D subtitle=XML Handling,
+%D author=Wolfgang Schuster,
+%D date=\currentdate,
+%D copyright=Wolfgang Schuster,
+%D email=schuster.wolfgang@googlemail.com,
+%D license=Public Domain]
+
+\unprotect
+
+\startinterface all
+ \setinterfaceconstant {prefix} {prefix}
+ \setinterfaceconstant {suffix} {suffix}
+ \setinterfaceconstant {initials} {initials}
+ \setinterfaceconstant {formalname} {formalname}
+ \setinterfaceconstant {informalname} {informalname}
+\stopinterface
+
+\usemodule[corres]
+
+\setupletter
+ [\c!prefix=\XMLflush{prefix},
+ \c!suffix=\XMLflush{suffix},
+ \c!initials=\XMLflush{initials},
+ \c!formalname=\XMLflush{formalname},
+ \c!informalname=\XMLflush{informalname}]
+
+\setupletter
+ [\c!toaddress=\XMLflush{address}]
+
+\startsetups[letter:opening]
+\lettervalue\c!prefix
+\doiflettervalue\c!formalname\space
+\lettervalue\c!formalname
+\stopsetups
+
+\startsetups[contact:handle]
+\setups[letter:place]
+\stopsetups
+
+\protect \endinput