beta 2011.11.02 20:10

1 files changed, 8 insertions, 0 deletions

diff --git a/tex/context/base/font-ctx.lua b/tex/context/base/font-ctx.lua
index 4a902c1e4..ffc774f3f 100644
--- a/tex/context/base/font-ctx.lua
+++ b/tex/context/base/font-ctx.lua
@@ -107,6 +107,7 @@ commands.resetnullfont = definers.resetnullfont
 setmetatableindex(fontdata, function(t,k) return nulldata end)
 
 local chardata      = allocate() -- chardata
+local descriptions  = allocate()
 local parameters    = allocate()
 local properties    = allocate()
 local quaddata      = allocate()
@@ -116,6 +117,7 @@ local csnames       = allocate() -- namedata
 local italicsdata   = allocate()
 
 hashes.characters   = chardata
+hashes.descriptions = descriptions
 hashes.parameters   = parameters
 hashes.properties   = properties
 hashes.quads        = quaddata
@@ -130,6 +132,12 @@ setmetatableindex(chardata,  function(t,k)
     return characters
 end)
 
+setmetatableindex(descriptions,  function(t,k)
+    local descriptions = fontdata[k].descriptions
+    t[k] = descriptions
+    return descriptions
+end)
+
 setmetatableindex(parameters, function(t,k)
     local parameters = fontdata[k].parameters
     t[k] = parameters