1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 11:00:45 -08:00

(Fkill_buffer): Avoid dangerous side effects in NILP argument.

This commit is contained in:
Ken Raeburn 2005-12-06 07:37:47 +00:00
parent 522d812913
commit 09706e1fc4

View file

@ -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. */