[elpa] externals/autocrypt 754af378cc 40/94: Fix broken method invocations

[ELPA Syncer]

branch: externals/autocrypt
commit 754af378cc41b99bff640bceaaadac4ccbdfcf84
Author: Philip K <philipk@posteo.net>
Commit: Philip K <philipk@posteo.net>

    Fix broken method invocations
---
 autocrypt.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/autocrypt.el b/autocrypt.el
index 9fcb3dd526..5fb18d5532 100644
--- a/autocrypt.el
+++ b/autocrypt.el
@@ -257,12 +257,12 @@ well-formed, otherwise returns just nil."
 
 Argument DATE contains the time value of the \"From\" tag."
   (let ((recip (autocrypt-list-recipients))
-        (root (autocrypt-get-part major-mode major-mode 0))
+        (root (autocrypt-get-part major-mode 0))
         (re (rx bol "Autocrypt-Gossip:" (* space)
                 (group (+ (or nonl (: "\n "))))
                 eol))
         gossip)
-    (when root
+    (unless (eq root 'n/a)
       (catch 'unsupported
         (with-temp-buffer
           ;; The MUA interface should have the flexibility to return
@@ -446,7 +446,7 @@ Will handle and remove \"Do-(Discourage-)Autocrypt\" if 
found."
     ;; insert autocrypt header
     (let ((header (and from (autocrypt-generate-header from))))
       (when header
-        (autocrypt-add-header major-mode header)))))
+        (autocrypt-add-header major-mode "Autocrypt" header)))))
 
 ;;;###autoload
 (defun autocrypt-create-account ()