summaryrefslogtreecommitdiff
path: root/tex/context/base/typo-spa.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/typo-spa.mkiv')
-rw-r--r--tex/context/base/typo-spa.mkiv17
1 files changed, 6 insertions, 11 deletions
diff --git a/tex/context/base/typo-spa.mkiv b/tex/context/base/typo-spa.mkiv
index df2dab47c..0cfe44610 100644
--- a/tex/context/base/typo-spa.mkiv
+++ b/tex/context/base/typo-spa.mkiv
@@ -25,12 +25,7 @@
\installcorenamespace{characterspacing}
-\installsetuponlycommandhandler \??characterspacing {_p_characterspacing} % private
-
-\setup_p_characterspacing
- [\c!left=0,
- \c!right=0,
- \c!alternative=0]
+\definesystemvariable{cs} % maybe a dummy namespace
\unexpanded\def\definecharacterspacing[#1]%
{\ctxcommand{definecharacterspacing("#1")}}
@@ -40,11 +35,11 @@
\def\typo_characterspacing_setup[#1][#2][#3]% todo: #2 list
{\begingroup
- \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
+ \getparameters[\??cs][\c!left=0,\c!right=0,\c!alternative=0,#3]%
+ \ctxcommand{setupcharacterspacing("#1",\number#2, {
+ left = \@@csleft,
+ right = \@@csright,
+ alternative = \@@csalternative
})}%
\endgroup}