[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r112226: * autorevert.el (auto-revert
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r112226: * autorevert.el (auto-revert-mode, auto-revert-tail-mode) |
Date: |
Fri, 05 Apr 2013 12:18:43 +0200 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 112226
committer: Michael Albinus <address@hidden
branch nick: trunk
timestamp: Fri 2013-04-05 12:18:43 +0200
message:
* autorevert.el (auto-revert-mode, auto-revert-tail-mode)
(global-auto-revert-mode): Let-bind `auto-revert-use-notify' to
nil during initialization, in order not to miss changes since the
file was opened. (Bug#14140)
modified:
lisp/ChangeLog
lisp/autorevert.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-04-05 08:38:06 +0000
+++ b/lisp/ChangeLog 2013-04-05 10:18:43 +0000
@@ -1,3 +1,10 @@
+2013-04-05 Michael Albinus <address@hidden>
+
+ * autorevert.el (auto-revert-mode, auto-revert-tail-mode)
+ (global-auto-revert-mode): Let-bind `auto-revert-use-notify' to
+ nil during initialization, in order not to miss changes since the
+ file was opened. (Bug#14140)
+
2013-04-05 Leo Liu <address@hidden>
* kmacro.el (kmacro-call-macro): Fix bug#14135.
=== modified file 'lisp/autorevert.el'
--- a/lisp/autorevert.el 2013-02-16 09:13:40 +0000
+++ b/lisp/autorevert.el 2013-04-05 10:18:43 +0000
@@ -367,8 +367,9 @@
(delq (current-buffer) auto-revert-buffer-list)))
(auto-revert-set-timer)
(when auto-revert-mode
- (auto-revert-buffers)
- (setq auto-revert-tail-mode nil)))
+ (let (auto-revert-use-notify)
+ (auto-revert-buffers)
+ (setq auto-revert-tail-mode nil))))
;;;###autoload
@@ -422,7 +423,8 @@
(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.
- (auto-revert-handler))
+ (let (auto-revert-use-notify)
+ (auto-revert-handler)))
;; 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
@@ -467,7 +469,8 @@
:global t :group 'auto-revert :lighter global-auto-revert-mode-text
(auto-revert-set-timer)
(if global-auto-revert-mode
- (auto-revert-buffers)
+ (let (auto-revert-use-notify)
+ (auto-revert-buffers))
(dolist (buf (buffer-list))
(with-current-buffer buf
(when auto-revert-use-notify
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r112226: * autorevert.el (auto-revert-mode, auto-revert-tail-mode),
Michael Albinus <=