Mercurial > emacs

comparison src/buffer.c @ 67335:a4a1c5b73301

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fkill_buffer): Avoid dangerous side effects in NILP argument.
author Ken Raeburn <raeburn@raeburn.org>
date Tue, 06 Dec 2005 07:37:47 +0000
parents fb6bed3fabd5
children 3bd95f4f2941 37d0562504bf 7beb78bc1f8e
comparison
equal deleted inserted replaced
67334:f3528e5553c8 67335:a4a1c5b73301
1357 set_buffer_internal (b); 1357 set_buffer_internal (b);
1358 1358
1359 /* First run the query functions; if any query is answered no, 1359 /* First run the query functions; if any query is answered no,
1360 don't kill the buffer. */ 1360 don't kill the buffer. */
1361 arglist[0] = Qkill_buffer_query_functions; 1361 arglist[0] = Qkill_buffer_query_functions;
1362 if (NILP (Frun_hook_with_args_until_failure (1, arglist))) 1362 tem = Frun_hook_with_args_until_failure (1, arglist);
1363 if (NILP (tem))
1363 return unbind_to (count, Qnil); 1364 return unbind_to (count, Qnil);
1364 1365
1365 /* Then run the hooks. */ 1366 /* Then run the hooks. */
1366 Frun_hooks (1, &Qkill_buffer_hook); 1367 Frun_hooks (1, &Qkill_buffer_hook);
1367 unbind_to (count, Qnil); 1368 unbind_to (count, Qnil);