[patch] Emacs 20.7: Allow the -h flag in dired-listing-switches

[David Fox]

--- emacs/20.7/lisp/dired.el~   Mon Nov 29 07:04:12 1999
+++ emacs/20.7/lisp/dired.el    Wed Jan 24 11:22:14 2001
@@ -1382,7 +1382,10 @@
         ;; The ".*" below finds the last match if there are multiple matches.
         ;; 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]" s "\\(" western "\\|" japanese "\\)" s))
+
+    ;; The "kM" is needed when the -h switch is given to ls, which prints
+    ;; the file sizes in human readable units such as kilo- or mega-bytes.
+    (concat ".*[0-9kM]" s "\\(" western "\\|" japanese "\\)" 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.")