diff lisp/ido.el @ 71273:f8990e674d00

(ido-file-internal): Pass full file name to write-file.
author Kim F. Storm <storm@cua.dk>
date Wed, 07 Jun 2006 22:45:27 +0000
parents 29fa87029ede
children aa026ce4fcef
line wrap: on
line diff
--- a/lisp/ido.el	Wed Jun 07 22:45:06 2006 +0000
+++ b/lisp/ido.el	Wed Jun 07 22:45:27 2006 +0000
@@ -2339,7 +2339,7 @@
 	(setq default-directory ido-current-directory)
 	(ido-record-command 'write-file (concat ido-current-directory filename))
 	(ido-record-work-directory)
-	(write-file filename))
+	(write-file (concat ido-current-directory filename)))
 
        ((eq method 'read-only)
 	(ido-record-work-file filename)