From 8eba7e2f58f5fd8d57597e41f1379e7ff2f97dfa Mon Sep 17 00:00:00 2001
From: Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
Date: Wed, 1 Oct 2014 20:03:36 +0900
Subject: [PATCH] ltj-adjust.lua: fix aw_step1 (as 10e5a41)

---
 src/ltj-adjust.lua | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/ltj-adjust.lua b/src/ltj-adjust.lua
index 6a5a300..729f186 100644
--- a/src/ltj-adjust.lua
+++ b/src/ltj-adjust.lua
@@ -172,7 +172,8 @@ end
 
 -- step 1: 行末に kern を挿入（句読点，中点用）
 local function aw_step1(p, res, total)
-   local x = node_tail(getlist(p)); if not x then return false end
+   local head = getlist(p)
+   local x = node_tail(head); if not x then return false end
    -- x: \rightskip
    x = node_prev(x); if not x then return false end
    if getid(x) == id_glue and getsubtype(x) == 15 then 
-- 
2.11.0