From 0baccc9623891f57a302d51d40a3d1c380d910d0 Mon Sep 17 00:00:00 2001
From: Philipp Gesang <phg@phi-gamma.net>
Date: Sun, 29 Jan 2017 17:47:57 +0100
Subject: [main] make main() no-op when called again

Fix #390

Suggested by @davidcarlisle.
---
 src/luaotfload-main.lua | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/src/luaotfload-main.lua b/src/luaotfload-main.lua
index 83ce5e7..bbe09fa 100644
--- a/src/luaotfload-main.lua
+++ b/src/luaotfload-main.lua
@@ -246,8 +246,18 @@ local install_loaders = function ()
     return loaders
 end
 
+local luaotfload_initialized = false --- prevent multiple invocations
+
 luaotfload.main = function ()
 
+    if luaotfload_initialized then
+        logreport ("log", 0, "load",
+                   "Luaotfload initialization requested but is already \z
+                   loaded, ignoring.")
+        return
+    end
+    luaotfload_initialized = true
+
     luaotfload.loaders = install_loaders ()
     local loaders    = luaotfload.loaders
     local loadmodule = loaders.luaotfload
-- 
cgit v1.2.3