diff options
| author | Ken Raeburn | 2005-12-06 07:37:47 +0000 |
|---|---|---|
| committer | Ken Raeburn | 2005-12-06 07:37:47 +0000 |
| commit | 09706e1fc4ce4fa2b947d690aae11be8274b0642 (patch) | |
| tree | 21c82ead732d0cf44817e58d8f9273a68f16dc07 /src | |
| parent | 522d8129134cfe245cba8148a280c79b524ad128 (diff) | |
| download | emacs-09706e1fc4ce4fa2b947d690aae11be8274b0642.tar.gz emacs-09706e1fc4ce4fa2b947d690aae11be8274b0642.zip | |
(Fkill_buffer): Avoid dangerous side effects in NILP argument.
Diffstat (limited to 'src')
| -rw-r--r-- | src/buffer.c | 3 |
1 files changed, 2 insertions, 1 deletions
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. */) | |||
| 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. */ |