diff options
author | Taco Hoekwater <taco@elvenkind.com> | 2011-06-01 08:54:21 +0000 |
---|---|---|
committer | Taco Hoekwater <taco@elvenkind.com> | 2011-06-01 08:54:21 +0000 |
commit | d7ccb42582f85acf30568913610ccf4d602023fb (patch) | |
tree | 7292e3545a420676878e7451b68892d360c62cb6 /Master/texmf-dist/tex/context/base/typo-spa.mkiv | |
parent | 2d62a6fe9b80def59c392268022f1f9a2d6e358f (diff) |
commit context 2011.05.18
git-svn-id: svn://tug.org/texlive/trunk@22719 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/context/base/typo-spa.mkiv')
-rw-r--r-- | Master/texmf-dist/tex/context/base/typo-spa.mkiv | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/Master/texmf-dist/tex/context/base/typo-spa.mkiv b/Master/texmf-dist/tex/context/base/typo-spa.mkiv index e059b62e454..7a72e95adae 100644 --- a/Master/texmf-dist/tex/context/base/typo-spa.mkiv +++ b/Master/texmf-dist/tex/context/base/typo-spa.mkiv @@ -17,7 +17,7 @@ \registerctxluafile{typo-spa}{1.001} -\definesystemattribute[spacing] \chardef\spacingattribute \dogetattributeid{spacing} +\definesystemattribute[spacing][public] % experimental spacing % @@ -38,20 +38,22 @@ {\ifcsname\??ch:#1\endcsname \begingroup % for the moment we use modes, in ordere to avoid interface translation \getparameters[\??ch][\c!left=0,\c!right=0,\c!alternative=0,#3]% - \ctxlua{spacings.setspacing(\getvalue{\??ch:#1},\number#2,\@@chleft,\@@chright,\@@chalternative)}% + \ctxlua{typesetters.spacings.setup(\getvalue{\??ch:#1},\number#2,\@@chleft,\@@chright,\@@chalternative)}% \endgroup \fi} -\def\setcharacterspacing - {\ctxlua{spacings.enable()}% - \gdef\setcharacterspacing[##1]{\attribute\spacingattribute\csname\??ch:##1\endcsname\relax}% - \setcharacterspacing} +\unexpanded\def\setcharacterspacing[#1]% + {\ctxlua{typesetters.spacings.set(\number\csname\??ch:#1\endcsname)}} -\def\resetcharacterspacing +\unexpanded\def\resetcharacterspacing % fast one {\attribute\spacingattribute\attributeunsetvalue} \letvalue{\??ch:\s!reset}\attributeunsetvalue +\appendtoks + \resetcharacterspacing +\to \everyresettypesetting + % \setcharacterspacing[frenchpunctuation] % «\type{bla}»\crlf « \type{bla}»\crlf % «bla »\crlf « bla»\crlf « bla »\crlf |