[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-24 6444482: Fix auto-revert-tail-mode for remote fil
From: |
Filipp Gunbin |
Subject: |
[Emacs-diffs] emacs-24 6444482: Fix auto-revert-tail-mode for remote files |
Date: |
Mon, 29 Dec 2014 14:36:05 +0000 |
branch: emacs-24
commit 6444482c63b8f148c44904f11599de643e903dca
Author: Filipp Gunbin <address@hidden>
Commit: Filipp Gunbin <address@hidden>
Fix auto-revert-tail-mode for remote files
Fixes: debbugs:19449
* autorevert.el (auto-revert-handler): Fix auto-revert-tail-mode for
remote files (bug#19449)
---
lisp/ChangeLog | 4 ++++
lisp/autorevert.el | 17 ++++++++---------
2 files changed, 12 insertions(+), 9 deletions(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bd7959e..663526c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2014-12-29 Filipp Gunbin <address@hidden>
+
+ * autorevert.el (auto-revert-handler): Fix auto-revert-tail-mode for
remote files (bug#19449)
+
2014-12-28 Eli Zaretskii <address@hidden>
* international/mule.el (define-coding-system): Fix typos in the
diff --git a/lisp/autorevert.el b/lisp/autorevert.el
index f1074e2..08c5452 100644
--- a/lisp/autorevert.el
+++ b/lisp/autorevert.el
@@ -589,8 +589,8 @@ This is an internal function used by Auto-Revert Mode."
;; the values.
(remote-file-name-inhibit-cache t)
(revert
- (or (and buffer-file-name
- (or auto-revert-remote-files
+ (if buffer-file-name
+ (and (or auto-revert-remote-files
(not (file-remote-p buffer-file-name)))
(or (not auto-revert-use-notify)
auto-revert-notify-modified-p)
@@ -603,11 +603,11 @@ This is an internal function used by Auto-Revert Mode."
(funcall (or buffer-stale-function
#'buffer-stale--default-function)
t)))
- (and (or auto-revert-mode
- global-auto-revert-non-file-buffers)
- (funcall (or buffer-stale-function
- #'buffer-stale--default-function)
- t))))
+ (and (or auto-revert-mode
+ global-auto-revert-non-file-buffers)
+ (funcall (or buffer-stale-function
+ #'buffer-stale--default-function)
+ t))))
eob eoblist)
(setq auto-revert-notify-modified-p nil)
(when revert
@@ -690,8 +690,7 @@ the timer when no buffers need to be checked."
(let ((bufs (if global-auto-revert-mode
(buffer-list)
auto-revert-buffer-list))
- (remaining ())
- (new ()))
+ remaining new)
;; Partition `bufs' into two halves depending on whether or not
;; the buffers are in `auto-revert-remaining-buffers'. The two
;; halves are then re-joined with the "remaining" buffers at the
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-24 6444482: Fix auto-revert-tail-mode for remote files,
Filipp Gunbin <=