diff options
Diffstat (limited to 'lisp/filenotify.el')
-rw-r--r-- | lisp/filenotify.el | 5 |
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'." |