branch: externals/autocrypt
commit e93e90febdf1d6869af6ced9574af2980a9773be
Author: Philip K <[email protected]>
Commit: Philip K <[email protected]>
fixed autocrypt-compose-setup bind-check in message interface
---
autocrypt-message.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/autocrypt-message.el b/autocrypt-message.el
index 012d9d1f12..ee50253e6a 100644
--- a/autocrypt-message.el
+++ b/autocrypt-message.el
@@ -31,14 +31,14 @@
(add-hook 'message-setup-hook #'autocrypt-compose-setup)
(add-hook 'message-send-hook #'autocrypt-compose-pre-send)
(unless (lookup-key message-mode-map (kbd "C-c RET C-a"))
- (define-key message-mode-map (kbd "C-c RET C-a")
#'autocrypt-message-setup)))
+ (define-key message-mode-map (kbd "C-c RET C-a")
#'autocrypt-compose-setup)))
(defun autocrypt-message-uninstall ()
"Remove autocrypt hooks for message mode."
(remove-hook 'message-setup-hook #'autocrypt-compose-setup)
(remove-hook 'message-send-hook #'autocrypt-compose-pre-send)
(when (eq (lookup-key message-mode-map (kbd "C-c RET C-a"))
- #'autocrypt-message-setup)
+ #'autocrypt-compose-setup)
(define-key message-mode-map (kbd "C-c RET C-a") nil)))
(defun autocrypt-message-add-header (key val)
