[Mew-dist 10864] Re: describe-bindings in mew-draft-mode

Mito mit at example.com
1999年 10月 12日 (火) 13:41:59 JST


※ "上" こと ueno at example.com さんの
   『[Mew-dist 10861] describe-bindings in mew-draft-mode』より

上> ;; 単にヘルプを表示するコマンドを追加すれば良いような気もしますが...

こんなこと↓やってました。??で describe-mode です。

(defun mew-attach-help ()
  (interactive)
  (if (eq last-command 'mew-attach-help)
      (let ((minor-mode-alist nil))
        (describe-mode))
    (message "c)opy d)el D)escribe disP)ose e)xt newF)ile m)ulti T)ype S)ign E)nc U)ndo ?)")))

(eval-after-load "mew-attach"
  '(define-key mew-draft-attach-map "?" 'mew-attach-help))

# 現状と合わないかもしれません。(_ _)
-- 
10/12 13:39頃
NECソフトウェア新潟 水戸
mailto:mit at example.com \n



Mew-dist メーリングリストの案内