Commit 08840f2f authored by Michael Albinus's avatar Michael Albinus Committed by Philipp Stephani

Handle quoted file names in filenotify.el

* lisp/filenotify.el (file-notify-add-watch): Do not save
quoted file names in `file-notify-descriptors'.

* test/lisp/files-tests.el
(files-file-name-non-special-notify-handlers): Do not expect
to fail.
parent e0870c38
Pipeline #429 failed with stage
in 26 minutes and 48 seconds
......@@ -307,7 +307,10 @@ FILE is the name of the file whose event is being reported."
(unless (functionp callback)
(signal 'wrong-type-argument `(,callback)))
(let* ((handler (find-file-name-handler file 'file-notify-add-watch))
(let* ((quoted (file-name-quoted-p file))
(file (file-name-unquote file))
(file-name-handler-alist (if quoted nil file-name-handler-alist))
(handler (find-file-name-handler file 'file-notify-add-watch))
(dir (directory-file-name
(if (file-directory-p file)
file
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment