# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 871406484 0
# Node ID 2e448d41aa553184d3268a4ec26d4f7ecad48b79
# Parent  9ea3c87ea61d5d1df5d1b6467f058fbaf57cd0f0
(dired-font-lock-keywords): Don't specially highlight
files that are writable by others.

diff -r 9ea3c87ea61d -r 2e448d41aa55 lisp/dired.el
--- 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