From: Miles Bader <miles@gnu.org>
Date: Thu, 11 Oct 2001 01:20:16 +0000 (+0000)
Subject: (diff): Display default values in prompts as `(default ...)', not `(...)'.
X-Git-Tag: ttn-vms-21-2-B4~19590
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=219637a43aaf3abb3b7997912736eda12227b7ca;p=emacs.git

(diff): Display default values in prompts as `(default ...)', not `(...)'.
---

diff --git a/lisp/diff.el b/lisp/diff.el
index 1c897a20974..fb1793e627b 100644
--- a/lisp/diff.el
+++ b/lisp/diff.el
@@ -1,6 +1,6 @@
 ;;; diff.el --- run `diff' in compilation-mode
 
-;; Copyright (C) 1992, 1994, 1996 Free Software Foundation, Inc.
+;; Copyright (C) 1992, 1994, 1996, 2001 Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Keywords: unix, tools
@@ -199,14 +199,14 @@ With prefix arg, prompt for diff switches."
 	(setq newf (buffer-file-name)
 	      newf (if (and newf (file-exists-p newf))
 		       (read-file-name
-			(concat "Diff new file: ("
+			(concat "Diff new file: (default "
 				(file-name-nondirectory newf) ") ")
 			nil newf t)
 		     (read-file-name "Diff new file: " nil nil t)))
 	(setq oldf (file-newest-backup newf)
 	      oldf (if (and oldf (file-exists-p oldf))
 		       (read-file-name
-			(concat "Diff original file: ("
+			(concat "Diff original file: (default "
 				(file-name-nondirectory oldf) ") ")
 			(file-name-directory oldf) oldf t)
 		     (read-file-name "Diff original file: "