diff options
author | Roland McGrath <roland@gnu.org> | 1991-07-23 19:23:23 +0000 |
---|---|---|
committer | Roland McGrath <roland@gnu.org> | 1991-07-23 19:23:23 +0000 |
commit | c462c9645e1a926134ff199f527e183b27135854 (patch) | |
tree | 7fb99447694ba4995da0603869d210c44a56a8dd /lisp | |
parent | 43fb149c11d731d73970f0daa153cd0e5596bf6a (diff) | |
download | emacs-c462c9645e1a926134ff199f527e183b27135854.tar.gz |
*** empty log message ***
Diffstat (limited to 'lisp')
-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 4a68e089a3c..94adb25a870 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -869,7 +869,7 @@ again afterward. FUNCTION may not change the visible text of the message, but it may change the invisible header text." (save-excursion - (let ((obeg (- (point-max) (point-min))) + (let ((obeg (- (point-max) (point-min)))) (unwind-protect (progn (narrow-to-region (rmail-msgbeg rmail-current-message) @@ -881,7 +881,7 @@ change the invisible header text." ;; before that restriction is restored. ;; Here we assume that changes made by FUNCTION ;; occur before the visible region of the message. - (narrow-to-region (- (point-max) obeg) (point-max))))))) + (narrow-to-region (- (point-max) obeg) (point-max)))))) (defun rmail-forget-messages () (unwind-protect |