diff options
| author | Hans Hagen <pragma@wxs.nl> | 2021-01-28 18:40:41 +0100 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2021-01-28 18:40:41 +0100 |
| commit | 0ae14e7400b2e4a6cf76d7e185433f5f901b5592 (patch) | |
| tree | fa53dfb22a1185f196e947a2c3a91e5fd7501f8b /tex/context/base/mkxl/core-con.mkxl | |
| parent | 27e58283ca9fd418a9f49981712d8f957cafaa0c (diff) | |
| download | context-0ae14e7400b2e4a6cf76d7e185433f5f901b5592.tar.gz | |
2021-01-28 18:20:00
Diffstat (limited to 'tex/context/base/mkxl/core-con.mkxl')
| -rw-r--r-- | tex/context/base/mkxl/core-con.mkxl | 20 |
1 files changed, 12 insertions, 8 deletions
diff --git a/tex/context/base/mkxl/core-con.mkxl b/tex/context/base/mkxl/core-con.mkxl index 3601dc630..cf88a0eea 100644 --- a/tex/context/base/mkxl/core-con.mkxl +++ b/tex/context/base/mkxl/core-con.mkxl @@ -32,8 +32,8 @@ % needed for arab: \permanent\protected\def\isolateseparators % even works with list separator overloading - {\def\spr##1{{##1}}% % we can probably best mess around with zwj - \def\stp##1{{##1}}} % and friends + {\def\spr##1{{##1}}% % we can probably best mess around with zwj + \def\stp##1{{##1}}} % and friends %D \macros %D {numbers} @@ -449,7 +449,7 @@ \normalyear\normalmonth\normalday \endgroup} -\permanent\tolerant\protected\def\date[#1]#*[#2]% sets the date ! +\permanent\tolerant\protected\def\setdate[#1]% sets the date ! {\dontleavehmode \ifparameter#1\or \begingroup @@ -462,8 +462,12 @@ \normalday \number\directdummyparameter\c!d\relax \normalmonth\number\directdummyparameter\c!m\relax \normalyear \number\directdummyparameter\c!y\relax}% - \fi + \fi} + +\permanent\tolerant\protected\def\date[#1]#*[#2]% sets the date ! + {\dontleavehmode \begingroup + \setdate[#1]% sets the date ! \the\everycurrentdate \edef\forceddatespecification{#2}% \syst_converters_check_date_specification\forceddatespecification @@ -484,15 +488,15 @@ %D The currenttime is actually the jobtime. You can specify a pattern similar %D to the previous date macro using the keys \type {h}, \type {m} and a separator. +\mutable\let\currenthour \!!plusone +\mutable\let\currentminute\!!plusone +\mutable\let\currentsecond\!!plusone + \permanent\protected\def\calculatecurrenttime {\edef\currenthour {\clf_hour }% \edef\currentminute{\clf_minute}% \edef\currentsecond{\clf_second}} -\let\currenthour \!!plusone -\let\currentminute\!!plusone -\let\currentsecond\!!plusone - % \def\currenttimespecification{h,:,m} \permanent\protected\def\currenttime |