martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Further fix of hostname completion on MS Windows

Browse Source 
* lisp/net/tramp.el (tramp-completion-file-name-regexp-simplified)
(tramp-completion-file-name-regexp-separate): Fix W32 hostname/method
completion for simplified and separate syntaxes (same as the previous change
to default syntax).

Copyright-paperwork-exempt: yes
This commit is contained in:
Jim Porter
2021-04-10 13:16:13 +02:00
committed by Michael Albinus
parent c50b5907e0
commit c975258abf
1 changed files with 15 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
lisp/net/tramp.el
View File

@@ -1103,7 +1103,13 @@ On W32 systems, the volume letter must be ignored.")
(defconst tramp-completion-file-name-regexp-simplified
(concat
"\\`/\\("
"\\`"
;; Allow the volume letter at the beginning of the path. See the
;; comment in `tramp-completion-file-name-regexp-default' for more
;; details.
(when (eq system-type 'windows-nt)
"\\(?:[[:alpha:]]:\\)?")
"/\\("
;; Optional multi hop.
"\\([^/|:]*|\\)*"
;; Last hop.
@@ -1119,7 +1125,14 @@ See `tramp-file-name-structure' for more explanations.
On W32 systems, the volume letter must be ignored.")
(defconst tramp-completion-file-name-regexp-separate
"\\`/\\(\\[[^]]*\\)?\\'"
(concat
"\\`"
;; Allow the volume letter at the beginning of the path. See the
;; comment in `tramp-completion-file-name-regexp-default' for more
;; details.
(when (eq system-type 'windows-nt)
"\\(?:[[:alpha:]]:\\)?")
"/\\(\\[[^]]*\\)?\\'")
"Value for `tramp-completion-file-name-regexp' for separate remoting.
See `tramp-file-name-structure' for more explanations.")