summaryrefslogtreecommitdiff
path: root/tex/context/modules/mkxl
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-02-05 18:08:41 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-02-05 18:08:41 +0100
commit5a7dd5d18ced4a73b05467f208d4c4b0d1afebc0 (patch)
tree7138a651a94fb013e584b080c50c4681321617cc /tex/context/modules/mkxl
parentab4fc27d8b1541b491621e07ab1f40f30aaf50ae (diff)
downloadcontext-5a7dd5d18ced4a73b05467f208d4c4b0d1afebc0.tar.gz
2021-02-05 17:44:00
Diffstat (limited to 'tex/context/modules/mkxl')
-rw-r--r--tex/context/modules/mkxl/s-fonts-show.mkxl15
-rw-r--r--tex/context/modules/mkxl/s-symbols-show.mkxl16
2 files changed, 16 insertions, 15 deletions
diff --git a/tex/context/modules/mkxl/s-fonts-show.mkxl b/tex/context/modules/mkxl/s-fonts-show.mkxl
index 4b6fbf998..42b5af125 100644
--- a/tex/context/modules/mkxl/s-fonts-show.mkxl
+++ b/tex/context/modules/mkxl/s-fonts-show.mkxl
@@ -92,11 +92,8 @@
{\bgroup
\iftok{#1}\emptytoks\else
\definedfont[#1]%
- \ifdim2.5\emwidth>.05\hsize
- \tx
- \ifdim2.5\emwidth>.05\hsize
- \txx
- \fi
+ \ifdim40\emwidth>\hsize
+ \glyphscale750\relax
\fi
\fi
\integerdef\c_module_fonts_font_id\fontid\font
@@ -126,7 +123,7 @@
\scratchdimenone 2.5\emwidth
\scratchdimentwo 2.4\emwidth
\scratchdimenthree2.3\emwidth
- \edef\charplane{\number#2}%
+ \scratchcounterfour#2\relax
\forgetall
\startoverlay % easier in cld
{\vbox
@@ -177,8 +174,8 @@
\hpack
{\dostepwiserecurse\zerocount{15}\plusone
{\scratchcountertwo \recurselevel
- \scratchcounter \numexpr\scratchcounterone*16+\scratchcountertwo\relax
- \scratchcounterthree\numexpr\charplane*256+\scratchcounter\relax
+ \scratchcounterthree\numexpr\scratchcounterone*16+\scratchcountertwo\relax
+ \scratchcounterthree\numexpr\scratchcounterfour*256+\scratchcounterthree\relax
\iffontchar\font\scratchcounterthree
\setbox\scratchbox\ruledhpack{\char\scratchcounterthree}%
\bgroup
@@ -197,7 +194,7 @@
\nointerlineskip
\vskip2\points
% the \noexpand before \blank is needed for non etex
- \edef\theshowfontspecs{name: {\noexpand\black\fontname\font}\quad plane: \charplane\enspace"\hexnumber\charplane}%
+ \edef\theshowfontspecs{name: {\noexpand\black\fontname\font}\quad plane: \the\scratchcounterfour\enspace"\hexnumber\scratchcounterfour}%
\tf % also sets em
\hbox to 40\emwidth{\blue\hfill\tinyfont\setstrut\strut\theshowfontspecs}
\egroup
diff --git a/tex/context/modules/mkxl/s-symbols-show.mkxl b/tex/context/modules/mkxl/s-symbols-show.mkxl
index a2cda24d1..37d42fe00 100644
--- a/tex/context/modules/mkxl/s-symbols-show.mkxl
+++ b/tex/context/modules/mkxl/s-symbols-show.mkxl
@@ -11,6 +11,8 @@
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
+% todo: implementor
+
\startluacode
function commands.showsymbolset(collection,symbols,fontid)
if type(symbols) == "string" then
@@ -43,24 +45,26 @@
end
local detail = defined and byname
context.start()
- context.forcesymbolset { collection }
+ context.setupsymbolset { collection }
context.starttabulate { detail and "|lT|l|l|lT|" or "|lT|l|l|"}
for symbol, how in table.sortedhash(list) do
- context.NC()
if detail and how then
- context.bold(symbol)
+ context.BC()
else
- context(symbol)
+ context.NC()
end
+ context(symbol)
context.NC()
context.symbol(symbol)
context.NC()
context.framed(options,context.nested.symbol(symbol))
- context.NC()
if detail and how then
- context.bold("defined")
+ context.BC()
+ context("defined")
+ else
context.NC()
end
+ context.NC()
context.NR()
end
context.stoptabulate()