emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/autocrypt 82d4e3586b 72/94: Modify message-mode-map whe


From: ELPA Syncer
Subject: [elpa] externals/autocrypt 82d4e3586b 72/94: Modify message-mode-map when installing autocrypt for message-mode
Date: Sun, 26 Mar 2023 07:58:02 -0400 (EDT)

branch: externals/autocrypt
commit 82d4e3586b656810818f3a7850fd3f3de213c344
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    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."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]