[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r111487: Fix a scoping error.
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r111487: Fix a scoping error. |
Date: |
Fri, 11 Jan 2013 23:54:42 +0100 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 111487
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Fri 2013-01-11 23:54:42 +0100
message:
Fix a scoping error.
modified:
lisp/autorevert.el
=== modified file 'lisp/autorevert.el'
--- a/lisp/autorevert.el 2013-01-11 22:36:32 +0000
+++ b/lisp/autorevert.el 2013-01-11 22:54:42 +0000
@@ -524,9 +524,9 @@
(file (auto-revert-notify-event-file-name event))
(buffer (gethash descriptor
auto-revert-notify-watch-descriptor-hash-list)))
- ;; Check, that event is meant for us.
- ;; TODO: Filter events which stop watching, like `move' or `removed'.
(ignore-errors
+ ;; Check, that event is meant for us.
+ ;; TODO: Filter events which stop watching, like `move' or `removed'.
(assert descriptor)
(when (featurep 'inotify) (assert (memq 'modify descriptor)))
(when (featurep 'w32notify) (assert (eq 'modified descriptor)))
@@ -534,11 +534,11 @@
(when (stringp file)
(assert (string-equal
(directory-file-name file)
- (directory-file-name (buffer-file-name buffer))))))
+ (directory-file-name (buffer-file-name buffer)))))
- ;; Mark buffer modified.
- (with-current-buffer buffer
- (setq auto-revert-notify-modified-p t)))))
+ ;; Mark buffer modified.
+ (with-current-buffer buffer
+ (setq auto-revert-notify-modified-p t))))))
(defun auto-revert-active-p ()
"Check if auto-revert is active (in current buffer or globally)."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r111487: Fix a scoping error.,
Michael Albinus <=