[Emacs-diffs] /srv/bzr/emacs/trunk r111487: Fix a scoping error.

[Michael Albinus]

------------------------------------------------------------
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)."