procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; Fix bootstrap

Browse source 
* lisp/net/tramp.el (tramp-initial-file-name-regexp)
(tramp-autoload-file-name-regexp): Don't use `rx' in autoloaded
objects.  (Bug#74490)
This commit is contained in:
Michael Albinus 2024-11-23 18:33:26 +01:00
parent d4cb3b30f1
commit abcc8c717d
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/net/tramp.el
View file

@ -1208,7 +1208,10 @@ See also `tramp-file-name-regexp'.")
;;;###autoload
(defconst tramp-initial-file-name-regexp
(rx bos "/" (+ (not (any "/:"))) ":" (* (not (any "/:"))) ":")
;; We shouldn't use `rx' in autoloaded objects, because we don't
;; know whether it does exist already. (Bug#74490)
;; (rx bos "/" (+ (not (any "/:"))) ":" (* (not (any "/:"))) ":")
"\\`/[^/:]+:[^/:]*:"
"Value for `tramp-file-name-regexp' for autoload.
It must match the initial `tramp-syntax' settings.")
@ -1287,7 +1290,10 @@ Also see `tramp-file-name-structure'.")
;;;###autoload
(defconst tramp-autoload-file-name-regexp
;; The method is either "-", or at least two characters.
(rx bos "/" (| "-" (>= 2 (not (any "/:|")))) ":")
;; We shouldn't use `rx' in autoloaded objects, because we don't
;; know whether it does exist already. (Bug#74490)
;; (rx bos "/" (| "-" (>= 2 (not (any "/:|")))) ":")
"\\`/\\(?:-\\|[^/:|]\\{2,\\}\\):"
"Regular expression matching file names handled by Tramp autoload.
It must match the initial `tramp-syntax' settings. It should not
match file names at root of the underlying local file system,