]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix an error in tramp-sh-inotifywait-process-filter
authorMichael Albinus <michael.albinus@gmx.de>
Wed, 31 Jul 2019 12:54:08 +0000 (14:54 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Wed, 31 Jul 2019 12:54:08 +0000 (14:54 +0200)
* lisp/net/tramp-sh.el (tramp-sh-inotifywait-process-filter):
Add default FILE to returned event, if inotifywait doesn't tell us.

lisp/net/tramp-sh.el

index 6a82fef4f70b81e8afadbb7247036d2be2de6389..3399b961b2abb981a3f73383af36d140128ee1b4 100644 (file)
@@ -3785,7 +3785,8 @@ file-notify events."
                 (intern-soft
                  (replace-regexp-in-string "_" "-" (downcase x))))
               (split-string (match-string 1 line) "," 'omit))
-             (match-string 3 line))))
+             (or (match-string 3 line)
+                 (file-name-nondirectory (process-get proc 'watch-name))))))
        ;; Usually, we would add an Emacs event now.  Unfortunately,
        ;; `unread-command-events' does not accept several events at
        ;; once.  Therefore, we apply the handler directly.