Mercurial > emacs
changeset 20692:8af33d2de7b2
(ange-ftp-date-regexp): Make l pattern match any non-ASCII char.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 21 Jan 1998 01:41:23 +0000 |
| parents | cf1919e207ef |
| children | b48b8060e70d |
| files | lisp/ange-ftp.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ange-ftp.el Wed Jan 21 00:37:15 1998 +0000 +++ b/lisp/ange-ftp.el Wed Jan 21 01:41:23 1998 +0000 @@ -2517,13 +2517,13 @@ ;;;; ------------------------------------------------------------ (defconst ange-ftp-date-regexp - (let* ((l "[A-Za-z\xa0-\xff]") + (let* ((l "\\([A-Za-z]\\|[^\0-\177]\\)") ;; In some locales, month abbreviations are as short as 2 letters, ;; and they can be padded on the right with spaces. (month (concat l l "+ *")) - ;; Recognize any non-ISO-8859 character. + ;; Recognize any non-ASCII character. ;; The purpose is to match a Kanji character. - (k "[^\x00-\xff]") + (k "[^\0-\177]") (s " ") (mm "[ 0-1][0-9]") (dd "[ 0-3][0-9]")