From f9e9ce4aa37d7a30f217e92ba95cb8e2073d8309 Mon Sep 17 00:00:00 2001
From: Philipp Gesang <phg42.2a@gmail.com>
Date: Sun, 2 Jun 2013 02:30:06 +0200
Subject: used names.getfilename() to resolve system paths

---
 luaotfload-database.lua | 26 +++++++++++++++++++-------
 1 file changed, 19 insertions(+), 7 deletions(-)

diff --git a/luaotfload-database.lua b/luaotfload-database.lua
index 3d2b073..22de3fa 100644
--- a/luaotfload-database.lua
+++ b/luaotfload-database.lua
@@ -272,6 +272,7 @@ local read_fonts_conf
 local reload_db
 local resolve
 local resolve_cached
+local resolve_fullpath
 local save_names
 local save_lookups
 local update_names
@@ -528,21 +529,20 @@ on whether the index entry has a texmf flag set.
 --doc]]--
 
 local get_font_file = function (fullnames, entry)
+    local basename = entry.basename
     if entry.texmf == true then
-        local basename = entry.basename
         if kpselookup(basename) then
             return true, basename, entry.subfont
         end
     else
         local fullname = fullnames[entry.index]
         if lfsisfile(fullname) then
-            return true, fullname, entry.subfont
+            return true, basename, entry.subfont
         end
     end
     return false
 end
 
-
 --[[doc--
 
 Luatex-fonts, the font-loader package luaotfload imports, comes with
@@ -711,6 +711,7 @@ resolve = function (_,_,specification) -- the 1st two parameters are used by Con
         end
     end
 
+    --- this is a monster
     if #found == 1 then
         --- “found” is really synonymous with “registered in the db”.
         local entry = found[1]
@@ -787,6 +788,20 @@ resolve = function (_,_,specification) -- the 1st two parameters are used by Con
     return specification.name, false, false
 end --- resolve()
 
+--- dummy required by luatex-fonts (cf. luatex-fonts-syn.lua)
+
+resolve_fullpath = function (fontname, ext) --- getfilename()
+    if not fonts_loaded then
+        names.data = load_names()
+    end
+    local filenames = names.data.filenames
+    local idx = filenames.base[fontname]
+    if idx then
+        return filenames.full[idx]
+    end
+    return ""
+end
+
 --- when reload is triggered we update the database
 --- and then re-run the caller with the arg list
 
@@ -1902,6 +1917,7 @@ names.update                      = update_names
 names.crude_file_lookup           = crude_file_lookup
 names.crude_file_lookup_verbose   = crude_file_lookup_verbose
 names.read_blacklist              = read_blacklist
+names.getfilename                 = resolve_fullpath
 
 --- font cache
 names.purge_cache    = purge_cache
@@ -1922,8 +1938,4 @@ names.find_closest      = find_closest
 -- for testing purpose
 names.read_fonts_conf = read_fonts_conf
 
---- dummy required by luatex-fonts (cf. luatex-fonts-syn.lua)
-
-fonts.names.getfilename = function (askedname,suffix) return "" end
-
 -- vim:tw=71:sw=4:ts=4:expandtab
-- 
cgit v1.2.3