summaryrefslogtreecommitdiff
path: root/tex/context/modules/mkxl/s-layout-show.mkxl
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2022-07-06 22:05:18 +0200
committerContext Git Mirror Bot <phg@phi-gamma.net>2022-07-06 22:05:18 +0200
commit82c674fdcf5bcff4ad0dc0936d638fc729145616 (patch)
tree6ab4ee4417aa22180cd5b3c50ede6a031f8ce3f9 /tex/context/modules/mkxl/s-layout-show.mkxl
parent3a55e11c7295abf8f2dfe5e9d1c8b153f4518824 (diff)
downloadcontext-82c674fdcf5bcff4ad0dc0936d638fc729145616.tar.gz
2022-07-06 21:35:00
Diffstat (limited to 'tex/context/modules/mkxl/s-layout-show.mkxl')
-rw-r--r--tex/context/modules/mkxl/s-layout-show.mkxl30
1 files changed, 30 insertions, 0 deletions
diff --git a/tex/context/modules/mkxl/s-layout-show.mkxl b/tex/context/modules/mkxl/s-layout-show.mkxl
index 95a6d3371..948b0953f 100644
--- a/tex/context/modules/mkxl/s-layout-show.mkxl
+++ b/tex/context/modules/mkxl/s-layout-show.mkxl
@@ -118,6 +118,36 @@
\NC inner margin \NC \the\innermarginwidth \NC \NR
\stoptabulate}
+\permanent\protected\gdef\showcentering
+ {\setupbackgrounds
+ [\v!text]
+ [\c!background=centeringlines]}
+
+\defineoverlay
+ [centeringlines]
+ [\vpack to \d_overlay_height \bgroup
+ \vfill
+ \hpack to \d_overlay_width \bgroup
+ \hss
+ \hskip1cm
+ \dorecurse{15}{%
+ \kern-.25\onepoint
+ \ifodd\recurselevel
+ \darkred
+ \else
+ \darkblue
+ \fi
+ \vrule
+ height.5\d_overlay_height
+ depth .5\d_overlay_height
+ width .5\onepoint
+ \hskip1cm
+ }%
+ \hss
+ \egroup
+ \vfill
+ \egroup]
+
%D Page grids:
\newconstant\c_page_grids_location