branch: externals/autocrypt
commit 283c9ade36065b4182a57961076cf3fdec978ef6
Author: Philip K <[email protected]>
Commit: Philip K <[email protected]>
fixed checkdoc complaints
---
autocrypt-message.el | 8 +++++---
autocrypt-mu4e.el | 3 ++-
autocrypt-rmail.el | 4 ++--
3 files changed, 9 insertions(+), 6 deletions(-)
diff --git a/autocrypt-message.el b/autocrypt-message.el
index 4a02a033fc..c2c1b07ab4 100644
--- a/autocrypt-message.el
+++ b/autocrypt-message.el
@@ -26,20 +26,22 @@
(require 'message)
(defun autocrypt-message-install ()
- "Install autocrypt hooks for message-mode."
+ "Install autocrypt hooks for message mode."
(add-hook 'message-setup-hook #'autocrypt-message-setup)
(add-hook 'message-send-hook #'autocrypt-message-pre-send)
(define-key message-mode-map (kbd "C-c RET C-a") #'autocrypt-message-setup))
(defun autocrypt-message-uninstall ()
- "Remove autocrypt hooks for message-mode."
+ "Remove autocrypt hooks for message mode."
(remove-hook 'message-setup-hook #'autocrypt-message-setup)
(remove-hook 'message-send-hook #'autocrypt-message-pre-send)
(define-key message-mode-map (kbd "C-c RET C-a") nil))
;; https://autocrypt.org/level1.html#key-gossip-injection-in-outbound-messages
(defun autocrypt-message-gossip-p (recipients)
- "Find out if the current message should have gossip headers."
+ "Find out if the current message should have gossip headers.
+Argument RECIPIENTS is a list of addresses this message is
+addressed to."
(and (mml-secure-is-encrypted-p)
(< 1 (length recipients))
(cl-every
diff --git a/autocrypt-mu4e.el b/autocrypt-mu4e.el
index d8173a2ff6..ae1a07f2c8 100644
--- a/autocrypt-mu4e.el
+++ b/autocrypt-mu4e.el
@@ -25,6 +25,7 @@
(require 'autocrypt)
(require 'mu4e)
+;;;###autoload
(defun autocrypt-mu4e-install ()
"Install autocrypt hooks for mu4e."
(add-hook 'mu4e-view-mode-hook #'autocrypt-process-header))
@@ -34,7 +35,7 @@
(remove-hook 'mu4e-view-mode-hook #'autocrypt-process-header))
(defun autocrypt-mu4e-header (field)
- "Ask mu4e to return header field."
+ "Ask mu4e to return header FIELD."
(save-window-excursion
(with-current-buffer (mu4e-view-raw-message)
(prog1 (mail-fetch-field field)
diff --git a/autocrypt-rmail.el b/autocrypt-rmail.el
index 46c81e612a..a08168ee22 100644
--- a/autocrypt-rmail.el
+++ b/autocrypt-rmail.el
@@ -34,11 +34,11 @@
(remove-hook 'rmail-show-message-hook #'autocrypt-process-header))
(defun autocrypt-rmail-header (field)
- "Ask Rmail to return header field."
+ "Ask Rmail to return header FIELD."
(rmail-apply-in-message
rmail-current-message
(lambda () (mail-fetch-field field))))
(provide 'autocrypt-rmail)
-;;; autocrypt-rmail.el ends hereb
+;;; autocrypt-rmail.el ends here
