[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-26 08840f2: Handle quoted file names in filenotify.e
From: |
Philipp Stephani |
Subject: |
[Emacs-diffs] emacs-26 08840f2: Handle quoted file names in filenotify.el |
Date: |
Wed, 2 Jan 2019 08:03:08 -0500 (EST) |
branch: emacs-26
commit 08840f2f7bfc6144bd163dd85efe87d28541e425
Author: Michael Albinus <address@hidden>
Commit: Philipp Stephani <address@hidden>
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.
---
lisp/filenotify.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/filenotify.el b/lisp/filenotify.el
index 08a6f6e..101ddb6 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."
(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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-26 08840f2: Handle quoted file names in filenotify.el,
Philipp Stephani <=