]> code.delx.au - gnu-emacs/blobdiff - src/gfilenotify.c
Merge branch 'scratch/follow' of /home/acm/emacs/emacs.git/emacs-25 into scratch...
[gnu-emacs] / src / gfilenotify.c
index 2057f8853006d7c823daf967884bbc424338ac43..8660f415e2f0990aa669ce248ce5d541a2ec8237 100644 (file)
@@ -110,6 +110,7 @@ dir_monitor_callback (GFileMonitor *monitor,
 
       /* Cancel monitor if file or directory is deleted.  */
       if (!NILP (Fmember (symbol, list2 (Qdeleted, Qmoved))) &&
+         (strcmp (name, SSDATA (XCAR (XCDR (watch_object)))) == 0) &&
          !g_file_monitor_is_cancelled (monitor))
        g_file_monitor_cancel (monitor);
     }