Mercurial > hg > xemacs-beta

comparison lisp/efs/dired-faces.el @ 48:56c54cf7c5b6 r19-16b90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-16b90
author cvs
date Mon, 13 Aug 2007 08:56:04 +0200
parents 8b8b7f3559a2
children
comparison
equal deleted inserted replaced
47:11c6df210d7f 48:56c54cf7c5b6
14 14
15 ;;; Variables 15 ;;; Variables
16 16
17 (defgroup dired nil 17 (defgroup dired nil
18 "Directory editing." 18 "Directory editing."
19 :group 'emacs) 19 :group 'environment)
20 20
21 (defcustom dired-do-highlighting t 21 (defcustom dired-do-highlighting t
22 "Set if we should use highlighting according to filetype." 22 "Set if we should use highlighting according to filetype."
23 :type 'boolean 23 :type 'boolean
24 :group 'dired) 24 :group 'dired)
55 (t (:bold t))) 55 (t (:bold t)))
56 "Face used for setuid executables." 56 "Face used for setuid executables."
57 :group 'dired) 57 :group 'dired)
58 58
59 (defface dired-face-boring '((((class color)) 59 (defface dired-face-boring '((((class color))
60 (:foreground "Grey")) 60 (:foreground "Gray65"))
61 (((class grayscale)) 61 (((class grayscale))
62 (:foreground "Grey"))) 62 (:foreground "Gray65")))
63 "Face used for unimportant files." 63 "Face used for unimportant files."
64 :group 'dired) 64 :group 'dired)
65 65
66 (defface dired-face-permissions '((t (:background "grey75") 66 (defface dired-face-permissions '((t (:background "grey75"
67 (:foreground "black"))) 67 :foreground "black")))
68 "Face used for interactive permissions." 68 "Face used for interactive permissions."
69 :group 'dired) 69 :group 'dired)
70 70
71 (defface dired-face-socket '((((class color)) 71 (defface dired-face-socket '((((class color))
72 (:foreground "magenta")) 72 (:foreground "magenta"))