[Emacs-diffs] /srv/bzr/emacs/trunk r105719: (process-kill-buffer-query-function): Mention the buffer name in the query.

[Lars Magne Ingebrigtsen]

------------------------------------------------------------
revno: 105719
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Sun 2011-09-11 05:35:02 +0200
message:
  (process-kill-buffer-query-function): Mention the buffer name in the query.
modified:
  lisp/ChangeLog
  lisp/subr.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-09-11 02:56:39 +0000
+++ b/lisp/ChangeLog    2011-09-11 03:35:02 +0000
@@ -1,6 +1,8 @@
 2011-09-11  Lars Magne Ingebrigtsen  <address@hidden>
 
        * 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).

=== modified file 'lisp/subr.el'
--- a/lisp/subr.el      2011-09-11 02:56:39 +0000
+++ b/lisp/subr.el      2011-09-11 03:35:02 +0000
@@ -1904,7 +1904,9 @@
     (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)