aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/mail
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/mspools.el2
-rw-r--r--lisp/mail/rmail.el4
2 files changed, 3 insertions, 3 deletions
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."
398 )) 398 ))
399 399
400(defun mspools-size-folder (spool) 400(defun mspools-size-folder (spool)
401 "Return (SPOOL . SIZE ) iff SIZE of spool file is non-zero." 401 "Return (SPOOL . SIZE ), if SIZE of spool file is non-zero."
402 ;; 7th file attribute is the size of the file in bytes. 402 ;; 7th file attribute is the size of the file in bytes.
403 (let ((file (concat mspools-folder-directory spool)) 403 (let ((file (concat mspools-folder-directory spool))
404 size) 404 size)
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 37a0533acc9..ee990f2fdd3 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."
3992 (mail-position-on-field (if resending "Resent-To" "To") t)))))) 3992 (mail-position-on-field (if resending "Resent-To" "To") t))))))
3993 3993
3994(defun rmail-summary-exists () 3994(defun rmail-summary-exists ()
3995 "Non-nil iff in an RMAIL buffer and an associated summary buffer exists. 3995 "Non-nil if in an RMAIL buffer and an associated summary buffer exists.
3996In fact, the non-nil value returned is the summary buffer itself." 3996In fact, the non-nil value returned is the summary buffer itself."
3997 (and rmail-summary-buffer (buffer-name rmail-summary-buffer) 3997 (and rmail-summary-buffer (buffer-name rmail-summary-buffer)
3998 rmail-summary-buffer)) 3998 rmail-summary-buffer))
3999 3999
4000(defun rmail-summary-displayed () 4000(defun rmail-summary-displayed ()
4001 "t iff in RMAIL buffer and an associated summary buffer is displayed." 4001 "t if in RMAIL buffer and an associated summary buffer is displayed."
4002 (and rmail-summary-buffer (get-buffer-window rmail-summary-buffer))) 4002 (and rmail-summary-buffer (get-buffer-window rmail-summary-buffer)))
4003 4003
4004(defcustom rmail-redisplay-summary nil 4004(defcustom rmail-redisplay-summary nil