diff options
Diffstat (limited to 'lisp/net/tramp.el')
| -rw-r--r-- | lisp/net/tramp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 420a72d42ef..b35b36eac7d 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el @@ -870,7 +870,7 @@ Derived from `tramp-prefix-ipv6-format'.") ;; The following regexp is a bit sloppy. But it shall serve our ;; purposes. It covers also IPv4 mapped IPv6 addresses, like in ;; "::ffff:192.168.0.1". -(defconst tramp-ipv6-regexp "\\(?:\\(?:[a-zA-Z0-9]+\\)?:\\)+[a-zA-Z0-9.]+" +(defconst tramp-ipv6-regexp "\\(?:[a-zA-Z0-9]*:\\)+[a-zA-Z0-9.]+" "Regexp matching IPv6 addresses.") (defconst tramp-postfix-ipv6-format-alist @@ -2087,7 +2087,7 @@ Return the string with the replaced variables." (tramp-compat-funcall 'substitute-env-vars filename 'only-defined)) ;; We need an own implementation. (save-match-data - (let ((idx (string-match "$\\(\\w+\\)" filename))) + (let ((idx (string-match "\\$\\(\\w+\\)" filename))) ;; `$' is coded as `$$'. (when (and idx (or (zerop idx) (not (eq ?$ (aref filename (1- idx))))) |