09/03/02 07:07:11 n2ZHtVc00
>>240
なるほど、と思って*find-file-hooks*とか*before-find-file-hook*とか
色々試してみて、結局*create-buffer-hook*ならうまく動いたみたいです
(defun 2ch-set-fileio-encoding (buf)
;(msgbox (buffer-name buf))
(when (string-match "^2ch:" (buffer-name buf))
(set-buffer buf)
(set-buffer-fileio-encoding ed::*encoding-sjis*)))
(add-hook '*create-buffer-hook* '2ch-set-fileio-encoding)
こんな書き方でいいのか分かりませんが、とりあえず希望の動作になりました
みなさん、ありがとうございました。