Mercurial > emacs
changeset 19320:2e448d41aa55
(dired-font-lock-keywords): Don't specially highlight
files that are writable by others.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 12 Aug 1997 17:21:24 +0000 |
| parents | 9ea3c87ea61d |
| children | 995bfd9752d5 |
| files | lisp/dired.el |
| diffstat | 1 files changed, 10 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dired.el Tue Aug 12 16:11:31 1997 +0000 +++ b/lisp/dired.el Tue Aug 12 17:21:24 1997 +0000 @@ -261,12 +261,16 @@ (list dired-re-mark '(0 font-lock-reference-face) '(".+" (dired-move-to-filename) nil (0 font-lock-warning-face))) - ;; - ;; Files that are group or world writable. - (list (concat dired-re-maybe-mark dired-re-inode-size - "\\([-d]\\(....w....\\|.......w.\\)\\)") - '(1 font-lock-comment-face) - '(".+" (dired-move-to-filename) nil (0 font-lock-comment-face))) + ;; People who are paranoid about security would consider this more + ;; important than other things such as whether it is a directory. + ;; But we don't want to encourage paranoia, so our default + ;; should be what's most useful for non-paranoids. -- rms. +;;; ;; +;;; ;; Files that are group or world writable. +;;; (list (concat dired-re-maybe-mark dired-re-inode-size +;;; "\\([-d]\\(....w....\\|.......w.\\)\\)") +;;; '(1 font-lock-comment-face) +;;; '(".+" (dired-move-to-filename) nil (0 font-lock-comment-face))) ;; ;; Subdirectories. (list dired-re-dir