--- lisp/dired.el
+++ lisp/dired.el	Wed Jul 23 17:39:02 2003
@@ -1514,6 +1514,9 @@
 	 (month (concat l l "+[.]?,? *"))
 	 ;; Recognize any non-ASCII character.
 	 ;; The purpose is to match a Kanji character.
+;;old    (ksc "[^\0-\128]+")
+	 (ksc (concat "\\(³â\\|¿ù\\|ÀÏ\\)"))
+
 	 (k "[^\0-\177]")
 	 ;; (k "[^\x00-\x7f\x80-\xff]")
 	 (s " ")
@@ -1537,7 +1540,8 @@
 			     "\\)"))
 	 (japanese
 	  (concat mm k "?" s dd k "?" s "+"
-		  "\\(" HH:MM "\\|" yyyy k "?" "\\)")))
+		  "\\(" HH:MM "\\|" yyyy k "?" "\\)"))
+	  (korean (concat mm ksc "?" s dd s "\\(" HH:MM "\\|" s yyyy "\\)")))
 	 ;; The "[0-9]" below requires 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
@@ -1546,7 +1550,7 @@
 	 ;; This avoids recognizing `jservice  10  1024' as a date in the line:
 	 ;; drwxr-xr-x  3 jservice  10  1024 Jul  2  1997 esg-host
     (concat ".*[0-9][kKMGTPEZY]?" 
-	    s "\\(" western "\\|" japanese "\\|" iso "\\)" s))
+	    s "\\(" western "\\|" korean "\\|" japanese "\\|" iso "\\)" s))
   "Regular expression to match up to the file name in a directory listing.
 The default value is designed to recognize dates and times
 regardless of the language.")