mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 06:20:43 -08:00
Code Issues Projects Releases Wiki Activity

(dired-move-to-filename-regexp): Support "K" suffix on "ls -alh" output.

Browse source
This commit is contained in:
Juanma Barranquero 2003-02-06 08:20:12 +00:00
parent 4092b702c6
commit 0952583ca8
2 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2003-02-06 Matthew Swift <swift@alum.mit.edu>
* dired.el (dired-move-to-filename-regexp): Support "K" suffix on
"ls -alh" output.
2003-02-05 Juanma Barranquero <lektu@terra.es> 2003-02-05 Juanma Barranquero <lektu@terra.es>
* font-lock.el (font-lock-reference-face): Add obsolescence * font-lock.el (font-lock-reference-face): Add obsolescence

4
lisp/dired.el
View file

@ -1572,11 +1572,11 @@ DIR must be a directory name, not a file name."
;; The "[0-9]" below requires the previous column to end in a digit. ;; 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: ;; This avoids recognizing `1 may 1997' as a date in the line:
;; -r--r--r-- 1 may 1997 1168 Oct 19 16:49 README ;; -r--r--r-- 1 may 1997 1168 Oct 19 16:49 README
;; The "[kMGTPEZY]?" below supports "ls -alh" output. ;; The "[kKMGTPEZY]?" below supports "ls -alh" output.
;; The ".*" below finds the last match if there are multiple matches. ;; The ".*" below finds the last match if there are multiple matches.
;; This avoids recognizing `jservice 10 1024' as a date in the line: ;; This avoids recognizing `jservice 10 1024' as a date in the line:
;; drwxr-xr-x 3 jservice 10 1024 Jul 2 1997 esg-host ;; drwxr-xr-x 3 jservice 10 1024 Jul 2 1997 esg-host
(concat ".*[0-9][kMGTPEZY]?" s (concat ".*[0-9][kKMGTPEZY]?" s
"\\(" western "\\|" western-comma "\\|" japanese "\\|" iso "\\)" "\\(" western "\\|" western-comma "\\|" japanese "\\|" iso "\\)"
s "+")) s "+"))
"Regular expression to match up to the file name in a directory listing. "Regular expression to match up to the file name in a directory listing.