unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
From: Kevin Rodgers <ihs_4664@yahoo.com>
Cc: emacs-devel@gnu.org
Subject: Re: detecting charset of directories
Date: Mon, 23 Oct 2006 12:05:01 -0600	[thread overview]
Message-ID: <ehj09q$hbk$1@sea.gmane.org> (raw)
In-Reply-To: <E1GbFbI-0000IJ-MV@fencepost.gnu.org>

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

  reply	other threads:[~2006-10-23 18:05 UTC|newest]

Thread overview: 4+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
     [not found] <20061020142038.99914.qmail@web51005.mail.yahoo.com>
2006-10-21  0:55 ` detecting charset of directories Kenichi Handa
2006-10-21 12:05   ` Richard Stallman
2006-10-23 18:05     ` Kevin Rodgers [this message]
2006-10-24 17:42       ` Richard Stallman

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to='ehj09q$hbk$1@sea.gmane.org' \
    --to=ihs_4664@yahoo.com \
    --cc=emacs-devel@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).