From 09706e1fc4ce4fa2b947d690aae11be8274b0642 Mon Sep 17 00:00:00 2001
From: Ken Raeburn <raeburn@raeburn.org>
Date: Tue, 6 Dec 2005 07:37:47 +0000
Subject: [PATCH] (Fkill_buffer): Avoid dangerous side effects in NILP
 argument.

---
 src/buffer.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/buffer.c b/src/buffer.c
index a20f6a2d683..d52a710573e 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -1359,7 +1359,8 @@ with SIGHUP.  */)
     /* First run the query functions; if any query is answered no,
        don't kill the buffer.  */
     arglist[0] = Qkill_buffer_query_functions;
-    if (NILP (Frun_hook_with_args_until_failure (1, arglist)))
+    tem = Frun_hook_with_args_until_failure (1, arglist);
+    if (NILP (tem))
       return unbind_to (count, Qnil);
 
     /* Then run the hooks.  */
-- 
2.39.5