# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 742280985 0
# Node ID af785cbe489aa267ed3fa8c09abfd316a810e474
# Parent  2fe1488b503c26ecf3202d0eb8b7a57f23bb2429
Fix typos in previous change.

diff -r 2fe1488b503c -r af785cbe489a lisp/mail/rmailout.el
--- 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