From: Dima Kogan <dima@secretsauce.net>
Date: Sat, 21 Feb 2015 09:47:22 +0000 (+0100)
Subject: Install notification handlers when enabling the auto-revert modes.
X-Git-Tag: emacs-25.0.90~2564^2~330
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6982acc4e1561e681ea18a91ee87c32cd3b47f57;p=emacs.git

Install notification handlers when enabling the auto-revert modes.

* autorevert.el (auto-revert-mode, auto-revert-tail-mode)
(global-auto-revert-mode): Remove (let (auto-revert-use-notify) ... )
wrappers.  Call (auto-revert-buffers) consequently in order to
install handlers.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4e59654e0c2..7f5fb7ddf0d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2015-02-21  Dima Kogan  <dima@secretsauce.net>
+
+	* autorevert.el (auto-revert-mode, auto-revert-tail-mode)
+	(global-auto-revert-mode): Remove (let (auto-revert-use-notify) ... )
+	wrappers.  Call (auto-revert-buffers) consequently in order to
+	install handlers.
+
 2015-02-21  Wilson Snyder  <wsnyder@wsnyder.org>
 
 	Sync with upstream verilog-mode revision 0d6420b.
diff --git a/lisp/autorevert.el b/lisp/autorevert.el
index 02cef24f2aa..4dd021e4c76 100644
--- a/lisp/autorevert.el
+++ b/lisp/autorevert.el
@@ -361,9 +361,8 @@ without being changed in the part that is already in the buffer."
 	  (delq (current-buffer) auto-revert-buffer-list)))
   (auto-revert-set-timer)
   (when auto-revert-mode
-    (let (auto-revert-use-notify)
-      (auto-revert-buffers)
-      (setq auto-revert-tail-mode nil))))
+    (auto-revert-buffers)
+    (setq auto-revert-tail-mode nil)))
 
 
 ;;;###autoload
@@ -417,8 +416,7 @@ Use `auto-revert-mode' for changes other than appends!"
            (y-or-n-p "File changed on disk, content may be missing.  \
 Perform a full revert? ")
            ;; Use this (not just revert-buffer) for point-preservation.
-	   (let (auto-revert-use-notify)
-	     (auto-revert-handler)))
+           (auto-revert-buffers))
       ;; else we might reappend our own end when we save
       (add-hook 'before-save-hook (lambda () (auto-revert-tail-mode 0)) nil t)
       (or (local-variable-p 'auto-revert-tail-pos) ; don't lose prior position
@@ -463,8 +461,7 @@ specifies in the mode line."
   :global t :group 'auto-revert :lighter global-auto-revert-mode-text
   (auto-revert-set-timer)
   (if global-auto-revert-mode
-      (let (auto-revert-use-notify)
-	(auto-revert-buffers))
+      (auto-revert-buffers)
     (dolist (buf (buffer-list))
       (with-current-buffer buf
 	(when auto-revert-use-notify