diff options
| author | Hans Hagen <pragma@wxs.nl> | 2012-01-05 19:27:20 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2012-01-05 19:27:20 +0100 |
| commit | 097e1f68bc15db06fd3a6e2c46d304620655d8cb (patch) | |
| tree | 1e49494343010007bd94e3677be8990f6c40a32f /tex/context/base/node-tra.lua | |
| parent | 9a299c9ae21ca06170dda2ed6f079bd703216c5a (diff) | |
| download | context-097e1f68bc15db06fd3a6e2c46d304620655d8cb.tar.gz | |
beta 2011.11.08 15:20
Diffstat (limited to 'tex/context/base/node-tra.lua')
| -rw-r--r-- | tex/context/base/node-tra.lua | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/tex/context/base/node-tra.lua b/tex/context/base/node-tra.lua index 61bd82ddc..70e4639b8 100644 --- a/tex/context/base/node-tra.lua +++ b/tex/context/base/node-tra.lua @@ -63,8 +63,6 @@ local whatsit_code = nodecodes.whatsit local localpar_code = whatcodes.localpar local dir_code = whatcodes.dir -local userskip_code = skipcodes.userskip - local nodepool = nodes.pool local new_glyph = nodepool.glyph @@ -626,7 +624,7 @@ local function toutf(list,result,nofresult,stopcriterium) --~ result[nofresult] = " " --~ end result, nofresult = toutf(n.list,result,nofresult) - elseif id == glue_code and n.subtype == userskip_code and n.spec.width > threshold then + elseif id == glue_code then if nofresult > 0 and result[nofresult] ~= " " then nofresult = nofresult + 1 result[nofresult] = " " @@ -642,6 +640,10 @@ local function toutf(list,result,nofresult,stopcriterium) end end end + if nofresult > 0 and result[nofresult] == " " then + result[nofresult] = nil + nofresult = nofresult - 1 + end return result, nofresult end @@ -650,7 +652,7 @@ function nodes.toutf(list,stopcriterium) return concat(result) end --- might move elsewhere +-- this will move elsewhere local ptfactor = number.dimenfactors.pt local bpfactor = number.dimenfactors.bp |