diff options
author | Marius <mariausol@gmail.com> | 2010-09-08 15:27:58 +0300 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2010-09-08 15:27:58 +0300 |
commit | 821d6141a92d80d6195b87fe1c25fb2fd83042d5 (patch) | |
tree | 53f8c98927a0435184c3ae40324cfdc996e8bd4a /tex/context/base/spac-par.mkiv | |
parent | 16895587e51f8243a7e4dc6185979894fb199d4f (diff) | |
download | context-821d6141a92d80d6195b87fe1c25fb2fd83042d5.tar.gz |
beta 2010.09.05 13:23
Diffstat (limited to 'tex/context/base/spac-par.mkiv')
-rw-r--r-- | tex/context/base/spac-par.mkiv | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/tex/context/base/spac-par.mkiv b/tex/context/base/spac-par.mkiv index 3477b1c1b..4093edcac 100644 --- a/tex/context/base/spac-par.mkiv +++ b/tex/context/base/spac-par.mkiv @@ -52,7 +52,7 @@ \newtoks\everynextparagraphintro \newtoks\@@everyparagraphtoks -\chardef\everyparagraphintro\zerocount +\newconstant\everyparagraphintrostate \unexpanded\def\setupparagraphintro {\dodoubleempty\dosetupparagraphintro} @@ -60,14 +60,14 @@ \def\dosetupparagraphintro[#1][#2]% {\processallactionsinset [#1] - [ \v!reset=>\global\chardef\everyparagraphintro\zerocount + [ \v!reset=>\global\everyparagraphintrostate\zerocount \global\everyfirstparagraphintro\emptytoks \global\everynextparagraphintro \emptytoks, - \v!first=>\global\chardef\everyparagraphintro\plusone + \v!first=>\global\everyparagraphintrostate\plusone \doglobal\appendtoks#2\to\everyfirstparagraphintro, - \v!next=>\ifcase\everyparagraphintro\global\chardef\everyparagraphintro\plusone\fi + \v!next=>\ifcase\everyparagraphintrostate\global\everyparagraphintrostate\plusone\fi \doglobal\appendtoks#2\to\everynextparagraphintro, - \v!each=>\ifcase\everyparagraphintro\global\chardef\everyparagraphintro\plustwo\fi + \v!each=>\ifcase\everyparagraphintrostate\global\everyparagraphintrostate\plustwo\fi \doglobal\appendtoks#2\to\everyfirstparagraphintro \doglobal\appendtoks#2\to\everynextparagraphintro]} @@ -84,22 +84,22 @@ %D \stoptyping \def\flushatparagraph#1% - {\global\chardef\everyparagraphintro\plusone + {\global\everyparagraphintrostate\plusone \global\appendtoks{#1}\to\everyfirstparagraphintro \global\let\insertparagraphintro\doinsertparagraphintro} \def\doinsertparagraphintro % can be merged with the next - {\ifcase\everyparagraphintro\else\@EA\dodoinsertparagraphintro\fi} + {\ifcase\everyparagraphintrostate\else\@EA\dodoinsertparagraphintro\fi} \def\dodoinsertparagraphintro {\begingroup \everypar\emptytoks - \ifcase\everyparagraphintro\relax + \ifcase\everyparagraphintrostate\relax % no data \@@everyparagraphtoks\emptytoks \or % first data - \global\chardef\everyparagraphintro\plustwo + \global\everyparagraphintrostate\plustwo \@@everyparagraphtoks\everyfirstparagraphintro \global\everyfirstparagraphintro\emptytoks \or |