Re: Viewing UTF-8 Kanji mail with MH-e/emacs/kterm

Article View: fj.editor.emacs

Article #463

#463

From: Katsumi Yamaoka
Date: Wed, 02 Mar 2005 02:45

45 lines
3348 bytes

>>>>> In <YAS.05Mar2022106@kirk.is.tsukuba.ac.jp>
>>>>>	yas@is.tsukuba.ac.jp (Yasushi Shinjo) wrote:

>> emacs で、buffer-file-coding-system を明示的に与えて find-file する
>> には、どうすればいいでしょうか？

Emacs の版がわかりませんが、以下のようなものを ~/.emacs ファイル
に書いて、対話仕様を XEmacs ふうに改造するのではいかがでしょう?
使い方は、接頭引数 (`C-u', `Meta-数字', `ESC 数字' など) を前置
して `C-x C-f' です。

(defadvice find-file (around
		      allow-a-user-to-specify-coding-system
		      (filename &optional coding-system)
		      activate)
  "Allow a user to specify coding system."
  (interactive "FFind file: \nZCoding system: ")
  (let ((coding-system-for-read coding-system))
    (setq coding-system nil)
    ad-do-it))

find-file-other-frame と find-file-other-window もまとめて改造す
るなら、例えば以下です。

(let ((alist '((find-file . "")
	       (find-file-other-frame . " in other frame")
	       (find-file-other-window . " in other window"))))
  (while alist
    (eval `(defadvice ,(caar alist) (around
				     allow-a-user-to-specify-coding-system
				     (filename &optional coding-system)
				     activate)
	     "Allow a user to specify coding system."
	     (interactive ,(concat "FFind file" (cdar alist)
				   ": \nZCoding system: "))
	     (let ((coding-system-for-read coding-system))
	       (setq coding-system nil)
	       ad-do-it)))
    (setq alist (cdr alist))))

これらはファイルを読み込むときにデコードに使う coding system を
指定するもので、buffer-file-coding-system が何になるかは、ファイ
ルの中身によります。
-- 
山岡

Technical Details

Message-ID: <28d5ui4vfw.fsf@pastis.ga.sony.co.jp>

Path:

arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!newsfeed.media.kyoto-u.ac.jp!np0.iij.ad.jp!news.iij.ad.jp!newsfeed2.sony.co.jp!newsfeed.noc.sony.co.jp!ganews-ga-sony!not-for-mail

References:

<YAS.05Feb28012524@kirk.is.tsukuba.ac.jp> <050228013720.M0101518@hayabusa.ics.nara-wu.ac.jp> <cvtr1j$hvh$1@zzr.yamada.gr.jp> <YAS.05Feb28194440@kirk.is.tsukuba.ac.jp> <42239568.DC54CC41@ht.sakura.ne.jp> <YAS.05Mar2022106@kirk.is.tsukuba.ac.jp> <42251701.32E5E128@ht.sakura.ne.jp>

Show Full Headers

Complete Article Headers

X-Google-Thread: ff358,130eb43325c98ae5
X-Google-Thread: 10a13d,130eb43325c98ae5
X-Google-Thread: 10e593,130eb43325c98ae5
X-Google-Attributes: gidff358,gid10a13d,gid10e593,public
X-Google-Language: Japanese,JIS
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!newsfeed.media.kyoto-u.ac.jp!np0.iij.ad.jp!news.iij.ad.jp!newsfeed2.sony.co.jp!newsfeed.noc.sony.co.jp!ganews-ga-sony!not-for-mail
From: Katsumi Yamaoka <yamaoka@jpl.org>
Newsgroups: fj.editor.emacs,fj.mail.reader,fj.kanji
Subject: Re: Viewing UTF-8 Kanji mail with MH-e/emacs/kterm
Date: Wed, 02 Mar 2005 11:45:39 +0900
Organization: I.M.N.C., Sony Corporation, Tokyo, Japan
Lines: 45
Message-ID: <28d5ui4vfw.fsf@pastis.ga.sony.co.jp>
References: <YAS.05Feb28012524@kirk.is.tsukuba.ac.jp>
 <050228013720.M0101518@hayabusa.ics.nara-wu.ac.jp>
 <cvtr1j$hvh$1@zzr.yamada.gr.jp> <YAS.05Feb28194440@kirk.is.tsukuba.ac.jp>
 <42239568.DC54CC41@ht.sakura.ne.jp> <YAS.05Mar2022106@kirk.is.tsukuba.ac.jp>
 <42251701.32E5E128@ht.sakura.ne.jp>
NNTP-Posting-Host: pastis.ga.sony.co.jp
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-2022-jp
X-Trace: absinthe.ga.sony.co.jp 1109731544 32725 43.17.84.86 (2 Mar 2005 02:45:44 GMT)
X-Complaints-To: news@ga.sony.co.jp
NNTP-Posting-Date: Wed, 2 Mar 2005 02:45:44 +0000 (UTC)
X-Face: #kKnN,xUnmKia.'[pp`;Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk
 B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu;B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw=
 L&i*6&(
User-Agent: Gnus/5.110003 (No Gnus v0.3) Emacs/22.0.50 (gnu/linux)
Cancel-Lock: sha1:V+EH64qbJv167rBajqhp56EClvY=

Reply to Parent Message