[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] scratch/albinus 4be6b83 1/2: Improve file-notify-callback.

From: Michael Albinus
Subject: [Emacs-diffs] scratch/albinus 4be6b83 1/2: Improve file-notify-callback.
Date: Sat, 5 Jan 2019 10:02:51 -0500 (EST)

branch: scratch/albinus
commit 4be6b83a7a2289bac4ce23166144ba5976c6ce63
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Improve file-notify-callback.
    * lisp/filenotify.el (file-notify-callback): Improve check for
    `stopped' event.
 lisp/filenotify.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/filenotify.el b/lisp/filenotify.el
index c79bc4f..89fae27 100644
--- a/lisp/filenotify.el
+++ b/lisp/filenotify.el
@@ -253,8 +253,10 @@ EVENT is the cadr of the event in 
                          ;; Not, when a file is backed up.
                          (not (and (stringp file1) (backup-file-name-p file1)))
                          ;; Watched file or directory is concerned.
-                         (string-equal
-                          file (file-notify--event-watched-file event))))
+                         (or (string-equal
+                              file (file-notify--event-watched-file event))
+                             (string-equal
+                              file (file-notify--watch-directory watch)))))
             (file-notify-rm-watch desc)))))))
 ;; `kqueue', `gfilenotify' and `w32notify' return a unique descriptor

reply via email to

[Prev in Thread] Current Thread [Next in Thread]