diff options
| -rw-r--r-- | lisp/net/tramp-gvfs.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el index ad7b1ff054c..859f4870b80 100644 --- a/lisp/net/tramp-gvfs.el +++ b/lisp/net/tramp-gvfs.el | |||
| @@ -2183,11 +2183,12 @@ connection if a previous connection has died for some reason." | |||
| 2183 | ;; Sanity check. | 2183 | ;; Sanity check. |
| 2184 | (let ((method (tramp-file-name-method vec))) | 2184 | (let ((method (tramp-file-name-method vec))) |
| 2185 | (unless (member | 2185 | (unless (member |
| 2186 | (or (rassoc method '(("smb" . "smb-share") | 2186 | (or (assoc-default |
| 2187 | ("davs" . "dav") | 2187 | method '(("smb" . "smb-share") |
| 2188 | ("nextcloud" . "dav") | 2188 | ("davs" . "dav") |
| 2189 | ("afp". "afp-volume") | 2189 | ("nextcloud" . "dav") |
| 2190 | ("gdrive" . "google-drive"))) | 2190 | ("afp". "afp-volume") |
| 2191 | ("gdrive" . "google-drive"))) | ||
| 2191 | method) | 2192 | method) |
| 2192 | tramp-gvfs-mounttypes) | 2193 | tramp-gvfs-mounttypes) |
| 2193 | (tramp-error vec 'file-error "Method `%s' not supported by GVFS" method))) | 2194 | (tramp-error vec 'file-error "Method `%s' not supported by GVFS" method))) |