[elpa] externals/autocrypt 37e14c3b92 60/94: Handle autocrypt-do-gossip as advertised

[ELPA Syncer]

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

    Handle autocrypt-do-gossip as advertised
---
 autocrypt.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/autocrypt.el b/autocrypt.el
index 828a3bc110..93e9466dfe 100644
--- a/autocrypt.el
+++ b/autocrypt.el
@@ -343,7 +343,7 @@ Argument DATE contains the time value of the \"From\" tag."
                         :timestamp date
                         :pubkey keydata
                         :preference preference)))))
-    (when autocrypt-do-gossip
+    (when (memq autocrypt-do-gossip '(t only-receive))
       (autocrypt-process-gossip date))
     (when (string= from addr)
       (unless (time-less-p date (autocrypt-peer-timestamp peer))
@@ -416,7 +416,7 @@ preference (\"prefer-encrypt\")."
   "Find out if the current message should have gossip headers.
 Argument RECIPIENTS is a list of addresses this message is
 addressed to."
-  (and autocrypt-do-gossip
+  (and (memq autocrypt-do-gossip '(t only-send))
        (autocrypt-encrypted-p)
        (< 1 (length recipients))
        (cl-every