diff options
| author | Hans Hagen <pragma@wxs.nl> | 2007-08-20 10:21:00 +0200 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2007-08-20 10:21:00 +0200 |
| commit | deecfe09c774d4c2835f6999b2cdd9ca07e9bdae (patch) | |
| tree | c921185fc4f848363c7d2ebf48a24e575c8194fe /tex/context/base/font-ini.mkiv | |
| parent | 14fbfde2ad32d2fe4a831aa9007877e5cb5764be (diff) | |
| download | context-deecfe09c774d4c2835f6999b2cdd9ca07e9bdae.tar.gz | |
stable 2007.08.20 10:21
Diffstat (limited to 'tex/context/base/font-ini.mkiv')
| -rw-r--r-- | tex/context/base/font-ini.mkiv | 22 |
1 files changed, 16 insertions, 6 deletions
diff --git a/tex/context/base/font-ini.mkiv b/tex/context/base/font-ini.mkiv index dd597d41f..45ff3480e 100644 --- a/tex/context/base/font-ini.mkiv +++ b/tex/context/base/font-ini.mkiv @@ -31,12 +31,14 @@ \def\otfchar#1{\ctxlua{fonts.otf.char("#1")}} -\registerrgbcolor {font:init} {1}{0}{0}% -\registerrgbcolor {font:medi} {0}{1}{0}% -\registerrgbcolor {font:fina} {0}{0}{1}% -\registerrgbcolor {font:isol} {0}{1}{1}% -\registerrgbcolor {font:mark} {1}{0}{1}% -\registerrgbcolor {font:rest} {1}{1}{0}% +%D: We cannot yet inherit because no colors are predefined. + +\definecolor[font:init][r=.75] +\definecolor[font:medi][g=.75] +\definecolor[font:fina][b=.75] +\definecolor[font:isol][y=.75] +\definecolor[font:mark][m=.75] +\definecolor[font:rest][c=.75] %D goodies: %D @@ -69,4 +71,12 @@ \def\doinstallfontfeature[#1][#2]% {\ctxlua{fonts.install_feature("#1","#2")}} +%D Not yet in \MKII. + +\def\fontfeatureslist + {\dodoubleargument\dofontfeatureslist} + +\def\dofontfeatureslist[#1][#2]% todo: arg voor type + {\ctxlua{tex.sprint(tex.ctxcatcodes,fonts.define.specify.context_tostring("#1","otf","\luaescapestring{#2}","yes","no",true))}} + \protect \endinput |