diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2017-03-28 13:38:49 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2017-03-28 13:38:49 +0200 |
| commit | 969fad4068e44ae2de7632dd656c8013bb60c566 (patch) | |
| tree | 10de82be18a80bcdf99369d9da136e906d8aa55e /src/inotify.c | |
| parent | a62437d4b933825a92ac3836836edbca3540fa1c (diff) | |
| download | emacs-969fad4068e44ae2de7632dd656c8013bb60c566.tar.gz | |
* src/inotify.c (Finotify_add_watch): aspect can also be a symbol.
Diffstat (limited to 'src/inotify.c')
| -rw-r--r-- | src/inotify.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/inotify.c b/src/inotify.c index cb24e827626..004689bd4b5 100644 --- a/src/inotify.c +++ b/src/inotify.c @@ -396,7 +396,9 @@ IN_ONLYDIR */) (Lisp_Object filename, Lisp_Object aspect, Lisp_Object callback) { Lisp_Object encoded_file_name; - bool dont_follow = ! NILP (Fmemq (Qdont_follow, aspect)); + bool dont_follow = (CONSP (aspect) + ? ! NILP (Fmemq (Qdont_follow, aspect)) + : EQ (Qdont_follow, aspect)); int wd = -1; uint32_t mask = (INOTIFY_DEFAULT_MASK | (dont_follow ? IN_DONT_FOLLOW : 0)); |