summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/trac-vis.lmt
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-11-18 17:33:54 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-11-18 17:33:54 +0100
commit4a439fa6665c12aac6219acc8c148c5c1d091116 (patch)
treedd5411b7efc3f2915090a552135076ea9652e4ac /tex/context/base/mkxl/trac-vis.lmt
parent91379fa891f786d5e25909680b0d62933e581bd0 (diff)
downloadcontext-4a439fa6665c12aac6219acc8c148c5c1d091116.tar.gz
2021-11-18 16:35:00
Diffstat (limited to 'tex/context/base/mkxl/trac-vis.lmt')
-rw-r--r--tex/context/base/mkxl/trac-vis.lmt12
1 files changed, 12 insertions, 0 deletions
diff --git a/tex/context/base/mkxl/trac-vis.lmt b/tex/context/base/mkxl/trac-vis.lmt
index d08f3c282..f8aecbf12 100644
--- a/tex/context/base/mkxl/trac-vis.lmt
+++ b/tex/context/base/mkxl/trac-vis.lmt
@@ -376,6 +376,18 @@ directives.register("visualizers.fraction", function(v) fraction = (v and tonumb
-- we can just paste verbatim together .. no typesetting needed
+-- experiment ... we can move the font definition away too
+
+ local expandmacro = token.expand_macro
+ local takebox = tex.takebox
+
+ local function hpack_string(str)
+ expandmacro("syst_v_p",true,str)
+ return tonut(takebox("scratchbox"))
+ end
+
+-- ... if okay it will replace the current hpack_string in node_typ
+
local function sometext(str,layer,color,textcolor,lap,variant)
local text = hpack_string(str,usedfont)
local size = getwidth(text)