1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00

(process-kill-buffer-query-function): Mention the buffer name in the query.

This commit is contained in:
Lars Magne Ingebrigtsen 2011-09-11 05:35:02 +02:00
parent 0b1c89c19a
commit da9fcb933d
2 changed files with 5 additions and 1 deletions

View File

@ -1,6 +1,8 @@
2011-09-11 Lars Magne Ingebrigtsen <larsi@gnus.org>
* subr.el (eval-after-load): Doc string clarification (bug#9125).
(process-kill-buffer-query-function): Mention the buffer name in
the query.
* image-mode.el (image-next-line): The line parameter is mandatory
(bug#9258).

View File

@ -1904,7 +1904,9 @@ Value is t if a query was formerly required."
(or (not process)
(not (memq (process-status process) '(run stop open listen)))
(not (process-query-on-exit-flag process))
(yes-or-no-p "Buffer has a running process; kill it? "))))
(yes-or-no-p
(format "Buffer %S has a running process; kill it? "
(buffer-name (current-buffer)))))))
(add-hook 'kill-buffer-query-functions 'process-kill-buffer-query-function)