(find-alternate-file): Revert query message to Emacs 21 version.

diff --git a/lisp/files.el b/lisp/files.el
index 80df0d898d36f10a7f9fb69ba5f4e25144e31283..9ef937570002b1940113c85a0b17f0d71047e173 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1223,11 +1223,11 @@ killed."
   (unless (run-hook-with-args-until-failure 'kill-buffer-query-functions)
     (error "Aborted"))
   (when (and (buffer-modified-p) (buffer-file-name))
-    (if (yes-or-no-p (format "Buffer %s is modified; save it first? "
+    (if (yes-or-no-p (format "Buffer %s is modified; kill anyway? "
                             (buffer-name)))
-       (save-buffer)
-      (unless (yes-or-no-p "Kill and replace the buffer without saving it? ")
-       (error "Aborted"))))
+       (unless (yes-or-no-p "Kill and replace the buffer without saving it? ")
+         (error "Aborted"))
+      (save-buffer)))
   (let ((obuf (current-buffer))
        (ofile buffer-file-name)
        (onum buffer-file-number)