summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/typo-spa.mkiv
diff options
context:
space:
mode:
authorTaco Hoekwater <taco@elvenkind.com>2010-05-24 14:05:02 +0000
committerTaco Hoekwater <taco@elvenkind.com>2010-05-24 14:05:02 +0000
commit57ea7dad48fbf2541c04e434c31bde655ada3ac4 (patch)
tree1f8b43bc7cb92939271e1f5bec610710be69097f /Master/texmf-dist/tex/context/base/typo-spa.mkiv
parent6ee41e1f1822657f7f23231ec56c0272de3855e3 (diff)
here is context 2010.05.24 13:05
git-svn-id: svn://tug.org/texlive/trunk@18445 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.mkiv12
1 files changed, 6 insertions, 6 deletions
diff --git a/Master/texmf-dist/tex/context/base/typo-spa.mkiv b/Master/texmf-dist/tex/context/base/typo-spa.mkiv
index d1b855edd6b..e059b62e454 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]
+\definesystemattribute[spacing] \chardef\spacingattribute \dogetattributeid{spacing}
% experimental spacing
%
@@ -25,13 +25,13 @@
\newcount \maxcharacterspacingid
-\def\definecharacterspacing[#1]%
+\unexpanded\def\definecharacterspacing[#1]%
{\ifcsname\??ch#1\endcsname \else
\global\advance\maxcharacterspacingid\plusone
\setxvalue{\??ch:#1}{\the\maxcharacterspacingid}%
\fi}
-\def\setupcharacterspacing
+\unexpanded\def\setupcharacterspacing
{\dotripleargument\dosetupcharacterspacing}
\def\dosetupcharacterspacing[#1][#2][#3]%
@@ -43,12 +43,12 @@
\fi}
\def\setcharacterspacing
- {\ctxlua{spacings.enabled=true}%
- \gdef\setcharacterspacing[##1]{\dosetattribute{spacing}{\csname\??ch:##1\endcsname}}%
+ {\ctxlua{spacings.enable()}%
+ \gdef\setcharacterspacing[##1]{\attribute\spacingattribute\csname\??ch:##1\endcsname\relax}%
\setcharacterspacing}
\def\resetcharacterspacing
- {\doresetattribute{spacing}}
+ {\attribute\spacingattribute\attributeunsetvalue}
\letvalue{\??ch:\s!reset}\attributeunsetvalue