[Mew-dist 04828] Re: b33
Mito
mit at example.com
1998年 5月 25日 (月) 15:24:55 JST
※ "山" こと kazu at example.com さんの
『[Mew-dist 04783] Re: b33』より
山> 細かいことを追っている暇がないので、誰か
山> C-h は文字を消す
山> DEL は上記の関数を呼ぶ
山> となる方法を教えて下さい。
私の環境(Emacs20)ではこんな感じでOKのようですが...。
--- mew-minibuf.el 1998/05/25 05:16:12 1.1
+++ mew-minibuf.el 1998/05/25 06:20:31
@@ -22,7 +22,9 @@
(setq mew-input-map (make-sparse-keymap))
(define-key mew-input-map " " 'mew-input-complete)
(define-key mew-input-map "\t" 'mew-input-complete)
-;; (define-key mew-input-map "\177" 'mew-complete-backscroll) ;; xxx
+ (define-key mew-input-map
+ (char-to-string (aref keyboard-translate-table ?\177))
+ 'mew-complete-backscroll)
(define-key mew-input-map "\r" 'exit-minibuffer)
(define-key mew-input-map "\n" 'exit-minibuffer)
(define-key mew-input-map "\C-g" 'abort-recursive-edit)
--
5/25 15:23頃
NECソフトウェア新潟 水戸
mailto:mit at example.com \n
Mew-dist メーリングリストの案内