emacs-diffs
[Top][All Lists]
Advanced

[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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]