# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 885346883 0
# Node ID 8af33d2de7b20c52d85809bd203bcf2670ddf238
# Parent  cf1919e207ef623165d8956232f66bf85f1e75d2
(ange-ftp-date-regexp): Make l pattern match any non-ASCII char.

diff -r cf1919e207ef -r 8af33d2de7b2 lisp/ange-ftp.el
--- 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]")