From 073fb95606c1d373cca9d528d27239aae9bc1bef Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 11 Sep 1993 10:40:03 +0000 Subject: [PATCH] (rmail-convert-file): Narrow to exclude the Babyl header. --- lisp/mail/rmail.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 979975bafa0..9ab9c86f11f 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -286,9 +286,9 @@ that file, but does not copy any new mail into the file." ;; If file needs conversion, convert it all, ;; except for the BABYL header. ;; (rmail-convert-to-babyl-format would delete the header.) -;;; (narrow-to-region (point) (point-max)) (goto-char (point-min)) (search-forward "\n\^_" nil t) + (narrow-to-region (point) (point-max)) (rmail-convert-to-babyl-format) (message "Converting to Babyl format...done"))))) -- 2.39.5