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

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

[elpa] externals/autocrypt b903929bf3 17/94: reindented autocrypt-list-r


From: ELPA Syncer
Subject: [elpa] externals/autocrypt b903929bf3 17/94: reindented autocrypt-list-recipients
Date: Sun, 26 Mar 2023 07:57:57 -0400 (EDT)

branch: externals/autocrypt
commit b903929bf39b5b008fddda5d7b47c9d62beadbf0
Author: Philip K <philip@warpmail.net>
Commit: Philip K <philip@warpmail.net>

    reindented autocrypt-list-recipients
---
 autocrypt.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/autocrypt.el b/autocrypt.el
index 629c920ef1..c7fba8ff6f 100644
--- a/autocrypt.el
+++ b/autocrypt.el
@@ -267,13 +267,13 @@ well-formed, otherwise returns just nil."
       (and addr keydata (list addr pref keydata)))))
 
 (defun autocrypt-list-recipients ()
-    "Return a list of all recipients to this message."
-    (let (recipients)
-      (dolist (hdr '("To" "Cc" "Reply-To"))
-        (let* ((f (autocrypt-mua-call :header hdr))
-               (r (and f (mail-extract-address-components f t))))
-          (setq recipients (nconc (mapcar #'cadr r) recipients))))
-      (delete-dups recipients)))
+  "Return a list of all recipients to this message."
+  (let (recipients)
+    (dolist (hdr '("To" "Cc" "Reply-To"))
+      (let* ((f (autocrypt-mua-call :header hdr))
+             (r (and f (mail-extract-address-components f t))))
+        (setq recipients (nconc (mapcar #'cadr r) recipients))))
+    (delete-dups recipients)))
 
 ;;; 
https://autocrypt.org/level1.html#updating-autocrypt-peer-state-from-key-gossip
 (defun autocrypt-process-gossip (date)



reply via email to

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