Mercurial > hg > xemacs-beta

comparison lisp/efs/dired-faces.el @ 40:7e54bd776075 r19-15b103

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b103
author cvs
date Mon, 13 Aug 2007 08:54:25 +0200
parents 4103f0995bd7
children 8b8b7f3559a2
comparison
equal deleted inserted replaced
39:06f275776fba 40:7e54bd776075
1 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 1 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2 ;; 2 ;;
3 ;; File: dired-faces.el 3 ;; File: dired-faces.el
4 ;; Dired Version: $Revision: 1.1 $ 4 ;; Dired Version: $Revision: 1.2 $
5 ;; RCS: 5 ;; RCS:
6 ;; Description: rudimentary face customization support for dired 6 ;; Description: rudimentary face customization support for dired
7 ;; Author: Mike Sperber <sperber@informatik.uni-tuebingen.de> 7 ;; Author: Mike Sperber <sperber@informatik.uni-tuebingen.de>
8 ;; 8 ;;
9 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 9 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
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-deleted '((((class color))
72 (:foreground "yellow3"))
73 (t (:reverse t)))
74 "Face used to indicate deleted files."
75 :group 'dired)
76
77 (defface dired-face-socket '((((class color)) 71 (defface dired-face-socket '((((class color))
78 (:foreground "magenta")) 72 (:foreground "magenta"))
79 (t (:bold nil))) 73 (t (:bold nil)))
80 "Face used to indicate sockets." 74 "Face used to indicate sockets."
81 :group 'dired) 75 :group 'dired)