(auto-revert-buffers): Auto-revert mode was turned

off when reverting buffers that contained mode specifiers.
`revert-buffer' is now called with non-nil PRESERVE-MODES
argument.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 77cd226d114ff3109532cbe50586b646900c8baa..7daed0f764e8ee91c0c6d0e9453ba0514a86b52a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+1999-12-01  Anders Lindgren  <andersl@andersl.com>
+
+       * autorevert.el (auto-revert-buffers): Auto-revert mode was turned
+       off when reverting buffers that contained mode specifiers.
+       `revert-buffer' is now called with non-nil PRESERVE-MODES
+       argument.
+
 1999-12-01  Dave Love  <fx@gnu.org>
 
        * delsel.el: Grok skeleton-pair-insert-maybe.

diff --git a/lisp/autorevert.el b/lisp/autorevert.el
index 55038391f5d08cdaf65124cb3051f7789ecd5253..7845e05cedf7b6988993364d7559ef89e8c08495 100644 (file)
--- a/lisp/autorevert.el
+++ b/lisp/autorevert.el
@@ -1,11 +1,11 @@
 ;;; autorevert --- revert buffers when files on disk change
 
-;; Copyright (C) 1997, 1998 Free Software Foundation, Inc.
+;; Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc.
 
-;; Author: Anders Lindgren <andersl@csd.uu.se>
+;; Author: Anders Lindgren <andersl@andersl.com>
 ;; Keywords: convenience
-;; Created: 1 Jun 1997
-;; Date: 3 Jul 1997
+;; Created: 1997-06-01
+;; Date: 1999-11-30
 
 ;; This file is part of GNU Emacs.
 
@@ -350,7 +350,7 @@ the timer when no buffers need to be checked."
                                auto-revert-mode))))
                (if auto-revert-verbose
                    (message "Reverting buffer `%s'." buf))
-               (revert-buffer t t)))
+               (revert-buffer t t t)))
          ;; Remove dead buffer from `auto-revert-buffer-list'.
          (setq auto-revert-buffer-list
                (delq buf auto-revert-buffer-list))))