diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/filenotify.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/filenotify.el b/lisp/filenotify.el index 562ac266e44..442dc891571 100644 --- a/lisp/filenotify.el +++ b/lisp/filenotify.el | |||
| @@ -307,7 +307,10 @@ FILE is the name of the file whose event is being reported." | |||
| 307 | (unless (functionp callback) | 307 | (unless (functionp callback) |
| 308 | (signal 'wrong-type-argument `(,callback))) | 308 | (signal 'wrong-type-argument `(,callback))) |
| 309 | 309 | ||
| 310 | (let* ((handler (find-file-name-handler file 'file-notify-add-watch)) | 310 | (let* ((quoted (file-name-quoted-p file)) |
| 311 | (file (file-name-unquote file)) | ||
| 312 | (file-name-handler-alist (if quoted nil file-name-handler-alist)) | ||
| 313 | (handler (find-file-name-handler file 'file-notify-add-watch)) | ||
| 311 | (dir (directory-file-name | 314 | (dir (directory-file-name |
| 312 | (if (file-directory-p file) | 315 | (if (file-directory-p file) |
| 313 | file | 316 | file |