summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/typo-dha.lua
diff options
context:
space:
mode:
authorContext Git Mirror Bot <phg42.2a@gmail.com>2016-03-26 13:38:18 +0100
committerContext Git Mirror Bot <phg42.2a@gmail.com>2016-03-26 13:38:18 +0100
commit788487819ccf38a8478cc2afd88e0c0b088d0ec1 (patch)
tree215addbe3b9e293c2958227e7fc8923880b2e71f /tex/context/base/mkiv/typo-dha.lua
parentadfe72d5a0c9d7bdc1bd7bc8faabb4d05e21d70a (diff)
downloadcontext-788487819ccf38a8478cc2afd88e0c0b088d0ec1.tar.gz
2016-03-26 13:07:00
Diffstat (limited to 'tex/context/base/mkiv/typo-dha.lua')
-rw-r--r--tex/context/base/mkiv/typo-dha.lua13
1 files changed, 5 insertions, 8 deletions
diff --git a/tex/context/base/mkiv/typo-dha.lua b/tex/context/base/mkiv/typo-dha.lua
index 30984a26c..b1ce6ffbf 100644
--- a/tex/context/base/mkiv/typo-dha.lua
+++ b/tex/context/base/mkiv/typo-dha.lua
@@ -53,13 +53,13 @@ local nutstring = nuts.tostring
local getnext = nuts.getnext
local getprev = nuts.getprev
local getfont = nuts.getfont
-local getchar = nuts.getchar
local getid = nuts.getid
local getsubtype = nuts.getsubtype
local getlist = nuts.getlist
local getfield = nuts.getfield
local getattr = nuts.getattr
local getprop = nuts.getprop
+local isglyph = nuts.isglyph -- or ischar
local setfield = nuts.setfield
local setprop = nuts.setprop
@@ -124,9 +124,8 @@ end
local function nextisright(current)
current = getnext(current)
- local id = getid(current)
+ local character, id = isglyph(current)
if id == glyph_code then
- local character = getchar(current)
local direction = chardirections[character]
return direction == "r" or direction == "al" or direction == "an"
end
@@ -134,9 +133,8 @@ end
local function previsright(current)
current = getprev(current)
- local id = getid(current)
+ local character, id = isglyph(current)
if id == glyph_code then
- local character = getchar(current)
local direction = chardirections[character]
return direction == "r" or direction == "al" or direction == "an"
end
@@ -161,7 +159,7 @@ local function process(start)
local fences = { }
while current do
- local id = getid(current)
+ local character, id = isglyph(current)
local next = getnext(current)
if id == math_code then
current = getnext(end_of_math(next))
@@ -179,9 +177,8 @@ local function process(start)
prevattr = attr
end
end
- if id == glyph_code then
+ if character then
if attr and attr > 0 then
- local character = getchar(current)
if character == 0 then
-- skip signals
setprop(current,"direction",true)