From: Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
Date: Sat, 23 Aug 2014 04:19:38 +0000 (+0900)
Subject: ltj-adjust.lua: support situations like \hfil\hfilneg
X-Git-Tag: 20140906.0~6
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=de901096f60b144470bba3c00cf008fb382fba1b;p=luatex-ja%2Fluatexja.git

ltj-adjust.lua: support situations like \hfil\hfilneg
---

diff --git a/src/ltj-adjust.lua b/src/ltj-adjust.lua
index 5406399..6a5a300 100644
--- a/src/ltj-adjust.lua
+++ b/src/ltj-adjust.lua
@@ -82,12 +82,14 @@ local function get_stretched(q, go, gs)
    local qs = getfield(q, 'spec')
    if not getfield(qs, 'writable') then return 0 end
    if gs == 1 then -- stretching
-      if getfield(qs, 'stretch_order') == go then 
-	 return getfield(qs, 'stretch') 
+      if getfield(qs, 'stretch_order') == go then
+	 return getfield(qs, 'stretch')
+      else return 0
       end
    else -- shrinking
       if getfield(qs, 'shrink_order') == go then 
 	 return getfield(qs, 'shrink')
+      else return 0
       end
    end
 end