summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/anch-pos.mkxl
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-12-24 19:46:30 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-12-24 19:46:30 +0100
commit1cc6c316feae649d3c8b64ef0c980dfd792c2347 (patch)
treed2153ed2d05808a40963f095fb2d29c4f5e5c4c8 /tex/context/base/mkxl/anch-pos.mkxl
parent19750b667c23a9f276032837d6c517063376bd0c (diff)
downloadcontext-1cc6c316feae649d3c8b64ef0c980dfd792c2347.tar.gz
2021-12-24 19:09:00
Diffstat (limited to 'tex/context/base/mkxl/anch-pos.mkxl')
-rw-r--r--tex/context/base/mkxl/anch-pos.mkxl13
1 files changed, 9 insertions, 4 deletions
diff --git a/tex/context/base/mkxl/anch-pos.mkxl b/tex/context/base/mkxl/anch-pos.mkxl
index 70197e93e..fef8e54f6 100644
--- a/tex/context/base/mkxl/anch-pos.mkxl
+++ b/tex/context/base/mkxl/anch-pos.mkxl
@@ -419,7 +419,6 @@
\global\positioningtrue}
\permanent\protected\lettonothing\disableparpositions
-
\permanent\protected\lettonothing\registerparoptions % hooks into everypar
\permanent\protected\def\doregisterparoptions
@@ -432,16 +431,22 @@
\def\anch_positions_register_par_options_traced
{\anch_positions_register_par_options_normal
- \smashedhbox to \zeropoint
+ \begingroup
+ \setbox\scratchbox\hpack
{\hss
\startcolor[blue]%
- \llap{\infofont\number\c_anch_positions_paragraph}%
+ \hpack \s!yoffset -2\onepoint to \zeropoint
+ {\hss\infofont\number\c_anch_positions_paragraph\hskip2\onepoint}%
\vrule
\s!width 4\onepoint
\s!height2\onepoint
\s!depth 2\onepoint
\stopcolor
- \hss}}
+ \hss}%
+ \smashbox\scratchbox
+ \boxxoffset\scratchbox-2\onepoint
+ \box\scratchbox
+ \endgroup}
\let\anch_positions_register_par_options\anch_positions_register_par_options_normal