diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/mkxl/page-inf.mkxl')
-rw-r--r-- | Master/texmf-dist/tex/context/base/mkxl/page-inf.mkxl | 24 |
1 files changed, 13 insertions, 11 deletions
diff --git a/Master/texmf-dist/tex/context/base/mkxl/page-inf.mkxl b/Master/texmf-dist/tex/context/base/mkxl/page-inf.mkxl index 7e65d6e9a80..4865d5990cb 100644 --- a/Master/texmf-dist/tex/context/base/mkxl/page-inf.mkxl +++ b/Master/texmf-dist/tex/context/base/mkxl/page-inf.mkxl @@ -22,23 +22,25 @@ \newtoks\everyresetversion \newtoks\everysetupversion -\mutable\let\currentversioninfo\empty -\mutable\let\currentversiontext\empty +\mutable\lettonothing\currentversioninfo +\mutable\lettonothing\currentversiontext \let\page_info_add_to_box\gobbleoneargument \permanent\tolerant\protected\def\setupversion[#1]% {\the\everyresetversion - \doifelseassignment{#1}% - {\getdummyparameters[\c!alternative=,\c!text=,#1]% - \edef\currentversioninfo{\dummyparameter\c!alternative}% - \edef\currentversiontext{\dummyparameter\c!text}}% - {\edef\currentversioninfo{#1}% - \let \currentversiontext\empty}% + \ifhastok={#1}% + \getdummyparameters[\c!alternative=,\c!text=,#1]% + \edef\currentversioninfo{\dummyparameter\c!alternative}% + \edef\currentversiontext{\dummyparameter\c!text}% + \else + \edef\currentversioninfo{#1}% + \lettonothing\currentversiontext + \fi \ifcsname\??layoutinfo\currentversioninfo\endcsname \let\page_info_add_to_box\page_info_add_to_box_indeed \else - \let\currentversioninfo\empty + \lettonothing\currentversioninfo \let\page_info_add_to_box\gobbleoneargument \fi \the\everysetupversion} @@ -49,13 +51,13 @@ {\begincsname\??layoutinfo\currentversioninfo\endcsname} \permanent\protected\def\installversioninfo#1#2% - {\setvalue{\??layoutinfo#1}{#2}} + {\defcsname\??layoutinfo#1\endcsname{#2}} \permanent\protected\def\includeversioninfo#1% {\begincsname\??layoutinfo#1\endcsname} \installversioninfo\v!final - {\let\currentversioninfo\empty + {\lettonothing\currentversioninfo \let\page_info_add_to_box\gobbleoneargument} \installversioninfo\v!concept |