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

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/02/14 03:40:41

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

Log message:
        (rmail): When reverting, swap buffers before setting counters.  
(Bug#2229)
        (rmail-revert): Swap buffers before replacing contents.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15327&r2=1.15328
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmail.el?cvsroot=emacs&r1=1.504&r2=1.505

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15327
retrieving revision 1.15328
diff -u -b -r1.15327 -r1.15328
--- ChangeLog   14 Feb 2009 02:54:00 -0000      1.15327
+++ ChangeLog   14 Feb 2009 03:40:39 -0000      1.15328
@@ -1,3 +1,14 @@
+2009-02-14  Glenn Morris  <address@hidden>
+
+       * mail/rmail.el (rmail): When reverting, swap buffers before setting
+       counters.  (Bug#2229)
+       (rmail-revert): Swap buffers before replacing contents.
+
+2009-02-14  Ian Eure  <address@hidden>  (tiny change)
+
+       * progmodes/sql.el (sql-product-alist, sql-connect-sqlite):
+       Remove host, user, password options not applicable to SQlite. (Bug#1904)
+
 2009-02-14  Richard M Stallman  <address@hidden>
 
        * mail/rmailout.el (rmail-output-body-to-file): Avoid space and colon

Index: mail/rmail.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmail.el,v
retrieving revision 1.504
retrieving revision 1.505
diff -u -b -r1.504 -r1.505
--- mail/rmail.el       14 Feb 2009 02:51:55 -0000      1.504
+++ mail/rmail.el       14 Feb 2009 03:40:41 -0000      1.505
@@ -846,6 +846,7 @@
          (find-file file-name)
          (when (and (verify-visited-file-modtime existed)
                     (eq major-mode 'rmail-mode))
+           (rmail-swap-buffers-maybe)
            (rmail-set-message-counters)))
       ;; The mail file is either unchanged or not visited.  Visit it.
       (switch-to-buffer
@@ -1382,7 +1383,8 @@
   (let* ((revert-buffer-function (default-value 'revert-buffer-function))
         (rmail-enable-multibyte enable-multibyte-characters)
         ;; See similar code in `rmail'.
-        (coding-system-for-read (and rmail-enable-multibyte 'raw-text)))
+        (coding-system-for-read (and rmail-enable-multibyte 'raw-text))
+        (before-revert-hook 'rmail-swap-buffers-maybe))
     ;; Call our caller again, but this time it does the default thing.
     (when (revert-buffer arg noconfirm)
       ;; If the user said "yes", and we changed something,