aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael I. Bushnell1991-08-20 21:31:08 +0000
committerMichael I. Bushnell1991-08-20 21:31:08 +0000
commita553316bbc4c8d6f4457bf57496ab9e53dad85a1 (patch)
tree1a1834f32ea98a85530d4984e522942f0b6f1b9c
parent9198945a5b61f749a2a97c0e7f6fdf6a73ea3e6a (diff)
downloademacs-a553316bbc4c8d6f4457bf57496ab9e53dad85a1.tar.gz
emacs-a553316bbc4c8d6f4457bf57496ab9e53dad85a1.zip
*** empty log message ***
-rw-r--r--lisp/mail/rmail.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index f2465100f48..fcb55c90dd9 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -598,7 +598,7 @@ argument causes us to read a file name and use that file as the inbox."
598 ;; If we find the proper terminator, delete through there. 598 ;; If we find the proper terminator, delete through there.
599 (delete-region (point-min) (point)) 599 (delete-region (point-min) (point))
600 (funcall invalid-input-resync) 600 (funcall invalid-input-resync)
601 (delete-region (point-min) (point))) 601 (delete-region (point-min) (point))))
602 ;; Babyl format message 602 ;; Babyl format message
603 ((looking-at "\^L") 603 ((looking-at "\^L")
604 (or (search-forward "\n\^_" nil t) 604 (or (search-forward "\n\^_" nil t)
@@ -657,7 +657,7 @@ argument causes us to read a file name and use that file as the inbox."
657 ;;This is a kludge, in case we're wrong about mmdf not 657 ;;This is a kludge, in case we're wrong about mmdf not
658 ;;allowing anything in between. If it loses, we'll have 658 ;;allowing anything in between. If it loses, we'll have
659 ;;to look for something else 659 ;;to look for something else
660 (t (error "Cannot convert to babyl format")))))) 660 (t (error "Cannot convert to babyl format")))))
661 count)) 661 count))
662 662
663;; Delete the "From ..." line, creating various other headers with 663;; Delete the "From ..." line, creating various other headers with