Ask for confirmation in ido-file-internal (Bug#1238).

* ido.el (ido-file-internal): Ask for confirmation before
overwriting an existing file (Bug#1238).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6a4c0a0f73b21e1d054053be509ee9094c21f005..862c68273fd1bed29e5c1d4558f92773d368b701 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-12-17  Ryan Twitchell  <metatheorem@gmail.com>  (tiny change)
+
+       * ido.el (ido-file-internal): Ask for confirmation before
+       overwriting an existing file (Bug#1238).
+
 2010-12-16  Chong Yidong  <cyd@stupidchicken.com>
 
        * tool-bar.el (tool-bar-setup): Add separators.

diff --git a/lisp/ido.el b/lisp/ido.el
index 306485de1ad1e2975de14c4e5f2d74a026c536f4..84ae93142b45c41dc85eab8f36da92d22143bb08 100644 (file)
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2430,7 +2430,7 @@ If cursor is not at the end of the user input, move to end of input."
        (ido-record-command 'write-file filename)
        (add-to-history 'file-name-history filename)
        (ido-record-work-directory)
-       (write-file filename))
+       (write-file filename t))
 
        ((eq method 'read-only)
        (ido-record-work-file filename)