branch: externals/autocrypt
commit 82d4e3586b656810818f3a7850fd3f3de213c344
Author: Philip Kaludercic <[email protected]>
Commit: Philip Kaludercic <[email protected]>
Modify message-mode-map when installing autocrypt for message-mode
---
autocrypt-message.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/autocrypt-message.el b/autocrypt-message.el
index d8b3bcba7d..3f288bfcde 100644
--- a/autocrypt-message.el
+++ b/autocrypt-message.el
@@ -27,7 +27,7 @@
(add-hook 'message-setup-hook #'autocrypt-compose-setup nil t)
(add-hook 'message-send-hook #'autocrypt-compose-pre-send nil t)
(unless (lookup-key message-mode-map (kbd "C-c RET C-a"))
- (local-set-key (kbd "C-c RET C-a") #'autocrypt-compose-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."
@@ -35,7 +35,7 @@
(remove-hook 'message-send-hook #'autocrypt-compose-pre-send t)
(when (eq (lookup-key message-mode-map (kbd "C-c RET C-a"))
#'autocrypt-compose-setup)
- (local-set-key (kbd "C-c RET C-a") nil)))
+ (define-key message-mode-map (kbd "C-c RET C-a") nil)))
(defun autocrypt-message--get-header (header)
"Return the value for HEADER."
