From b35299b4e3a6cf75cfa19783dda35411508d2913 Mon Sep 17 00:00:00 2001
From: Vsevolod Stakhov <vsevolod@highsecure.ru>
Date: Fri, 5 Feb 2016 12:42:43 +0000
Subject: Fix leaks in lua error paths

---
 src/lua/lua_mempool.c | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/lua/lua_mempool.c')

diff --git a/src/lua/lua_mempool.c b/src/lua/lua_mempool.c
index d5825d1e3..00c2c24e0 100644
--- a/src/lua/lua_mempool.c
+++ b/src/lua/lua_mempool.c
@@ -163,6 +163,7 @@ lua_mempool_destructor_func (gpointer p)
 	lua_rawgeti (ud->L, LUA_REGISTRYINDEX, ud->cbref);
 	if (lua_pcall (ud->L, 0, 0, 0) != 0) {
 		msg_info ("call to destructor failed: %s", lua_tostring (ud->L, -1));
+		lua_pop (ud->L, 1);
 	}
 	luaL_unref (ud->L, LUA_REGISTRYINDEX, ud->cbref);
 }
-- 
cgit v1.2.3