筋肉痛。特に右肩。
胃のレントゲンでバリウム飲んだので、調子悪し。
(let ((map (make-sparse-keymap)))
(let ((key 33))
(while (<= key 126)
(define-key map (char-to-string key)
'minibuf-isearch-self-insert-command)
(setq key (1+ key))))
(define-key map "\C-m" 'minibuf-isearch-exit)
... snip ...
(define-key map "\C-?" 'minibuf-isearch-backspace)
(define-key map [t] 'minibuf-isearch-exit) ;; <= これね
(setq minibuf-isearch-mode-map map))
とかやっておいて、未定義のキーを押すと全部 minibuf-isearch-exit() を call してくれるのだが、同じ効果を XEmacs で得るにはどうしたら良いのだろうか?
ずーと『少林サッカー』をみたいと思っていて、うちの近所の小さな貸しビデオやさんに行く度にチェックしているのだが、吹き替え版があったためしがない。大きいビデオやさんに行くのは面倒くさいし、字幕じゃ子供に説明するのが面倒くさいし。。。吹き替え/字幕ともに5本ぐらいづつ、DVD が2本置いてあるのだが。