From 7c6bf5503a31142a91f4414d2f5ef4e6b0baed46 Mon Sep 17 00:00:00 2001 From: David Carlisle Date: Sat, 21 Nov 2015 21:47:18 +0000 Subject: local reset_callback definition for ltluatex --- src/luaotfload-loaders.lua | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/src/luaotfload-loaders.lua b/src/luaotfload-loaders.lua index 38062f6..715aa8a 100644 --- a/src/luaotfload-loaders.lua +++ b/src/luaotfload-loaders.lua @@ -110,12 +110,22 @@ end --doc]]-- +local function reset_callback(name,make_false) + for _,v in pairs(luatexbase.callback_descriptions(name)) + do + luatexbase.remove_from_callback(name,v) + end + if make_false == true then + luatexbase.disable_callback(name) + end +end + local install_callbacks = function () local create_callback = luatexbase.create_callback local dummy_function = function () end create_callback ("luaotfload.patch_font", "simple", dummy_function) create_callback ("luaotfload.patch_font_unsafe", "simple", dummy_function) - luatexbase.reset_callback "define_font" + reset_callback "define_font" local definer = config.luaotfload.run.definer luatexbase.add_to_callback ("define_font", definers[definer or "patch"], -- cgit v1.2.3