summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/strc-mar.mkxl
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-10-15 15:03:57 +0200
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-10-15 15:03:57 +0200
commit6ca88e6f1f15cea89db047839c3126a501f39eea (patch)
treee87d8a0ad20389157a8ccb02278d3a94152877c9 /tex/context/base/mkxl/strc-mar.mkxl
parentcc7fcf11d31b2db23ba3adca896507f9faf128cc (diff)
downloadcontext-6ca88e6f1f15cea89db047839c3126a501f39eea.tar.gz
2021-10-15 13:59:00
Diffstat (limited to 'tex/context/base/mkxl/strc-mar.mkxl')
-rw-r--r--tex/context/base/mkxl/strc-mar.mkxl21
1 files changed, 7 insertions, 14 deletions
diff --git a/tex/context/base/mkxl/strc-mar.mkxl b/tex/context/base/mkxl/strc-mar.mkxl
index 229025f01..4c279f6dd 100644
--- a/tex/context/base/mkxl/strc-mar.mkxl
+++ b/tex/context/base/mkxl/strc-mar.mkxl
@@ -122,25 +122,18 @@
\expandafter\secondoftwoarguments
\fi}
-% \permanent\protected\tolerant\def\setmarking[#1]#:#2%
-% {\ifarguments\orelse\ifconditional\inhibitsetmarking\else
-% % probably best: \dontleavehmode
-% \the\csname\??markingsyncs#1\endcsname
-% \ifcstok{\namedmarkingparameter{#1}\c!expansion}\v!yes
-% \marks\csname\??markingclass#1\endcsname{#2}%
-% \else
-% \marks\csname\??markingclass#1\endcsname{\detokenize{#2}}%
-% \fi
-% \fi}
-
\permanent\protected\tolerant\def\setmarking[#1]#:#2%
{\ifarguments\orelse\ifconditional\inhibitsetmarking\else
- % probably best: \dontleavehmode
+ % so no: \dontleavehmode
\the\csname\??markingsyncs#1\endcsname
\ifcstok{\namedmarkingparameter{#1}\c!expansion}\v!yes
- \normalexpanded{\marks\csname\??markingclass#1\endcsname{#2}}%
+ \normalexpanded{%
+ \ifvmode\expandafter\flushatnextpar\else\expandafter\firstofoneargument\fi
+ {\marks\csname\??markingclass#1\endcsname{#2}}%
+ }%
\else
- \marks\csname\??markingclass#1\endcsname{#2}%
+ \ifvmode\expandafter\flushatnextpar\else\expandafter\firstofoneargument\fi
+ {\marks\csname\??markingclass#1\endcsname{#2}}%
\fi
\fi}