emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master 4320370 1/2: Minor filenotify.el fixes


From: Paul Eggert
Subject: [Emacs-diffs] master 4320370 1/2: Minor filenotify.el fixes
Date: Thu, 30 Mar 2017 20:48:26 -0400 (EDT)

branch: master
commit 43203708d41e54b860f9bd987f1af3c4ca38a46a
Author: Andreas Politz <address@hidden>
Commit: Paul Eggert <address@hidden>

    Minor filenotify.el fixes
    
    * lisp/filenotify.el: Require subr-x.
    (file-notify-callback): Use equal, not eq.
---
 lisp/filenotify.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/filenotify.el b/lisp/filenotify.el
index c3d7d72..dbf19cf 100644
--- a/lisp/filenotify.el
+++ b/lisp/filenotify.el
@@ -28,6 +28,7 @@
 ;;; Code:
 
 (require 'cl-lib)
+(require 'subr-x)
 
 (defconst file-notify--library
   (cond
@@ -155,9 +156,9 @@ EVENT is the cadr of the event in `file-notify-handle-event'
           ;; Send pending event, if it doesn't match.
           (when (and file-notify--pending-event
                      ;; The cookie doesn't match.
-                     (not (eq (file-notify--event-cookie
-                               (car file-notify--pending-event))
-                              (file-notify--event-cookie event)))
+                     (not (equal (file-notify--event-cookie
+                                  (car file-notify--pending-event))
+                                 (file-notify--event-cookie event)))
                      (or
                       ;; inotify.
                       (and (eq (nth 1 (car file-notify--pending-event))



reply via email to

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