mirror of https://github.com/djcb/mu.git
mu4e-compose: allow updating keymap for minor mode
This commit is contained in:
parent
6dac4423e2
commit
a696902c34
|
@ -873,21 +873,25 @@ they do not conflict with mu4e inner workings."
|
||||||
"Return the `mu4e-user-agent' symbol."
|
"Return the `mu4e-user-agent' symbol."
|
||||||
'mu4e-user-agent)
|
'mu4e-user-agent)
|
||||||
|
|
||||||
;;; minor mode for use in other modes.
|
|
||||||
(define-minor-mode mu4e-compose-minor-mode
|
;;; minor mode for use in other modes.
|
||||||
"Mode for searching for messages."
|
(defvar mu4e-compose-minor-mode-map
|
||||||
:global nil
|
|
||||||
:init-value nil ;; disabled by default
|
|
||||||
:group 'mu4e
|
|
||||||
:lighter ""
|
|
||||||
:keymap
|
|
||||||
(let ((map (make-sparse-keymap)))
|
(let ((map (make-sparse-keymap)))
|
||||||
(define-key map "R" #'mu4e-compose-reply)
|
(define-key map "R" #'mu4e-compose-reply)
|
||||||
(define-key map "W" #'mu4e-compose-wide-reply)
|
(define-key map "W" #'mu4e-compose-wide-reply)
|
||||||
(define-key map "F" #'mu4e-compose-forward)
|
(define-key map "F" #'mu4e-compose-forward)
|
||||||
(define-key map "E" #'mu4e-compose-edit)
|
(define-key map "E" #'mu4e-compose-edit)
|
||||||
(define-key map "C" #'mu4e-compose-new)
|
(define-key map "C" #'mu4e-compose-new)
|
||||||
map))
|
map)
|
||||||
|
"Keymap for compose minor-mode.")
|
||||||
|
|
||||||
|
(define-minor-mode mu4e-compose-minor-mode
|
||||||
|
"Mode for searching for messages."
|
||||||
|
:global nil
|
||||||
|
:init-value nil ;; disabled by default
|
||||||
|
:group 'mu4e
|
||||||
|
:lighter ""
|
||||||
|
:keymap mu4e-compose-minor-mode-map)
|
||||||
|
|
||||||
(defvar mu4e--compose-menu-items
|
(defvar mu4e--compose-menu-items
|
||||||
'("--"
|
'("--"
|
||||||
|
|
Loading…
Reference in New Issue