diff options
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/mailabbrev.el | 2 | ||||
| -rw-r--r-- | lisp/mail/mspools.el | 2 | ||||
| -rw-r--r-- | lisp/mail/rmail.el | 4 |
3 files changed, 4 insertions, 4 deletions
diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index b3e2c051e7d..8862e6ca2d2 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el @@ -495,7 +495,7 @@ of a mail alias. The value is set up, buffer-local, when first needed.") (or (and (integerp last-command-char) ;; Some commands such as M-> may want to expand first. - (equal this-command 'self-insert) + (equal this-command 'self-insert-command) (or (eq (char-syntax last-command-char) ?_) ;; Don't expand on @. (memq last-command-char '(?@ ?. ?% ?! ?_ ?-)))) diff --git a/lisp/mail/mspools.el b/lisp/mail/mspools.el index d14be55735f..988ce2f8e02 100644 --- a/lisp/mail/mspools.el +++ b/lisp/mail/mspools.el @@ -398,7 +398,7 @@ nil." )) (defun mspools-size-folder (spool) - "Return (SPOOL . SIZE ) iff SIZE of spool file is non-zero." + "Return (SPOOL . SIZE ), if SIZE of spool file is non-zero." ;; 7th file attribute is the size of the file in bytes. (let ((file (concat mspools-folder-directory spool)) size) diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index e4475f5be62..2dd381fdafb 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -3992,13 +3992,13 @@ specifying headers which should not be copied into the new message." (mail-position-on-field (if resending "Resent-To" "To") t)))))) (defun rmail-summary-exists () - "Non-nil iff in an RMAIL buffer and an associated summary buffer exists. + "Non-nil if in an RMAIL buffer and an associated summary buffer exists. In fact, the non-nil value returned is the summary buffer itself." (and rmail-summary-buffer (buffer-name rmail-summary-buffer) rmail-summary-buffer)) (defun rmail-summary-displayed () - "t iff in RMAIL buffer and an associated summary buffer is displayed." + "t if in RMAIL buffer and an associated summary buffer is displayed." (and rmail-summary-buffer (get-buffer-window rmail-summary-buffer))) (defcustom rmail-redisplay-summary nil |