From: Romain Francoise <romain@orebokech.com>
Date: Mon, 19 Sep 2005 10:13:34 +0000 (+0000)
Subject: (dired-handle-overwrite): Don't use `format' here.  The prompt is
X-Git-Tag: emacs-pretest-22.0.90~7016
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b720164466434a80c4675f30bd54f6b28f365d1b;p=emacs.git

(dired-handle-overwrite): Don't use `format' here.  The prompt is
formatted later.  From Johan Bockg� <bojohan+sf@dd.chalmers.se>.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d0057f55cb4..a2d6384077d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-09-19  Johan Bockg,Ae(Brd  <bojohan+sf@dd.chalmers.se>
+
+	* dired-aux.el (dired-handle-overwrite): Don't use `format' here.
+	The prompt is formatted later.
+
 2005-09-19  David Ponce  <david@dponce.com>
 
 	* tree-widget.el (tree-widget-value-create): Save the converted
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 17e61792d33..6426c6daf58 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -1126,8 +1126,8 @@ Special value `always' suppresses confirmation."
 	     (setq backup (car (find-backup-file-name to)))
 	     (or (eq 'always dired-backup-overwrite)
 		 (dired-query 'overwrite-backup-query
-			      (format "Make backup for existing file `%s'? "
-				      to))))
+			      "Make backup for existing file `%s'? "
+			      to)))
 	(progn
 	  (rename-file to backup 0)	; confirm overwrite of old backup
 	  (dired-relist-entry backup)))))