aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2024-07-27 10:25:52 +0200
committerMichael Albinus2024-07-27 10:25:52 +0200
commit29d4ba56258be582e3f98f1ac1e2a8bb3fc6ae1e (patch)
treeae0217735f35c6a648eddaea7a1e1ca5c9a1a4f5
parentc1436ac64dc3b30af1ee3994ca346b9bb6984228 (diff)
downloademacs-29d4ba56258be582e3f98f1ac1e2a8bb3fc6ae1e.tar.gz
emacs-29d4ba56258be582e3f98f1ac1e2a8bb3fc6ae1e.zip
Improve Tramp startup time
* lisp/net/tramp-cmds.el (tramp-repository-branch) (tramp-repository-version): * lisp/net/tramp-message.el (tramp-repository-branch) (tramp-repository-version): Declare. * lisp/net/trampver.el (tramp-repository-branch) (tramp-repository-version): Remove ;;;###tramp-autoload cookie.
-rw-r--r--lisp/net/tramp-cmds.el2
-rw-r--r--lisp/net/tramp-message.el2
-rw-r--r--lisp/net/trampver.el2
3 files changed, 4 insertions, 2 deletions
diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el
index 09c48db0562..866532041c5 100644
--- a/lisp/net/tramp-cmds.el
+++ b/lisp/net/tramp-cmds.el
@@ -39,6 +39,8 @@
39(defvar mm-7bit-chars) 39(defvar mm-7bit-chars)
40(defvar reporter-eval-buffer) 40(defvar reporter-eval-buffer)
41(defvar reporter-prompt-for-summary-p) 41(defvar reporter-prompt-for-summary-p)
42(defvar tramp-repository-branch)
43(defvar tramp-repository-version)
42 44
43;;;###tramp-autoload 45;;;###tramp-autoload
44(defun tramp-change-syntax (&optional syntax) 46(defun tramp-change-syntax (&optional syntax)
diff --git a/lisp/net/tramp-message.el b/lisp/net/tramp-message.el
index df3e9c2a616..5e1c9904aa7 100644
--- a/lisp/net/tramp-message.el
+++ b/lisp/net/tramp-message.el
@@ -53,6 +53,8 @@
53(declare-function tramp-file-name-host-port "tramp") 53(declare-function tramp-file-name-host-port "tramp")
54(declare-function tramp-file-name-user-domain "tramp") 54(declare-function tramp-file-name-user-domain "tramp")
55(declare-function tramp-get-default-directory "tramp") 55(declare-function tramp-get-default-directory "tramp")
56(defvar tramp-repository-branch)
57(defvar tramp-repository-version)
56 58
57;;;###tramp-autoload 59;;;###tramp-autoload
58(defcustom tramp-verbose 3 60(defcustom tramp-verbose 3
diff --git a/lisp/net/trampver.el b/lisp/net/trampver.el
index 2ffea846ecb..894b05814af 100644
--- a/lisp/net/trampver.el
+++ b/lisp/net/trampver.el
@@ -47,7 +47,6 @@
47(defconst tramp-bug-report-address "tramp-devel@gnu.org" 47(defconst tramp-bug-report-address "tramp-devel@gnu.org"
48 "Email address to send bug reports to.") 48 "Email address to send bug reports to.")
49 49
50;;;###tramp-autoload
51(defconst tramp-repository-branch 50(defconst tramp-repository-branch
52 (ignore-errors 51 (ignore-errors
53 ;; Suppress message from `emacs-repository-get-branch'. We must 52 ;; Suppress message from `emacs-repository-get-branch'. We must
@@ -61,7 +60,6 @@
61 (emacs-repository-get-branch dir)))) 60 (emacs-repository-get-branch dir))))
62 "The repository branch of the Tramp sources.") 61 "The repository branch of the Tramp sources.")
63 62
64;;;###tramp-autoload
65(defconst tramp-repository-version 63(defconst tramp-repository-version
66 (ignore-errors 64 (ignore-errors
67 ;; Suppress message from `emacs-repository-get-version'. We must 65 ;; Suppress message from `emacs-repository-get-version'. We must