diff options
| author | Hans Hagen <pragma@wxs.nl> | 2008-10-31 13:58:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2008-10-31 13:58:00 +0100 |
| commit | 94d83f84758766511c5e324721e39fea6ab71dae (patch) | |
| tree | f167feb88a41f95f09e3b9cee5f2db2f765de38e /tex/context/base/enco-run.tex | |
| parent | 560319dff7b42057a116447a8043b59d56d21cd8 (diff) | |
| download | context-94d83f84758766511c5e324721e39fea6ab71dae.tar.gz | |
stable 2008.10.31 13:58
Diffstat (limited to 'tex/context/base/enco-run.tex')
| -rw-r--r-- | tex/context/base/enco-run.tex | 43 |
1 files changed, 20 insertions, 23 deletions
diff --git a/tex/context/base/enco-run.tex b/tex/context/base/enco-run.tex index d78b6e4c8..8e50e9398 100644 --- a/tex/context/base/enco-run.tex +++ b/tex/context/base/enco-run.tex @@ -98,8 +98,6 @@ % {\font\test=uplr8t \test \ruledhbox{t} % \font\test=uplr8r \test \ruledhbox{t}} -\beginETEX \fontcharwd - \gdef\showcharacterbounds {\bgroup \localcolortrue @@ -109,31 +107,30 @@ \fi}\unskip \egroup} -\endETEX +\beginOLDTEX -\beginTEX + \gdef\showhyphenations#1% + {\starttabulate[|le|l|] + \NC language \NC \currentlanguage\ (internal code:\the\normallanguage) \NC \NR + \NC font \NC \fontname\font \NC \NR + \NC encoding \NC \ifx\@@fontencoding\empty not set\else\@@fontencoding\fi \NC \NR + \NC mapping \NC \ifx\@@fontmapping \empty not set\else\@@fontmapping \fi \NC \NR + \NC handling \NC \ifx\@@fonthandling\empty not set\else\@@fonthandling\fi \NC \NR + \NC sample \NC \hyphenatedword{#1} \NC \NR + \stoptabulate} -\gdef\showcharacterbounds - {\bgroup - \localcolortrue - \dorecurse{255} - {\setbox\scratchbox\ruledhbox{\darkgray\char\recurselevel}% - \ifnum\wd\scratchbox>\zeropoint - \noindent\box\scratchbox\space - \fi}\unskip - \egroup} +\endOLDTEX + +\beginNEWTEX -\endTEX + \gdef\showhyphenations#1% + {\starttabulate[|le|l|] + \NC language \NC \currentlanguage\ (internal code:\the\normallanguage) \NC \NR + \NC font \NC \fontname\font \NC \NR + \NC sample \NC \hyphenatedword{#1} \NC \NR + \stoptabulate} -\gdef\showhyphenations#1% - {\starttabulate[|le|l|] - \NC language \NC \currentlanguage\ (internal code:\the\normallanguage) \NC \NR - \NC font \NC \fontname\font \NC \NR - \NC encoding \NC \ifx\@@fontencoding\empty not set\else\@@fontencoding\fi \NC \NR - \NC mapping \NC \ifx\@@fontmapping \empty not set\else\@@fontmapping \fi \NC \NR - \NC handling \NC \ifx\@@fonthandling\empty not set\else\@@fonthandling\fi \NC \NR - \NC sample \NC \hyphenatedword{#1} \NC \NR - \stoptabulate} +\endNEWTEX \gdef\showmapping {\dostepwiserecurse{128}{255}{1} |