Re: detecting charset of directories

[Richard Stallman]

Does this work right?

*** dired.el    01 Oct 2006 23:09:50 -0400      1.352
--- dired.el    24 Oct 2006 07:52:31 -0400      
***************
*** 791,796 ****
--- 791,798 ----
        (run-hooks 'dired-before-readin-hook)
        (if (consp buffer-undo-list)
          (setq buffer-undo-list nil))
+       (set (make-local-variable 'file-name-coding-system)
+          (or coding-system-for-read file-name-coding-system))
        (let (buffer-read-only
            ;; Don't make undo entries for readin.
            (buffer-undo-list t))