diff options
author | Marius <mariausol@gmail.com> | 2012-10-19 01:21:22 +0300 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2012-10-19 01:21:22 +0300 |
commit | c36e19abdfd15bf6cae6fa379c6ce51f3ef5332d (patch) | |
tree | 385d8e72bcaf31513b9ae46ec947818648187082 /tex/context/base/typo-spa.mkiv | |
parent | 69d2352af4b60929b37fc49f3bdb263977016244 (diff) | |
download | context-c36e19abdfd15bf6cae6fa379c6ce51f3ef5332d.tar.gz |
beta 2012.10.19 00:06
Diffstat (limited to 'tex/context/base/typo-spa.mkiv')
-rw-r--r-- | tex/context/base/typo-spa.mkiv | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/tex/context/base/typo-spa.mkiv b/tex/context/base/typo-spa.mkiv index 0cfe44610..df2dab47c 100644 --- a/tex/context/base/typo-spa.mkiv +++ b/tex/context/base/typo-spa.mkiv @@ -25,7 +25,12 @@ \installcorenamespace{characterspacing} -\definesystemvariable{cs} % maybe a dummy namespace +\installsetuponlycommandhandler \??characterspacing {_p_characterspacing} % private + +\setup_p_characterspacing + [\c!left=0, + \c!right=0, + \c!alternative=0] \unexpanded\def\definecharacterspacing[#1]% {\ctxcommand{definecharacterspacing("#1")}} @@ -35,11 +40,11 @@ \def\typo_characterspacing_setup[#1][#2][#3]% todo: #2 list {\begingroup - \getparameters[\??cs][\c!left=0,\c!right=0,\c!alternative=0,#3]% - \ctxcommand{setupcharacterspacing("#1",\number#2, { - left = \@@csleft, - right = \@@csright, - alternative = \@@csalternative + \setupcurrent_p_characterspacing[#3]% + \ctxcommand{setupcharacterspacing("#1",\number#2, { % todo: just pass #3 to the lua end + left = \direct_p_characterspacingparameter\c!left, + right = \direct_p_characterspacingparameter\c!right, + alternative = \direct_p_characterspacingparameter\c!alternative })}% \endgroup} |