procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Handle quoted file names in filenotify.el

Browse source 
* 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.
This commit is contained in:
Michael Albinus 2018-01-26 11:57:41 +01:00 • committed by Philipp Stephani
parent e0870c3801
commit 08840f2f7b
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/filenotify.el
View file

@ -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