branch: elpa/vm
commit ebb2369e5daeb86d63f0ec188d4aadaeb540c8e0
Author: Simon Leinen (SWITCH) <[email protected]>
Commit: Simon Leinen (SWITCH) <[email protected]>
vm-read-thunderbird-status: Fix bug extracting read-receipt-flag
---
lisp/vm-folder.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/vm-folder.el b/lisp/vm-folder.el
index fd6e5d2f308..b385fa24db3 100644
--- a/lisp/vm-folder.el
+++ b/lisp/vm-folder.el
@@ -1443,9 +1443,9 @@ vm-folder-type is initialized here."
;; (unless (= 0 (logand status #x0020)) ; deleted on the server
;; nil)
;; read-receipt requested
- (vm-set-read-receipt-flag-of message (not (= 0 (logand status #x0040))))
+ (vm-set-read-receipt-flag-of message (not (= 0 (logand status #x0040))))
;; read-receipt sent
- (vm-set-read-receipt-sent-flag-of message (not (logand status #x0080)))
+ (vm-set-read-receipt-sent-flag-of message (not (= 0 (logand status
#x0080))))
;; (unless (= 0 (logand status #x0100)) ; template
;; nil)
;; has attachments
