beta 2010.11.18 19:20

1 files changed, 13 insertions, 2 deletions

diff --git a/tex/context/base/font-ctx.lua b/tex/context/base/font-ctx.lua
index 91fc72e6b..a633fe259 100644
--- a/tex/context/base/font-ctx.lua
+++ b/tex/context/base/font-ctx.lua
@@ -62,7 +62,6 @@ local xheightdata = fonts.xheights
 
 fonts.ids      = fontdata -- we keep this one for a while (as it is used in mk etc)
 
-
 -- todo: give parameters at the lua end a metatable
 
 --~ function parameters(t,k)
@@ -95,10 +94,22 @@ local nulldata = {
         xheight      = 338952, -- 5
         quad         = 786432, -- 6
         extraspace   =  85459, -- 7
-
     },
 }
 
+function definers.resetnullfont()
+    -- resetting is needed because tikz misuses nullfont
+    local p = nulldata.parameters
+    p.slant        = 0 -- 1
+    p.space        = 0 -- 2
+    p.spacestretch = 0 -- 3
+    p.spaceshrink  = 0 -- 4
+    p.xheight      = 0 -- 5
+    p.quad         = 0 -- 6
+    p.extraspace   = 0 -- 7
+    definers.resetnullfont = function() end
+end
+
 setmetatablekey(fontdata, "__index", function(t,k)
     return nulldata
 end)