diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2019-10-14 23:52:21 +0200 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2019-10-14 23:53:16 +0200 |
| commit | d4cfe67e8ae4392fc1f01879f6d3a9a8b6947ac1 (patch) | |
| tree | 55acfca7542deae88ac291b238fef293fc59b619 /lisp/net/imap.el | |
| parent | cb29a3816489a9bb5472bb3dfe4b64687419cb2e (diff) | |
| download | emacs-d4cfe67e8ae4392fc1f01879f6d3a9a8b6947ac1.tar.gz emacs-d4cfe67e8ae4392fc1f01879f6d3a9a8b6947ac1.tar.bz2 emacs-d4cfe67e8ae4392fc1f01879f6d3a9a8b6947ac1.zip | |
lisp/*.el: Force non-nil result to t, to match docstring
* lisp/ido.el (ido-ignore-item-p):
* lisp/simple.el (use-region-p):
* lisp/whitespace.el (whitespace-style-face-p)
(whitespace-style-mark-p):
* lisp/calendar/cal-islam.el (calendar-islamic-leap-year-p):
* lisp/mail/rmail.el (rmail-is-text-p):
* lisp/mh-e/mh-alias.el (mh-alias-for-from-p):
* lisp/net/imap.el (imap-message-flag-permanent-p):
* lisp/progmodes/tcl.el (tcl-real-comment-p):
* lisp/textmodes/table.el (table--point-in-cell-p):
Normalize boolean result.
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) |