[Emacs-diffs] trunk r115439: * autorevert.el (auto-revert-notify-add-watch): Do not handle symlinked files.

[Michael Albinus]

------------------------------------------------------------
revno: 115439
revision-id: address@hidden
parent: address@hidden
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Mon 2013-12-09 15:47:00 +0100
message:
  * autorevert.el (auto-revert-notify-add-watch): Do not handle symlinked files.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/autorevert.el             
autorevert.el-20091113204419-o5vbwnq5f7feedwu-1197

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-12-09 04:19:16 +0000
+++ b/lisp/ChangeLog    2013-12-09 14:47:00 +0000
@@ -1,3 +1,8 @@
+2013-12-09  Michael Albinus  <address@hidden>
+
+       * autorevert.el (auto-revert-notify-add-watch): Do not handle
+       symlinked files.
+
 2013-12-09  Dmitry Gutov  <address@hidden>
 
        * progmodes/ruby-mode.el (ruby-smie--implicit-semi-p): Return t

=== modified file 'lisp/autorevert.el'
--- a/lisp/autorevert.el        2013-09-12 04:56:51 +0000
+++ b/lisp/autorevert.el        2013-12-09 14:47:00 +0000
@@ -504,13 +504,15 @@
 
 (defun auto-revert-notify-add-watch ()
   "Enable file notification for current buffer's associated file."
-  (when (string-match auto-revert-notify-exclude-dir-regexp
-                     (expand-file-name default-directory))
+  ;; We can assume that `buffer-file-name' and
+  ;; `auto-revert-use-notify' are non-nil.
+  (when (or (string-match auto-revert-notify-exclude-dir-regexp
+                         (expand-file-name default-directory))
+           (not (file-symlink-p buffer-file-name)))
     ;; Fallback to file checks.
     (set (make-local-variable 'auto-revert-use-notify) nil))
 
-  (when (and buffer-file-name auto-revert-use-notify
-            (not auto-revert-notify-watch-descriptor))
+  (when (not auto-revert-notify-watch-descriptor)
     (setq auto-revert-notify-watch-descriptor
          (ignore-errors
            (file-notify-add-watch