diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle')
-rw-r--r-- | Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle | 68 |
1 files changed, 35 insertions, 33 deletions
diff --git a/Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle b/Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle index b6c2b4d053d..947876c101a 100644 --- a/Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle +++ b/Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle @@ -1,33 +1,35 @@ -%D \module
-%D [ file=addrentry,
-%D version=2008.07.05,
-%D title=\CONTEXT\ Letter Extension,
-%D subtitle=KOMA-Script addrentry support,
-%D author=Wolfgang Schuster,
-%D date=\currentdate,
-%D copyright=Public Domain]
-
-\unprotect
-
-\def\addrentry#1#2#3#4#5#6#7#8#9%
- {\doifsomething{#1}
- {\doifelsenothing{#2}
- {\setvalue{\????ld\????ld#9}{#1\\#3}}
- {\setvalue{\????ld\????ld#9}{#2\space#1\\#3}}}}
-
-\def\adrentry#1#2#3#4#5#6#7%
- {\addrentry{#1}{#2}{#3}{#4}{#5}{#6}{#7}{}}
-
-\let\adrchar\gobbleoneargument
-
-\def\address!file!extension{adr}
-
-\def\useaddressfile
- {\dosingleargument\douseaddressfile}
-
-\def\douseaddressfile[#1]%
- {\def\dododouseaddressfile##1%
- {\readfile{##1.\address!file!extension}\donothing\donothing}%
- \processcommalist[#1]\dododouseaddressfile}
-
-\protect \endinput
+%D \module +%D [ file=addrentry, +%D version=2008.09.24, +%D title=\CONTEXT\ Letter Extension, +%D subtitle=KOMA-Script addrentry support, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D email=schuster.wolfgang@googlemail.com, +%D license=Public Domain] + +\unprotect + +\def\addrentry#1#2#3#4#5#6#7#8#9% + {\doifsomething{#1} + {\doifelsenothing{#2} + {\setvalue{\????ld\????ld#9}{#1\\#3}} + {\setvalue{\????ld\????ld#9}{#2\space#1\\#3}}}} + +\def\adrentry#1#2#3#4#5#6#7#8% + {\addrentry{#1}{#2}{#3}{#4}{#5}{#6}{#7}{}{#8}} + +\let\adrchar\gobbleoneargument + +\def\address!file!extension{adr} + +\def\useaddressfile + {\dosingleargument\douseaddressfile} + +\def\douseaddressfile[#1]% + {\def\dododouseaddressfile##1% + {\readfile{##1.\address!file!extension}\donothing\donothing}% + \processcommalist[#1]\dododouseaddressfile} + +\protect \endinput |