mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 18:40:39 -08:00
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.
This commit is contained in:
parent
cb29a38164
commit
d4cfe67e8a
9 changed files with 21 additions and 15 deletions
|
|
@ -485,7 +485,8 @@ set `mh-alias-insert-file' or the \"Aliasfile:\" profile component"))
|
|||
(set-buffer mh-show-buffer))
|
||||
(let ((from-header (mh-extract-from-header-value)))
|
||||
(and from-header
|
||||
(mh-alias-address-to-alias from-header))))))
|
||||
(mh-alias-address-to-alias from-header)
|
||||
t)))))
|
||||
|
||||
(defun mh-alias-add-alias-to-file (alias address &optional file)
|
||||
"Add ALIAS for ADDRESS in alias FILE without alias check or prompts.
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue