summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/mlib-int.lmt
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2020-09-15 19:16:53 +0200
committerContext Git Mirror Bot <phg@phi-gamma.net>2020-09-15 19:16:53 +0200
commite7dc9c1fc474fa15a2cbc34d8f543518f5853361 (patch)
tree203dc5620b0ac92b72f37c30de1cbe90e18823a3 /tex/context/base/mkiv/mlib-int.lmt
parent03f6d43b4a5036b4cbb7e4df56db7217717bdadd (diff)
downloadcontext-e7dc9c1fc474fa15a2cbc34d8f543518f5853361.tar.gz
2020-09-15 18:10:00
Diffstat (limited to 'tex/context/base/mkiv/mlib-int.lmt')
-rw-r--r--tex/context/base/mkiv/mlib-int.lmt13
1 files changed, 9 insertions, 4 deletions
diff --git a/tex/context/base/mkiv/mlib-int.lmt b/tex/context/base/mkiv/mlib-int.lmt
index 4cdc3b076..86e2e5732 100644
--- a/tex/context/base/mkiv/mlib-int.lmt
+++ b/tex/context/base/mkiv/mlib-int.lmt
@@ -8,6 +8,7 @@ if not modules then modules = { } end modules ['mlib-int'] = {
local factor = number.dimenfactors.bp
local mpstring = mp.string
+local mpboolean = mp.boolean
local getdimen = tex.getdimen
local getcount = tex.getcount
local getmacro = tokens.getters.macro
@@ -122,9 +123,13 @@ registerscript("OverlayOffset", function() return getdimen("d_overlay_off
registerscript("OverlayRegion", function() mpstring(getmacro("m_overlay_region")) end)
--------------("CurrentLayout", function() mpstring(getmacro("currentlayout")) end)
-registerscript("PageFraction", page_fraction)
-registerscript("OnRightPage", on_right_page)
-registerscript("OnOddPage", is_odd_page )
-registerscript("InPageBody", in_body_page )
+-- should be direct
+--
+-- registerscript("PageFraction", page_fraction)
+
+registerscript("PageFraction", function() return mpboolean(page_fraction()) end)
+registerscript("OnRightPage", function() return mpboolean(on_right_page()) end)
+registerscript("OnOddPage", function() return mpboolean(is_odd_page ()) end)
+registerscript("InPageBody", function() return mpboolean(in_body_page ()) end)
registerscript("defaultcolormodel", defaultcolormodel)