add compatibility for luaotfload v.1

1 files changed, 29 insertions, 0 deletions

diff --git a/lualibs-compat.lua b/lualibs-compat.lua
new file mode 100644
index 0000000..cb9d8f0
--- /dev/null
+++ b/lualibs-compat.lua
@@ -0,0 +1,29 @@
+#!/usr/bin/env texlua
+
+local stringgsub  = string.gsub
+local stringlower = string.lower
+local next        = next
+local Ct, splitat = lpeg.Ct, lpeg.splitat
+
+--[[doc
+Needed by legacy luat-dum.lua.
+--doc]]--
+table.reverse_hash = function (h)
+    local r = { }
+    for k,v in next, h do
+        r[v] = stringlower(stringgsub(k," ",""))
+    end
+    return r
+end
+
+--[[doc
+Needed by legacy font-otn.lua.
+--doc]]--
+lpeg.splitters = { [" "] = Ct(splitat" ") }
+
+--[[doc
+Needed by legacy font-nms.lua.
+--doc]]--
+
+file.split_path    = file.splitpath
+file.collapse_path = file.collapsepath