diff options
| author | Michael Albinus | 2015-10-23 13:14:09 +0200 |
|---|---|---|
| committer | Michael Albinus | 2015-10-23 13:14:09 +0200 |
| commit | 71d6acff1cabbf983c8191d02f084faf3f56d788 (patch) | |
| tree | 10d7aab22f279cee48a9bb436bf56074a859be04 /lisp | |
| parent | 0f7334147d23ad2792523f59a968fb44c820fa35 (diff) | |
| download | emacs-71d6acff1cabbf983c8191d02f084faf3f56d788.tar.gz emacs-71d6acff1cabbf983c8191d02f084faf3f56d788.zip | |
Fix Bug#21669
* lisp/filenotify.el (file-notify-rm-watch): Improve check for
calling low-level functions.
* test/automated/file-notify-tests.el (file-notify--test-timeout):
Decrase to 6 seconds for remote directories.
(file-notify-test02-events): Expect different number of
`attribute-changed' events for the local and remote cases. Apply
short delays between the operations, in order to receive all
events in the remote case. Combine `attribute-change' tests.
(Bug#21669)
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/filenotify.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/filenotify.el b/lisp/filenotify.el index a07f99adcbf..b9f59dedfde 100644 --- a/lisp/filenotify.el +++ b/lisp/filenotify.el | |||
| @@ -333,7 +333,9 @@ DESCRIPTOR should be an object returned by `file-notify-add-watch'." | |||
| 333 | 333 | ||
| 334 | (when (stringp dir) | 334 | (when (stringp dir) |
| 335 | ;; Call low-level function. | 335 | ;; Call low-level function. |
| 336 | (when (null (cdr registered)) | 336 | (when (or (not file) |
| 337 | (and (= (length (cdr registered)) 1) | ||
| 338 | (assoc file (cdr registered)))) | ||
| 337 | (condition-case nil | 339 | (condition-case nil |
| 338 | (if handler | 340 | (if handler |
| 339 | ;; A file name handler could exist even if there is no local | 341 | ;; A file name handler could exist even if there is no local |