dired-font-lock-keywords efficiency fix.

diff --git a/lisp/dired.el b/lisp/dired.el
index 60a443b84273d9bc3c7284f3242b76ebec585804..c7ca5e8f7173acc207322c9ae7435d646935d56f 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -117,11 +117,11 @@ The target is used in the prompt for file copy, rename etc.")
 
 (defvar dired-font-lock-keywords
   '(;; Put directory headers in italics.
-    ("^  \\(/.+\\)$" 1 font-lock-type-face)
+    ("^  \\(/.+\\)" 1 font-lock-type-face)
     ;; Put symlinks in bold italics.
     ("\\([^ ]+\\) -> [^ ]+$" . font-lock-function-name-face)
     ;; Put marks in bold.
-    ("^\\([^ ]\\).*$" 1 font-lock-keyword-face t)
+    ("^[^ ]" . font-lock-reference-face)
     ;; Put files that are subdirectories in bold.
     ("^..d.* \\([^ ]+\\)$" 1 font-lock-keyword-face))
   "Additional expressions to highlight in Dired mode.")