[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/ido.el,v
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/ido.el,v |
Date: |
Tue, 06 Nov 2007 12:25:07 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Juanma Barranquero <lektu> 07/11/06 12:25:07
Index: ido.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/ido.el,v
retrieving revision 1.134
retrieving revision 1.135
diff -u -b -r1.134 -r1.135
--- ido.el 25 Sep 2007 11:08:45 -0000 1.134
+++ ido.el 6 Nov 2007 12:25:06 -0000 1.135
@@ -1305,10 +1305,13 @@
(interactive)
(when (and ido-last-directory-list ido-save-directory-list-file)
(let ((buf (get-buffer-create " *ido session*"))
- (version-control 'never))
+ (version-control 'never)
+ (coding-system (or file-name-coding-system
+ default-file-name-coding-system)))
(unwind-protect
(with-current-buffer buf
(erase-buffer)
+ (setq buffer-file-coding-system coding-system)
(ido-pp 'ido-last-directory-list)
(ido-pp 'ido-work-directory-list)
(ido-pp 'ido-work-file-list)
@@ -1316,7 +1319,8 @@
(if (listp ido-unc-hosts-cache)
(ido-pp 'ido-unc-hosts-cache)
(insert "\n;; ----- ido-unc-hosts-cache -----\nt\n"))
- (insert "\n")
+ (insert (format "\n;; Local Variables:\n;; coding: %s\n;; End:\n"
+ coding-system))
(write-file ido-save-directory-list-file nil))
(kill-buffer buf)))))
- [Emacs-diffs] Changes to emacs/lisp/ido.el,v,
Juanma Barranquero <=