diff options
| author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-05-17 10:29:20 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-05-17 10:29:20 +0200 |
| commit | af172a8db5f7583d0117635edde17eba5619d883 (patch) | |
| tree | 50688f3516ce1a3e3d19922666d80101d473f124 /tex/context/modules/mkiv/x-setups-basics.mkiv | |
| parent | b344014638169aad6e5f6d2a9a703cb03a8b5064 (diff) | |
| download | context-af172a8db5f7583d0117635edde17eba5619d883.tar.gz | |
2016-05-17 10:11:00
Diffstat (limited to 'tex/context/modules/mkiv/x-setups-basics.mkiv')
| -rw-r--r-- | tex/context/modules/mkiv/x-setups-basics.mkiv | 30 |
1 files changed, 29 insertions, 1 deletions
diff --git a/tex/context/modules/mkiv/x-setups-basics.mkiv b/tex/context/modules/mkiv/x-setups-basics.mkiv index fd6998013..02376deea 100644 --- a/tex/context/modules/mkiv/x-setups-basics.mkiv +++ b/tex/context/modules/mkiv/x-setups-basics.mkiv @@ -350,7 +350,7 @@ \startxmlsetups xml:setups:typeset:nop \blank - \type {MISSING SETUP} + {\tttf MISSING SETUP} \blank \stopxmlsetups @@ -896,4 +896,32 @@ \let\cmdshortsetup\shortsetup \let\cmdfullsetup \showsetup +% bonus + +\definefloat + [definition] + +\setupcaption + [definition] + [align=flushright] + +\unexpanded\def\showdefinition#1% + {\placedefinition[here][definition:#1]{\tex{#1}}{\showsetup{#1}}} + +\unexpanded\def\definition[#1]% + {\begingroup + \getcommalistsize[#1]% + \scratchcounter\zerocount + \def\dodefinition##1% + {\advance\scratchcounter\plusone + \ifnum\scratchcounter=\commalistsize + \in{and}[definition:##1]% + \else\ifnum\scratchcounter=\plusone + \in{definition}[definition:##1]\space + \else + \in{, }[definition:##1]\space + \fi\fi}% + \processcommalist[#1]\dodefinition + \endgroup} + \protect \endinput |