(add-hook 'dired-before-readin-hook
	  (lambda () 
	    (if ( string-match "hogehoge" dired-directory)
	    (setq default-file-name-coding-system 'sjis))))

(setq default-fill-column 62)

M-q で明示的に整形してくれる。

Error in post-command-hook: (wrong-type-argument arrayp nil)

が表示される。もちろん emacs -q すれば表示されない。 「これは起動した後で、何かの hook を実行しようとして問題が出ている」 らしい。 find-file-hook の内容を見たら、一行目に、次の字がある。

(recentf-track-opened-file auto-insert
                           (lambda nil

recentf-track-opened-file は ~/.emacs の中の次の部分が関係している

(require 'recentf)
(recentf-mode 1)

これも消して、auto-insert も無効にしても、まだ問題が表示される ので、hook の本体の方らしい。 ちょっと長いので前半と後半に分けて見たが、単独では問題がなさそう。

ttyp4:makoto@st4200  12:18:49/050301(~)> !wc
wc .emacs .emacs-11 .emacs-22
    1025    3157   37649 .emacs
     418    1277   15508 .emacs-11
     609    1890   22245 .emacs-22
    2052    6324   75402 total
ttyp4:makoto@st4200  12:18:52/050301(~)> cat ~/.emacs-11 ~/.emacs-22 >!  /tmp/2
ttyp4:makoto@st4200  12:19:02/050301(~)> diff .emacs /tmp/2
3c3
< ;     Last Update: "2005/03/01 12:14:48 makoto"
---
> ;     Last Update: "2005/03/01 12:14:57 makoto"
418a419,420
> (add-to-list 'load-path "~makoto/mule/lisp" ) ; for root
> (add-to-list 'load-path "~makoto/.emacs-dir") 
ttyp4:makoto@st4200  12:19:07/050301(~)> 

(実は重大な問題がある訳でもないので後まわし)。

(vc-find-file-hook)
これって
emacs -q --no-init-file --no-site-file
で起動しても定義されている。
jaspace を消したら問題が消えたような..