32 lines
1.3 KiB
Diff
32 lines
1.3 KiB
Diff
--- 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.")
|