aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSimon Marshall1995-04-24 11:28:24 +0000
committerSimon Marshall1995-04-24 11:28:24 +0000
commit010a0c29ebf858b0340267eaa4f9ccb6261fbd88 (patch)
treea194a88f2063e5d95ea8cf3a4b13e9bfc946b839
parentb9e5d99e8b17b68e0c5cf2461695433897c4baa9 (diff)
downloademacs-010a0c29ebf858b0340267eaa4f9ccb6261fbd88.tar.gz
emacs-010a0c29ebf858b0340267eaa4f9ccb6261fbd88.zip
dired-font-lock-keywords efficiency fix.
-rw-r--r--lisp/dired.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/dired.el b/lisp/dired.el
index 60a443b8427..c7ca5e8f717 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -117,11 +117,11 @@ The target is used in the prompt for file copy, rename etc.")
117 117
118(defvar dired-font-lock-keywords 118(defvar dired-font-lock-keywords
119 '(;; Put directory headers in italics. 119 '(;; Put directory headers in italics.
120 ("^ \\(/.+\\)$" 1 font-lock-type-face) 120 ("^ \\(/.+\\)" 1 font-lock-type-face)
121 ;; Put symlinks in bold italics. 121 ;; Put symlinks in bold italics.
122 ("\\([^ ]+\\) -> [^ ]+$" . font-lock-function-name-face) 122 ("\\([^ ]+\\) -> [^ ]+$" . font-lock-function-name-face)
123 ;; Put marks in bold. 123 ;; Put marks in bold.
124 ("^\\([^ ]\\).*$" 1 font-lock-keyword-face t) 124 ("^[^ ]" . font-lock-reference-face)
125 ;; Put files that are subdirectories in bold. 125 ;; Put files that are subdirectories in bold.
126 ("^..d.* \\([^ ]+\\)$" 1 font-lock-keyword-face)) 126 ("^..d.* \\([^ ]+\\)$" 1 font-lock-keyword-face))
127 "Additional expressions to highlight in Dired mode.") 127 "Additional expressions to highlight in Dired mode.")