diff options
| -rw-r--r-- | lisp/net/tramp-gvfs.el | 3 | ||||
| -rw-r--r-- | lisp/net/tramp.el | 33 |
2 files changed, 17 insertions, 19 deletions
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el index e214d610c91..48467a92c14 100644 --- a/lisp/net/tramp-gvfs.el +++ b/lisp/net/tramp-gvfs.el | |||
| @@ -114,6 +114,7 @@ | |||
| 114 | (declare-function zeroconf-service-host "zeroconf") | 114 | (declare-function zeroconf-service-host "zeroconf") |
| 115 | (declare-function zeroconf-service-port "zeroconf") | 115 | (declare-function zeroconf-service-port "zeroconf") |
| 116 | (declare-function zeroconf-service-txt "zeroconf") | 116 | (declare-function zeroconf-service-txt "zeroconf") |
| 117 | (defvar tramp-gvfs-dbus-event-vector) | ||
| 117 | 118 | ||
| 118 | ;; We don't call `dbus-ping', because this would load dbus.el. | 119 | ;; We don't call `dbus-ping', because this would load dbus.el. |
| 119 | (defconst tramp-gvfs-enabled | 120 | (defconst tramp-gvfs-enabled |
| @@ -882,8 +883,6 @@ Operations not mentioned here will be handled by the default Emacs primitives.") | |||
| 882 | (let ((method (tramp-file-name-method vec))) | 883 | (let ((method (tramp-file-name-method vec))) |
| 883 | (and (stringp method) (member method tramp-gvfs-methods))))) | 884 | (and (stringp method) (member method tramp-gvfs-methods))))) |
| 884 | 885 | ||
| 885 | (defvar tramp-gvfs-dbus-event-vector) | ||
| 886 | |||
| 887 | ;;;###tramp-autoload | 886 | ;;;###tramp-autoload |
| 888 | (defun tramp-gvfs-file-name-handler (operation &rest args) | 887 | (defun tramp-gvfs-file-name-handler (operation &rest args) |
| 889 | "Invoke the GVFS related OPERATION and ARGS. | 888 | "Invoke the GVFS related OPERATION and ARGS. |
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 12fc25b5ba9..e7928e4e1f4 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -64,6 +64,22 @@ | |||
| 64 | (declare-function netrc-parse "netrc") | 64 | (declare-function netrc-parse "netrc") |
| 65 | (defvar auto-save-file-name-transforms) | 65 | (defvar auto-save-file-name-transforms) |
| 66 | (defvar ls-lisp-use-insert-directory-program) | 66 | (defvar ls-lisp-use-insert-directory-program) |
| 67 | (defvar tramp-prefix-format) | ||
| 68 | (defvar tramp-prefix-regexp) | ||
| 69 | (defvar tramp-method-regexp) | ||
| 70 | (defvar tramp-postfix-method-format) | ||
| 71 | (defvar tramp-postfix-method-regexp) | ||
| 72 | (defvar tramp-prefix-ipv6-format) | ||
| 73 | (defvar tramp-prefix-ipv6-regexp) | ||
| 74 | (defvar tramp-postfix-ipv6-format) | ||
| 75 | (defvar tramp-postfix-ipv6-regexp) | ||
| 76 | (defvar tramp-postfix-host-format) | ||
| 77 | (defvar tramp-postfix-host-regexp) | ||
| 78 | (defvar tramp-remote-file-name-spec-regexp) | ||
| 79 | (defvar tramp-file-name-structure) | ||
| 80 | (defvar tramp-file-name-regexp) | ||
| 81 | (defvar tramp-completion-method-regexp) | ||
| 82 | (defvar tramp-completion-file-name-regexp) | ||
| 67 | 83 | ||
| 68 | ;; Reload `tramp-compat' when we reload `tramp-autoloads' of the GNU | 84 | ;; Reload `tramp-compat' when we reload `tramp-autoloads' of the GNU |
| 69 | ;; ELPA package. | 85 | ;; ELPA package. |
| @@ -820,23 +836,6 @@ Customize. See also `tramp-change-syntax'." | |||
| 820 | :initialize #'custom-initialize-default | 836 | :initialize #'custom-initialize-default |
| 821 | :set #'tramp-set-syntax) | 837 | :set #'tramp-set-syntax) |
| 822 | 838 | ||
| 823 | (defvar tramp-prefix-format) | ||
| 824 | (defvar tramp-prefix-regexp) | ||
| 825 | (defvar tramp-method-regexp) | ||
| 826 | (defvar tramp-postfix-method-format) | ||
| 827 | (defvar tramp-postfix-method-regexp) | ||
| 828 | (defvar tramp-prefix-ipv6-format) | ||
| 829 | (defvar tramp-prefix-ipv6-regexp) | ||
| 830 | (defvar tramp-postfix-ipv6-format) | ||
| 831 | (defvar tramp-postfix-ipv6-regexp) | ||
| 832 | (defvar tramp-postfix-host-format) | ||
| 833 | (defvar tramp-postfix-host-regexp) | ||
| 834 | (defvar tramp-remote-file-name-spec-regexp) | ||
| 835 | (defvar tramp-file-name-structure) | ||
| 836 | (defvar tramp-file-name-regexp) | ||
| 837 | (defvar tramp-completion-method-regexp) | ||
| 838 | (defvar tramp-completion-file-name-regexp) | ||
| 839 | |||
| 840 | (defun tramp-set-syntax (symbol value) | 839 | (defun tramp-set-syntax (symbol value) |
| 841 | "Set SYMBOL to value VALUE. | 840 | "Set SYMBOL to value VALUE. |
| 842 | Used in user option `tramp-syntax'. There are further variables | 841 | Used in user option `tramp-syntax'. There are further variables |