[Emacs-diffs] emacs/lisp ChangeLog mail/rmailedit.el

[Richard M. Stallman]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Richard M. Stallman <rms>       09/05/17 16:11:26

Modified files:
        lisp           : ChangeLog 
        lisp/mail      : rmailedit.el 

Log message:
        * mail/rmailedit.el (rmail-edit-current-message):
        Call rmail-modify-format here.
        (rmail-cease-edit): Not here.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15641&r2=1.15642
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailedit.el?cvsroot=emacs&r1=1.58&r2=1.59

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15641
retrieving revision 1.15642
diff -u -b -r1.15641 -r1.15642
--- ChangeLog   17 May 2009 03:38:41 -0000      1.15641
+++ ChangeLog   17 May 2009 16:11:23 -0000      1.15642
@@ -1,3 +1,9 @@
+2009-05-17  Richard M Stallman  <address@hidden>
+
+       * mail/rmailedit.el (rmail-edit-current-message):
+       Call rmail-modify-format here.
+       (rmail-cease-edit): Not here.
+
 2009-05-17  Stefan Monnier  <address@hidden>
 
        * vc-bzr.el (vc-bzr-state-heuristic): Fallback on vc-bzr-state in case

Index: mail/rmailedit.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/mail/rmailedit.el,v
retrieving revision 1.58
retrieving revision 1.59
diff -u -b -r1.58 -r1.59
--- mail/rmailedit.el   10 Apr 2009 14:22:05 -0000      1.58
+++ mail/rmailedit.el   17 May 2009 16:11:26 -0000      1.59
@@ -88,6 +88,7 @@
   (interactive)
   (if (zerop rmail-total-messages)
       (error "No messages in this buffer"))
+  (rmail-modify-format)
   (make-local-variable 'rmail-old-pruned)
   (setq rmail-old-pruned (rmail-msg-is-pruned))
   (rmail-edit-mode)
@@ -117,7 +118,6 @@
 (defun rmail-cease-edit ()
   "Finish editing message; switch back to Rmail proper."
   (interactive)
-  (rmail-modify-format)
   (if (rmail-summary-exists)
       (with-current-buffer rmail-summary-buffer
        (rmail-summary-enable)))