aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/filenotify.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/filenotify.el b/lisp/filenotify.el
index f8a53631135..61b6d240e6e 100644
--- a/lisp/filenotify.el
+++ b/lisp/filenotify.el
@@ -197,8 +197,10 @@ EVENT is the cadr of the event in `file-notify-handle-event'
197 '(attribute-changed changed created deleted renamed)) 197 '(attribute-changed changed created deleted renamed))
198 action) 198 action)
199 ((memq action '(moved rename)) 199 ((memq action '(moved rename))
200 (setq file1 (file-notify--event-file1-name event)) 200 ;; The kqueue rename event does not return file1 in
201 'renamed) 201 ;; case a file monitor is established.
202 (if (setq file1 (file-notify--event-file1-name event))
203 'renamed 'deleted))
202 ((eq action 'ignored) 204 ((eq action 'ignored)
203 (setq stopped t actions nil)) 205 (setq stopped t actions nil))
204 ((memq action '(attrib link)) 'attribute-changed) 206 ((memq action '(attrib link)) 'attribute-changed)