diff options
| author | Hans Hagen <pragma@wxs.nl> | 2018-04-13 15:51:39 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2018-04-13 15:51:39 +0200 |
| commit | 25fcad7435f56cdce2658336909f4da6a65589c0 (patch) | |
| tree | c23d5d04a7e86c7ddc2ebeca06d3de63ebdc806e /tex/context/base/mkiv/supp-box.lua | |
| parent | 1e5d7f41ddede5e6400a2a7762032823d3545df4 (diff) | |
| download | context-25fcad7435f56cdce2658336909f4da6a65589c0.tar.gz | |
2018-04-13 15:02:00
Diffstat (limited to 'tex/context/base/mkiv/supp-box.lua')
| -rw-r--r-- | tex/context/base/mkiv/supp-box.lua | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/supp-box.lua b/tex/context/base/mkiv/supp-box.lua index 40047167c..3ea16dcf8 100644 --- a/tex/context/base/mkiv/supp-box.lua +++ b/tex/context/base/mkiv/supp-box.lua @@ -55,6 +55,7 @@ local setdisc = nuts.setdisc local setwidth = nuts.setwidth local setheight = nuts.setheight local setdepth = nuts.setdepth +local setshift = nuts.setshift local flush_node = nuts.flush_node local flush_list = nuts.flush_list @@ -601,4 +602,10 @@ do end } + interfaces.implement { + name = "shiftbox", + arguments = { "integer", "dimension" }, + actions = function(n,d) setshift(getbox(n),d) end, + } + end |