1if not modules then modules = { } end modules ['luat-bwc'] = { 2 version = 1.001, 3 comment = "companion to luat-lib.mkiv", 4 author = "Hans Hagen, PRAGMA-ADE, Hasselt NL", 5 copyright = "PRAGMA ADE / ConTeXt Development Team", 6 license = "see context related readme files" 7} 8 9-- backward compatibility 10 11-- if not tex.wd then 12-- 13-- local box = tex.box 14-- 15-- local wd = { } setmetatable(wd, { 16-- __index = function(t,k) local bk = box[k] return bk and bk.width or 0 end, 17-- __newindex = function(t,k,v) local bk = box[k] if bk then bk.width = v end end, 18-- } ) 19-- 20-- local ht = { } setmetatable(ht, { 21-- __index = function(t,k) local bk = box[k] return bk and bk.height or 0 end, 22-- __newindex = function(t,k,v) local bk = box[k] if bk then bk.height = v end end, 23-- } ) 24-- 25-- local dp = { } setmetatable(dp, { 26-- __index = function(t,k) local bk = box[k] return bk and bk.depth or 0 end, 27-- __newindex = function(t,k,v) local bk = box[k] if bk then bk.depth = v end end, 28-- } ) 29-- 30-- tex.wd, tex.ht, tex.dp = wd, ht, dp 31-- 32-- end 33 |
