summaryrefslogtreecommitdiff
path: root/tex/context/base/page-sid.mkiv
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2010-09-05 13:23:00 +0200
committerHans Hagen <pragma@wxs.nl>2010-09-05 13:23:00 +0200
commit536e4dd4fe2e98c3cefdb9741507c20f4489e2c0 (patch)
treed49d2a223c08240cb83c3d702af8226ee05ff84c /tex/context/base/page-sid.mkiv
parent0da1a7a94f55a5dc0d318f399eb843303d5b62f6 (diff)
downloadcontext-536e4dd4fe2e98c3cefdb9741507c20f4489e2c0.tar.gz
beta 2010.09.05 13:23
Diffstat (limited to 'tex/context/base/page-sid.mkiv')
-rw-r--r--tex/context/base/page-sid.mkiv22
1 files changed, 11 insertions, 11 deletions
diff --git a/tex/context/base/page-sid.mkiv b/tex/context/base/page-sid.mkiv
index c30204a4e..e54b4ecd5 100644
--- a/tex/context/base/page-sid.mkiv
+++ b/tex/context/base/page-sid.mkiv
@@ -84,16 +84,16 @@
% 7 = rightedge
% 8 = cutspace
-\chardef\sidefloattype\zerocount
+\newconstant\sidefloattype
-\def\backspacefloat {\global\chardef\sidefloattype1 \putsidefloat}
-\def\leftedgefloat {\global\chardef\sidefloattype2 \putsidefloat}
-\def\leftmarginfloat {\global\chardef\sidefloattype3 \putsidefloat}
-\def\leftfloat {\global\chardef\sidefloattype4 \putsidefloat}
-\def\rightfloat {\global\chardef\sidefloattype5 \putsidefloat}
-\def\rightmarginfloat {\global\chardef\sidefloattype6 \putsidefloat}
-\def\rightedgefloat {\global\chardef\sidefloattype7 \putsidefloat}
-\def\cutspacefloat {\global\chardef\sidefloattype8 \putsidefloat}
+\def\backspacefloat {\global\sidefloattype1 \putsidefloat}
+\def\leftedgefloat {\global\sidefloattype2 \putsidefloat}
+\def\leftmarginfloat {\global\sidefloattype3 \putsidefloat}
+\def\leftfloat {\global\sidefloattype4 \putsidefloat}
+\def\rightfloat {\global\sidefloattype5 \putsidefloat}
+\def\rightmarginfloat {\global\sidefloattype6 \putsidefloat}
+\def\rightedgefloat {\global\sidefloattype7 \putsidefloat}
+\def\cutspacefloat {\global\sidefloattype8 \putsidefloat}
\let\marginfloat \cutspacefloat
@@ -474,9 +474,9 @@
\fi\fi
\else
\ifnum\sidefloattype<\plusfour
- \global\chardef\sidefloattype\plusfour
+ \global\sidefloattype\plusfour
\else\ifnum\sidefloattype>\plusfive
- \global\chardef\sidefloattype\plusfive
+ \global\sidefloattype\plusfive
\fi\fi
\fi
\previoussidefloat