From 821d6141a92d80d6195b87fe1c25fb2fd83042d5 Mon Sep 17 00:00:00 2001
From: Marius <mariausol@gmail.com>
Date: Wed, 8 Sep 2010 15:27:58 +0300
Subject: beta 2010.09.05 13:23

---
 tex/context/base/scrn-bar.mkiv | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

(limited to 'tex/context/base/scrn-bar.mkiv')

diff --git a/tex/context/base/scrn-bar.mkiv b/tex/context/base/scrn-bar.mkiv
index dbeaf6d7f..0b2dfc627 100644
--- a/tex/context/base/scrn-bar.mkiv
+++ b/tex/context/base/scrn-bar.mkiv
@@ -263,6 +263,8 @@
      \!!height.5\interactionbarheight \!!depth.5\interactionbardepth \else
      \!!height  \interactionbarheight \!!depth  \interactionbardepth \fi}
 
+\newconstant\interactionbarwhatmode
+
 \unexpanded\def\@@commoninteractionbarx#1%
   {\doifelse{\interactionbarparameter\c!symbol}\v!yes
      {\setupsymbolset[\@@iasymbolset]%
@@ -270,11 +272,11 @@
      {\let\dogotox\@@commoninteractionbargotob}%
    \dorecurse\nofsubpages
      {\scratchcounter\numexpr\recurselevel+\firstsubpage+\minusone\relax
-      \chardef\what
+      \interactionbarwhatmode
         \ifnum\scratchcounter<\realpageno \zerocount \else
         \ifnum\scratchcounter=\realpageno \plusone   \else
                                           \plustwo   \fi\fi
-      \normalexpanded{\directgotospecbox\noexpand\interactionbarparameter{\dogotox\what}[page(\the\scratchcounter)]}%
+      \normalexpanded{\directgotospecbox\noexpand\interactionbarparameter{\dogotox\interactionbarwhatmode}[page(\the\scratchcounter)]}%
       #1}%
    \unskip}
 
@@ -346,7 +348,7 @@
           \advance\!!countf \plusone
           \ifnum\recurselevel=\firstsubpage\relax \!!doneatrue \fi
           \ifnum\recurselevel=\lastsubpage \relax \!!doneatrue \fi
-          \chardef\what \if!!donea
+          \interactionbarwhatmode \if!!donea
             \ifnum\recurselevel<\realpageno \zerocount \else
             \ifnum\recurselevel>\realpageno \plustwo   \else
                                             \plusfour  \fi\fi
@@ -355,7 +357,7 @@
             \ifnum\recurselevel>\realpageno \plusthree \else
                                             \plustwo   \fi\fi
           \fi \fi
-          \normalexpanded{\directgotospecbox\noexpand\interactionbarparameter{\dogotox\what}[page(\recurselevel)]}%
+          \normalexpanded{\directgotospecbox\noexpand\interactionbarparameter{\dogotox\interactionbarwhatmode}[page(\recurselevel)]}%
           \hss
           \!!countf\zerocount}%
        \unskip
-- 
cgit v1.2.3