~/.emacsのtips集ができそうですね。 >>>>> In <[EMAIL PROTECTED]> >>>>> Akihiro HIRANO <[EMAIL PROTECTED]> wrote:
> #上記は機種異存文字入りメールの解読用… 僕の ~/.emacs にはこんなの↓が入ってます。 ;;;; set-fontset-font (if (or (featurep 'xemacs) (<= emacs-major-version 21)) nil (let* ((jisx0208 "-*-fixed-medium-r-normal-*-16-*-*-*-*-*-jisx0208.1983-0") (jisx0213 "-*-fixed-medium-r-normal-*-16-*-*-*-*-*-jisx0213.2000-1") (defs `(((33 . 33) (33 . 126) ,jisx0208) ((34 . 33) (35 . 47) ,jisx0213) ((35 . 48) (35 . 57) ,jisx0208) ((35 . 58) (35 . 64) ,jisx0213) ((35 . 65) (35 . 90) ,jisx0208) ((35 . 91) (35 . 96) ,jisx0213) ((35 . 97) (35 . 122) ,jisx0208) ((35 . 123) (35 . 126) ,jisx0213) ((36 . 33) (36 . 115) ,jisx0208) ((36 . 116) (36 . 126) ,jisx0213) ((37 . 33) (37 . 118) ,jisx0208) ((37 . 119) (37 . 126) ,jisx0213) ((38 . 33) (38 . 56) ,jisx0208) ((38 . 57) (38 . 64) ,jisx0213) ((38 . 65) (38 . 88) ,jisx0208) ((38 . 89) (38 . 126) ,jisx0213) ((39 . 33) (39 . 65) ,jisx0208) ((39 . 66) (39 . 80) ,jisx0213) ((39 . 81) (39 . 113) ,jisx0208) ((39 . 114) (39 . 126) ,jisx0213) ((40 . 33) (40 . 64) ,jisx0208) ((40 . 65) (47 . 126) ,jisx0213) ((48 . 33) (116 . 36) ,jisx0208) ((116 . 37) (126 . 126) ,jisx0213))) def from to font) (while defs (setq def (car defs) defs (cdr defs) from (car def) to (nth 1 def) font (nth 2 def)) (set-fontset-font "*default" (cons (make-char 'japanese-jisx0208 (car from) (cdr from)) (make-char 'japanese-jisx0208 (car to) (cdr to))) font)))) > PS > amd64導入を目論んでいるので、興味深く読ませて頂いております。少々不 > 安になりそうな… Solaris 10 を使っていますが、amd64用に64-bitバイナリを作ろうとしても、 Emacs-22.0.50ができないので困っています。 -- NAKAJI Hiroyuki (中治 弘行)