beta 2009.12.03 00:41

4 files changed, 17 insertions, 11 deletions

diff --git a/tex/context/base/enco-ffr.mkii b/tex/context/base/enco-ffr.mkii
index c321153e8..093cc6500 100644
--- a/tex/context/base/enco-ffr.mkii
+++ b/tex/context/base/enco-ffr.mkii
@@ -41,6 +41,10 @@
     \defineactivecharacter ? {\mathortext{?}{\directdiscretionary{?}}}
 \stoplanguagespecifics
 
+\appendtoks % maybe everywhere
+    \chardef\activecharactermode\zerocount
+\to\everyMPgraphic
+
 % maybe tricky due to possible name clashes:
 %
 % \def\ieme {\highordinalstr{e}}
diff --git a/tex/context/base/math-dim.lua b/tex/context/base/math-dim.lua
index bc3646872..b1e9635ae 100644
--- a/tex/context/base/math-dim.lua
+++ b/tex/context/base/math-dim.lua
@@ -21,9 +21,9 @@ local defaults = {
         ['default']={ "AccentBaseHeight", "x_height" },
     },
     ['fraction_del_size']={
-        ['default']={ "0", "delim2" },
-        ['cramped_display_style']={ "0", "delim1" },
-        ['display_style']={ "0", "delim1" },
+        ['default']={ "FractionDelimiterSize", "delim2" },
+        ['cramped_display_style']={ "FractionDelimiterDisplayStyleSize", "delim1" },
+        ['display_style']={ "FractionDelimiterDisplayStyleSize", "delim1" },
      },
     ['fraction_denom_down']={
         ['default']={ "FractionDenominatorShiftDown", "denom2" },
@@ -260,6 +260,9 @@ function mathematics.dimensions(dimens)
             FractionNumeratorGapMin                     = t . fraction_num_vgap     . text_style,
             FractionNumeratorShiftUp                    = t . fraction_num_up       . text_style,
             FractionRuleThickness                       = t . fraction_rule         . text_style,
+--~ not yet in my bin :
+--~             FractionDelimiterSize                       = t . fraction_del_size     . text_style,
+--~             FractionDelimiterDisplayStyleSize           = t . fraction_del_size     . display_style,
             LowerLimitBaselineDropMin                   = t . limit_below_bgap      . text_style,
             LowerLimitGapMin                            = t . limit_below_vgap      . text_style,
             OverbarExtraAscender                        = t . overbar_kern          . text_style,
diff --git a/tex/context/base/meta-ini.mkii b/tex/context/base/meta-ini.mkii
index f9d097049..e4fb2e14e 100644
--- a/tex/context/base/meta-ini.mkii
+++ b/tex/context/base/meta-ini.mkii
@@ -715,6 +715,7 @@
 \appendtoks
     \disablediscretionaries
     \disablecompoundcharacters
+    \chardef\activecharactermode\zerocount % new, experimental (if complaints than only in enco-ffr.mkii)
 \to\everyMPgraphic
 
 \appendtoks
diff --git a/tex/context/base/typo-mir.lua b/tex/context/base/typo-mir.lua
index b85a8b833..54b88dfac 100644
--- a/tex/context/base/typo-mir.lua
+++ b/tex/context/base/typo-mir.lua
@@ -156,6 +156,7 @@ function mirror.process(namespace,attribute,start) -- todo: make faster
     local lro, rlo, prevattr, inmath = false, false, 0, false
     while current do
         local id = current.id
+--~ print(id,attribute,has_attribute(current,attribute))
         if skipmath and id == mthnode then
             local subtype = current.subtype
             if subtype == 0 then
@@ -172,8 +173,7 @@ function mirror.process(namespace,attribute,start) -- todo: make faster
         else
             local attr = has_attribute(current,attribute)
             if attr and attr > 0 then
-                unset_attribute(current,attribute) -- slow, needed?
---~             set_attribute(current,attribute,0) -- might be faster
+             -- unset_attribute(current,attribute) -- slow, needed?
                 if attr == 1 then
                     -- bidi parsing mode
                 elseif attr ~= prevattr then
@@ -312,12 +312,10 @@ function mirror.process(namespace,attribute,start) -- todo: make faster
                         end
                         obsolete[#obsolete+1] = current
                     end
-                else
-                    if trace_mirroring then
-                        local char = current.char
-                        local d = directions[char]
-                        list[#list+1] = format("char %s (%s / U+%04X) of class %s (no bidi)",utfchar(char),char,char,d or "?")
-                    end
+                elseif trace_mirroring then
+                    local char = current.char
+                    local d = directions[char]
+                    list[#list+1] = format("char %s (%s / U+%04X) of class %s (no bidi)",utfchar(char),char,char,d or "?")
                 end
             elseif id == whatsit then
                 if finish then