diff options
| author | Karl Heuer | 1996-01-10 00:16:02 +0000 |
|---|---|---|
| committer | Karl Heuer | 1996-01-10 00:16:02 +0000 |
| commit | bc31a60a7cc2a896561add7adc42ec7478c7d3ad (patch) | |
| tree | 5a180e7aec2a0dbea7bbdb71a81175c2b4db3fca | |
| parent | fc4e55fc39708588b6283f55fecbadb0d71c5919 (diff) | |
| download | emacs-bc31a60a7cc2a896561add7adc42ec7478c7d3ad.tar.gz emacs-bc31a60a7cc2a896561add7adc42ec7478c7d3ad.zip | |
(ange-ftp-name-format): Don't match "/:" or "/.:".
| -rw-r--r-- | lisp/ange-ftp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index 2b79cf5757a..b4ea56267d2 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el | |||
| @@ -625,7 +625,7 @@ | |||
| 625 | ;;;; ------------------------------------------------------------ | 625 | ;;;; ------------------------------------------------------------ |
| 626 | 626 | ||
| 627 | (defvar ange-ftp-name-format | 627 | (defvar ange-ftp-name-format |
| 628 | '("^/\\(\\([^@/:]*\\)@\\)?\\([^@/:]*\\):\\(.*\\)" . (3 2 4)) | 628 | '("^/\\(\\([^@/:]*\\)@\\)?\\([^@/:]*[^@/:.]\\):\\(.*\\)" . (3 2 4)) |
| 629 | "*Format of a fully expanded remote file name. | 629 | "*Format of a fully expanded remote file name. |
| 630 | This is a list of the form \(REGEXP HOST USER NAME\), | 630 | This is a list of the form \(REGEXP HOST USER NAME\), |
| 631 | where REGEXP is a regular expression matching | 631 | where REGEXP is a regular expression matching |