summaryrefslogtreecommitdiff
path: root/lisp/filenotify.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/filenotify.el')
-rw-r--r--lisp/filenotify.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/filenotify.el b/lisp/filenotify.el
index b3490fd3ebb..e2c0af0d1b7 100644
--- a/lisp/filenotify.el
+++ b/lisp/filenotify.el
@@ -161,7 +161,7 @@ EVENT is the cadr of the event in `file-notify-handle-event'
((eq action 'attrib) 'attribute-changed)
((memq action '(create added)) 'created)
((memq action '(modify modified)) 'changed)
- ((memq action '(delete 'delete-self move-self removed)) 'deleted)
+ ((memq action '(delete delete-self move-self removed)) 'deleted)
;; Make the event pending.
((memq action '(moved-from renamed-from))
(setq file-notify--pending-event
@@ -359,9 +359,6 @@ DESCRIPTOR should be an object returned by `file-notify-add-watch'."
desc))
(file-notify-error nil))))))
-;; Temporary declarations.
-(defalias 'gfile-valid-p 'identity)
-
(defun file-notify-valid-p (descriptor)
"Check a watch specified by its DESCRIPTOR.
DESCRIPTOR should be an object returned by `file-notify-add-watch'."