[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))