(rmail-get-new-mail): Avoid error if file is empty.

[gnu-emacs] / lisp / mail / rmail.el

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 28ed65252001760cdaa3832ca4f194e55cb26586..bd788b78d8d446533384be309cea9bd206f3fca6 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -696,7 +696,7 @@ argument causes us to read a file name and use that file as the inbox."
            (or (zerop new-messages)
                (let (success)
                  (widen)
-                 (search-backward "\n\^_")
+                 (search-backward "\n\^_" nil t)
                  (narrow-to-region (point) (point-max))
                  (goto-char (1+ (point-min)))
                  (rmail-count-new-messages)