diff options
| author | Hans Hagen <pragma@wxs.nl> | 2010-01-08 23:58:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2010-01-08 23:58:00 +0100 |
| commit | b49a72625ea82574863b42d6b8782c9ce9aba4f7 (patch) | |
| tree | 45307e33f4e1ff9c50aca46fb9fdc6f7455e378c /tex/context/base/typo-cap.mkiv | |
| parent | f43952a7dc197eb796722c4ca4a5ccb5638b5165 (diff) | |
| download | context-b49a72625ea82574863b42d6b8782c9ce9aba4f7.tar.gz | |
beta 2010.01.08 23:58
Diffstat (limited to 'tex/context/base/typo-cap.mkiv')
| -rw-r--r-- | tex/context/base/typo-cap.mkiv | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/tex/context/base/typo-cap.mkiv b/tex/context/base/typo-cap.mkiv index 40885d6c2..bc4b9a00c 100644 --- a/tex/context/base/typo-cap.mkiv +++ b/tex/context/base/typo-cap.mkiv @@ -17,7 +17,7 @@ \registerctxluafile{typo-cap}{1.001} -\definesystemattribute[case] +\definesystemattribute[case] \chardef\caseattribute \dogetattributeid{case} %D \macros %D {Word, Words, WORD, WORDS} @@ -53,7 +53,7 @@ \unexpanded\def\setcharactercasing {\ctxlua{cases.enable()}% - \gdef\setcharactercasing[##1]{\dosetattribute{case}{\number##1}}% + \gdef\setcharactercasing[##1]{\attribute\caseattribute##1\relax}% \setcharactercasing} \unexpanded\def\WORD {\groupedcommand{\setcharactercasing[\plusone ]}{}} @@ -199,6 +199,8 @@ % % \definestartstop[randomized][\c!before=\dosetattribute{case}{8},\c!after=] -\def\randomizetext{\groupedcommand{\dosetattribute{case}{8}}{}} +\def\randomizetext{\groupedcommand{\attribute\caseattribute\pluseight}{}} + +\definestartstop[randomized][\c!before=\dosetattribute{case}{8},\c!after=] \protect \endinput |