diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/mkiv/symb-run.mkiv')
-rw-r--r-- | Master/texmf-dist/tex/context/base/mkiv/symb-run.mkiv | 62 |
1 files changed, 7 insertions, 55 deletions
diff --git a/Master/texmf-dist/tex/context/base/mkiv/symb-run.mkiv b/Master/texmf-dist/tex/context/base/mkiv/symb-run.mkiv index c25d13d48bf..ed4d90861ec 100644 --- a/Master/texmf-dist/tex/context/base/mkiv/symb-run.mkiv +++ b/Master/texmf-dist/tex/context/base/mkiv/symb-run.mkiv @@ -12,55 +12,23 @@ %C details. \startluacode - function commands.showsymbolset(collection,symbols,fontid) + function commands.showsymbolset(collection,symbols) if type(symbols) == "string" then symbols = utilities.parsers.settings_to_array(symbols) end - local options = { framecolor = "orange", rulethickness = ".8pt", offset = interfaces.variables.overlay } - local list = table.tohash(symbols) - local alsofont = fontid > 0 - local defined = #symbols > 0 - local byname = false - if alsofont then - local is_symbol = characters.is_symbol - local chardata = characters.data - local resources = fonts.hashes.resources [fontid] - local characters = fonts.hashes.characters[fontid] - if resources and characters then - local unicodes = resources.unicodes - if unicodes then - for name, unicode in next, unicodes do - if not list[name] and name ~= ".notdef" then - local c = rawget(chardata,unicode) - if not c or is_symbol[c.category] then - list[name] = false - byname = true - end - end - end - end - end - end - local detail = defined and byname context.start() context.forcesymbolset { collection } - context.starttabulate { detail and "|lT|l|l|lT|" or "|lT|l|l|"} - for symbol, how in table.sortedhash(list) do + context.starttabulate { "|lT|l|l|" } + local options = { framecolor = "orange", rulethickness = ".8pt", offset = interfaces.variables.overlay } + for i=1,#symbols do + local symbol = symbols[i] context.NC() - if detail and how then - context.bold(symbol) - else - context(symbol) - 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.NC() - end context.NR() end context.stoptabulate() @@ -74,23 +42,7 @@ {\dosingleargument\symb_show_set} \gdef\symb_show_set[#1]% - {\begingroup - \edef\p_font{\begincsname\??symboldefault#1\endcsname}% - \begingroup - \ifx\p_font\empty - \global\globalscratchcounter\zerocount - \else - \definedfont[\p_font]% - \global\globalscratchcounter\fontid\font\relax - \fi - \endgroup - \ctxcommand { - showsymbolset ( - "#1", - "\symbolset{#1}", - \the\globalscratchcounter - ) }% - \endgroup} + {\ctxcommand{showsymbolset("#1","\symbolset{#1}")}} \protect |