diff options
| author | Richard M. Stallman | 1995-08-12 09:23:54 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-08-12 09:23:54 +0000 |
| commit | 0b40717e5b25946b555aba5aff377c6892fe91c6 (patch) | |
| tree | 772ac927fbce98fcb8e62f52e059916dc22472a6 | |
| parent | 6db3a963aba155d0d144413ea3a2890f6e8e3a80 (diff) | |
| download | emacs-0b40717e5b25946b555aba5aff377c6892fe91c6.tar.gz emacs-0b40717e5b25946b555aba5aff377c6892fe91c6.zip | |
(rmail-convert-file): Look back for ^_ only at bol.
| -rw-r--r-- | lisp/mail/rmail.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index d631eba3ab5..49128f85eb5 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -338,8 +338,8 @@ If `rmail-display-summary' is non-nil, make a summary for this RMAIL file." | |||
| 338 | (if (or convert | 338 | (if (or convert |
| 339 | (save-excursion | 339 | (save-excursion |
| 340 | (goto-char (point-max)) | 340 | (goto-char (point-max)) |
| 341 | (search-backward "\^_") | 341 | (search-backward "\n\^_") |
| 342 | (forward-char 1) | 342 | (forward-char 2) |
| 343 | (looking-at "\n*From "))) | 343 | (looking-at "\n*From "))) |
| 344 | (let ((buffer-read-only nil)) | 344 | (let ((buffer-read-only nil)) |
| 345 | (message "Converting to Babyl format...") | 345 | (message "Converting to Babyl format...") |