diff options
Diffstat (limited to 'lisp/net/imap.el')
-rw-r--r-- | lisp/net/imap.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/net/imap.el b/lisp/net/imap.el index 9f43c57ffd3..eb963094212 100644 --- a/lisp/net/imap.el +++ b/lisp/net/imap.el @@ -1672,8 +1672,9 @@ non-nil, return these properties." "Return t if FLAG can be permanently saved on articles. MAILBOX specifies a mailbox on the server in BUFFER." (with-current-buffer (or buffer (current-buffer)) - (or (member "\\*" (imap-mailbox-get 'permanentflags mailbox)) - (member flag (imap-mailbox-get 'permanentflags mailbox))))) + (and (or (member "\\*" (imap-mailbox-get 'permanentflags mailbox)) + (member flag (imap-mailbox-get 'permanentflags mailbox))) + t))) (defun imap-message-flags-set (articles flags &optional silent buffer) (when (and articles flags) |