[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 メーリングリストの案内