[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 08c81db7c8e: `file-remote-p' must not return an error
From: |
Michael Albinus |
Subject: |
master 08c81db7c8e: `file-remote-p' must not return an error |
Date: |
Thu, 8 Feb 2024 05:17:33 -0500 (EST) |
branch: master
commit 08c81db7c8e522278fb2c8de8fbe556d109c135f
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>
`file-remote-p' must not return an error
* lisp/net/tramp-gvfs.el (tramp-gvfs-file-name-handler):
`file-remote-p' must not return an error. (Bug#68976)
---
lisp/net/tramp-gvfs.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el
index 72589e7ce4a..4e949e7e60b 100644
--- a/lisp/net/tramp-gvfs.el
+++ b/lisp/net/tramp-gvfs.el
@@ -888,7 +888,8 @@ Operations not mentioned here will be handled by the
default Emacs primitives.")
"Invoke the GVFS related OPERATION and ARGS.
First arg specifies the OPERATION, second arg is a list of
arguments to pass to the OPERATION."
- (unless tramp-gvfs-enabled
+ ;; `file-remote-p' must not return an error. (Bug#68976)
+ (unless (or tramp-gvfs-enabled (eq operation 'file-remote-p))
(tramp-user-error nil "Package `tramp-gvfs' not supported"))
(if-let ((filename (apply #'tramp-file-name-for-operation operation args))
(tramp-gvfs-dbus-event-vector
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 08c81db7c8e: `file-remote-p' must not return an error,
Michael Albinus <=