From bf255ef48e5b7710008141e4935183d8ca9a42aa Mon Sep 17 00:00:00 2001
From: Philipp Gesang <phg42.2a@gmail.com>
Date: Tue, 5 Nov 2013 16:05:54 +0100
Subject: [tool] adapt --list queries with criterion

---
 luaotfload-tool.lua | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/luaotfload-tool.lua b/luaotfload-tool.lua
index 3d149d0..17d9399 100755
--- a/luaotfload-tool.lua
+++ b/luaotfload-tool.lua
@@ -993,7 +993,12 @@ actions.list = function (job)
             local categories, by_category = { }, { }
             for i=1, nmappings do
                 local entry = mappings[i]
-                local value = entry[criterion]
+                local tmp   = entry
+                local chain = stringsplit (criterion, "->")
+                for i = 1, #chain - 1 do
+                    tmp = tmp [chain [i]]
+                end
+                local value = tmp [chain [#chain]]
                 if value then
                     --value = tostring(value)
                     local entries = by_category[value]
-- 
cgit v1.2.3