From ee59fac32887941f404ae69d1e904579d42282f1 Mon Sep 17 00:00:00 2001
From: Tigran Aivazian <tigran@bibles.org.uk>
Date: Thu, 11 Oct 2012 22:19:33 +0100
Subject: [PATCH] Make closeDocument() re-entrant.

---
 pic.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/pic.c b/pic.c
index 7e8875d12..51b65bbcc 100644
--- a/pic.c
+++ b/pic.c
@@ -178,10 +178,13 @@ static int getOriginalPageSize(lua_State *L) {
 	return 2;
 }
 
+/* re-entrant */
 static int closeDocument(lua_State *L) {
 	PicDocument *doc = (PicDocument*) luaL_checkudata(L, 1, "picdocument");
-	if (doc->image != NULL)
+	if (doc->image != NULL) {
 		free(doc->image);
+		doc->image = NULL;
+	}
 	return 0;
 }