diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2005-10-20 20:08:19 +0000 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2005-10-20 20:08:19 +0000 |
| commit | 6e967b19b675b62f12d1061f8aa0ef3032dfb6fa (patch) | |
| tree | c31bd241e44eef1b25347892bc08e532a0932f21 /lisp/net | |
| parent | 9d37a5c0f54bfadc33017697b2579aa0554d0b23 (diff) | |
| download | emacs-6e967b19b675b62f12d1061f8aa0ef3032dfb6fa.tar.gz | |
* net/ange-ftp.el (ange-ftp-date-regexp): Handle also the case no
group id is given.
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/ange-ftp.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el index bf3b1427ac2..f50ca07a488 100644 --- a/lisp/net/ange-ftp.el +++ b/lisp/net/ange-ftp.el @@ -2686,7 +2686,12 @@ away in the internal cache." ;; Require the previous column to end in a digit. ;; This avoids recognizing `1 may 1997' as a date in the line: ;; -r--r--r-- 1 may 1997 1168 Oct 19 16:49 README - (concat "[0-9]" s "\\(" western "\\|" japanese "\\)" s)) + ;; albinus: + ;; Require also the following column to start in a digit. + ;; This avoids recognizing `kfs 10' as a date in the line: + ;; -rw------- 1 kfs 10 May 27 2003 .autorun.lck +;; (concat "[0-9]" s "\\(" western "\\|" japanese "\\)" s)) + (concat "[0-9]" s "\\(" western "\\|" japanese "\\)" s "+[0-9]")) "Regular expression to match up to the column before the file name in a directory listing. This regular expression is designed to recognize dates regardless of the language.") |