From: Nicolas Petton <nicolas@petton.fr>
Date: Tue, 16 Jun 2015 20:52:24 +0000 (+0200)
Subject: Better confirmation message in `find-alternate-file' (Bug#20830)
X-Git-Tag: emacs-25.0.90~1738
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3986489aef3779b299c099e077d91e0d4b09a2e5;p=emacs.git

Better confirmation message in `find-alternate-file' (Bug#20830)

* lisp/files.el (find-alternate-file'): Improve the confirmation
message to show the buffer name.
---

diff --git a/lisp/files.el b/lisp/files.el
index 26f9f706c15..4656adac7b0 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1640,7 +1640,9 @@ killed."
   (unless (run-hook-with-args-until-failure 'kill-buffer-query-functions)
     (user-error "Aborted"))
   (and (buffer-modified-p) buffer-file-name
-       (not (yes-or-no-p "Kill and replace the buffer without saving it? "))
+       (not (yes-or-no-p
+             (format "Kill and replace buffer `%s' without saving it? "
+                     (buffer-name))))
        (user-error "Aborted"))
   (let ((obuf (current-buffer))
 	(ofile buffer-file-name)