Mercurial > emacs

diff lisp/mail/rmailout.el @ 4058:af785cbe489a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix typos in previous change.
author Richard M. Stallman <rms@gnu.org>
date Sat, 10 Jul 1993 05:09:45 +0000
parents 419e92a78e6f
children af1bbadc70c7
line wrap: on
line diff
--- a/lisp/mail/rmailout.el	Fri Jul 09 21:42:51 1993 +0000
+++ b/lisp/mail/rmailout.el	Sat Jul 10 05:09:45 1993 +0000
@@ -169,7 +169,7 @@
 	(expand-file-name file-name
 			  (and rmail-last-file
 			       (file-name-directory rmail-last-file))))
-  (if (and (file-readable-p file) (rmail-file-p file-name))
+  (if (and (file-readable-p file-name) (rmail-file-p file-name))
       (rmail-output-to-rmail-file file-name count)
     (setq rmail-last-file file-name)
     (while (> count 0)
@@ -202,6 +202,6 @@
       (if rmail-delete-after-output
 	  (rmail-delete-forward)
 	(if (> count 0)
-	    (rmail-next-undeleted-message 1)))))
+	    (rmail-next-undeleted-message 1))))))
 
 ;;; rmailout.el ends here