Richard Stallman wrote:
> I think to make that work, dired-revert needs the same fix as
> dired-mode, namely:
> (set (make-local-variable 'file-name-coding-system)
> (or coding-system-for-read file-name-coding-system))
Kevin, I don't understand that suggestion. I don't see anything
like that code in dired-mode.
Are you proposing a change to dired-mode AND a change to dired-revert?
Yes, that is what I am proposing. Or alternatively, a single change
to dired-readin.
Could use diff to show the change you are suggesting?
*** lisp/dired.el~ 2006-10-23 11:58:19.628889700 -0600
--- lisp/dired.el 2006-10-23 12:02:15.497851300 -0600
***************
*** 1042,1047 ****
--- 1042,1049 ----
;; treat top level dir extra (it may contain wildcards)
(dired-uncache
(if (consp dired-directory) (car dired-directory) dired-directory))
+ (set (make-local-variable 'file-name-coding-system)
+ (or coding-system-for-read file-name-coding-system))
(dired-readin)
(let ((dired-after-readin-hook nil))
;; don't run that hook for each subdir...
***************
*** 1627,1632 ****
--- 1629,1636 ----
'(dired-font-lock-keywords t nil nil beginning-of-line))
(set (make-local-variable 'desktop-save-buffer)
'dired-desktop-buffer-misc-data)
+ (set (make-local-variable 'file-name-coding-system)
+ (or coding-system-for-read file-name-coding-system))
(setq dired-switches-alist nil)
(dired-sort-other dired-actual-switches t)
(when (featurep 'dnd)
--
Kevin
_______________________________________________
emacs-pretest-bug mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
