unknownplace.org

(setq windmove-wrap-around t)
(global-set-key "\C-\M-h" 'windmove-left)
(global-set-key "\C-\M-j" 'windmove-down)
(global-set-key "\C-\M-k" 'windmove-up)
(global-set-key "\C-\M-l" 'windmove-right)

結局こんな感じに。ここだけ vi バインド！

\C-\M-(b|f|n|p) とかしたら f や b で指が死にそうだったの。

riece のために導入したはいいけど、キーバインド設定がむずい。悩む。

(Shift or Meta) + カーソルキー ってしてる人が多いみたいだけどそれはやだなぁ。ううーん。

他にも、y/n とか聞かれるとこで自動で IME OFF にできたり、mew で URL 右クリすると Firefox 立ち上がったり、kill したのがクリップボード入ったりと、Windows との親和性が(当たり前だが) emacs via PuTTY と比べると全然便利。

色分け設定もできるようになったのでいろいろいじってるんだけど(めんどくさい！)、.emacs 内で font-lockなんとかの face の色の指定しようとするとエラーになる。

こんな感じに:

(set-face-foreground 'font-lock-comment-face "lime green")

とか書いておくと、error: Invalid face, font-lock-comment-face とかいわれる。

font-lock-mode になってないからだろうけど、どすんだ。解決。

つか配色設定めんどすｇｒｒｒ

Meadow すごい。今まで散々悩んだ Proggy フォントと日本語フォントの組み合わせが普通にあっさり使えた。までも、xyzzyでも普通につかえるのだけど。

フォントの部分はよくわかってないが、こんな感じに:

; private-fontset作成
(w32-add-font
 "private-fontset"
 '((spec
    ((:char-spec ascii :height 90)
     strict
     (w32-logfont "CodingFontTobi1" 0 -12 400 0 nil nil nil 0 1 3 49))
    ((:char-spec ascii :height 90 :weight bold)
     strict
     (w32-logfont "CodingFontTobi1" 0 -12 700 0 nil nil nil 0 1 3 49))
    ((:char-spec ascii :height 90 :slant italic)
     strict
     (w32-logfont "CodingFontTobi1" 0 -12 400 0   t nil nil 0 1 3 49))
    ((:char-spec ascii :height 90 :weight bold :slant italic)
     strict
     (w32-logfont "CodingFontTobi1" 0 -12 700 0   t nil nil 0 1 3 49))
    ((:char-spec japanese-jisx0208 :height 120)
     strict
     (w32-logfont "ＭＳ ゴシック" 0 -12 400 0 nil nil nil 128 1 3 49))
    ((:char-spec japanese-jisx0208 :height 120 :weight bold)
     strict
     (w32-logfont "ＭＳ ゴシック" 0 -12 700 0 nil nil nil 128 1 3 49)
     ((spacing . -1)))
    ((:char-spec japanese-jisx0208 :height 120 :slant italic)
     strict
     (w32-logfont "ＭＳ ゴシック" 0 -12 400 0   t nil nil 128 1 3 49))
    ((:char-spec japanese-jisx0208 :height 120 :weight bold :slant italic)
     strict
     (w32-logfont "ＭＳ ゴシック" 0 -12 700 0   t nil nil 128 1 3 49)
     ((spacing . -1))))))
(set-face-attribute 'variable-pitch nil :family "*")

とかで fontset 作ってから

; 初期フレーム
(setq default-frame-alist
      (append (list '(font . "private-fontset")
            '(ime-font . (w32-logfont "ＭＳ ゴシック" 0 12 400 0 nil nil nil 128 1 3 49)))
          default-frame-alist))

とかとしてデフォルトのフォントセットにする。

とはいえ CodingFontTobi も MS ゴシックどっちも等幅といっても縦横比が違うので、混じっているとずれますが。日本語フォントは基本、mew 用なので問題ない。(Summaryがずれずれになっちゃうけど)

日本語綺麗になっちゃったから navi2ch とか riece とかもいれちゃおうか！

配色設定めんどくせー。

インスコしてみた。

mew を使うようになって PuTTY 内 emacs でのフォントの問題がやっぱきついなーと。

設定調べ中。どだろな。

いい加減 Becky! 重いので、サーバー上で使うように入れてみる。

と思ったら間違って colinux のほうに入れてた。とりあえずこっちで使ってみる。

Namazu や Rast との連携もできるみたいでヨサゲかも。

 提案パッケージ:
  w3m-el stunnel4 stunnel wv xlhtml ppthtml compface netpbm x-face-el mu-cite mule-ucs bogofilter bsfilter spamassassin
  namazu2-index-tools mhc

Template-Toolkitの書式で誤動作しまくってちょっとうぜーかもしらんね。

Perl BestPractices に vi の % っぽいことをする elisp がのっていたけど emacs22 じゃそのままだとうまく動かなくて放置してたんだけど、EmacsWiki 見たら載ってた。

(defun match-paren (arg)
  "Go to the matching paren if on a paren; otherwise insert %."
  (interactive "p")
  (cond ((looking-at "\\s\(") (forward-list 1) (backward-char 1))
    ((looking-at "\\s\)") (forward-char 1) (backward-list 1))
    (t (self-insert-command (or arg 1)))))
(global-set-key "%" 'match-paren)

これでOK。でも、なんでこれで [] とか {} でも動くのかわからん。。

lisp がわけわからないので、call-process とかで外部の Perl スクリプトでごにょごにょさせようとおもって call-process についてぐぐってみたら発見。

これを使うと lisp のかわりに Ruby を使って emacs を拡張することができる。よすぎ。。

Perl 版さがしたけどなさげ。

el4r - EmacsRuby

C-x ENTER c で文字コード選んでから C-x C-f