[Emacs-diffs] Changes to emacs/lisp/dired.el

[Kim F . Storm]

Index: emacs/lisp/dired.el
diff -c emacs/lisp/dired.el:1.301 emacs/lisp/dired.el:1.302
*** emacs/lisp/dired.el:1.301   Sat Jan 29 17:28:48 2005
--- emacs/lisp/dired.el Wed Feb  9 15:50:43 2005
***************
*** 291,297 ****
    '((t (:inherit font-lock-type-face)))
    "Face used for directory headers."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-header-face 'dired-header
    "Face name used for directory headers.")
  
--- 291,297 ----
    '((t (:inherit font-lock-type-face)))
    "Face used for directory headers."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-header-face 'dired-header
    "Face name used for directory headers.")
  
***************
*** 299,305 ****
    '((t (:inherit font-lock-constant-face)))
    "Face used for dired marks."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-mark-face 'dired-mark
    "Face name used for dired marks.")
  
--- 299,305 ----
    '((t (:inherit font-lock-constant-face)))
    "Face used for dired marks."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-mark-face 'dired-mark
    "Face name used for dired marks.")
  
***************
*** 307,313 ****
    '((t (:inherit font-lock-warning-face)))
    "Face used for marked files."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-marked-face 'dired-marked
    "Face name used for marked files.")
  
--- 307,313 ----
    '((t (:inherit font-lock-warning-face)))
    "Face used for marked files."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-marked-face 'dired-marked
    "Face name used for marked files.")
  
***************
*** 315,321 ****
    '((t (:inherit font-lock-warning-face)))
    "Face used for flagged files."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-flagged-face 'dired-flagged
    "Face name used for flagged files.")
  
--- 315,321 ----
    '((t (:inherit font-lock-warning-face)))
    "Face used for flagged files."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-flagged-face 'dired-flagged
    "Face name used for flagged files.")
  
***************
*** 323,329 ****
    '((t (:inherit font-lock-comment-face)))
    "Face used to highlight a part of a buffer that needs user attention."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-warning-face 'dired-warning
    "Face name used for a part of a buffer that needs user attention.")
  
--- 323,329 ----
    '((t (:inherit font-lock-comment-face)))
    "Face used to highlight a part of a buffer that needs user attention."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-warning-face 'dired-warning
    "Face name used for a part of a buffer that needs user attention.")
  
***************
*** 331,337 ****
    '((t (:inherit font-lock-function-name-face)))
    "Face used for subdirectories."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-directory-face 'dired-directory
    "Face name used for subdirectories.")
  
--- 331,337 ----
    '((t (:inherit font-lock-function-name-face)))
    "Face used for subdirectories."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-directory-face 'dired-directory
    "Face name used for subdirectories.")
  
***************
*** 339,345 ****
    '((t (:inherit font-lock-keyword-face)))
    "Face used for symbolic links."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-symlink-face 'dired-symlink
    "Face name used for symbolic links.")
  
--- 339,345 ----
    '((t (:inherit font-lock-keyword-face)))
    "Face used for symbolic links."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-symlink-face 'dired-symlink
    "Face name used for symbolic links.")
  
***************
*** 347,353 ****
    '((t (:inherit font-lock-string-face)))
    "Face used for files suffixed with `completion-ignored-extensions'."
    :group 'dired-faces
!   :version "21.4")
  (defvar dired-ignored-face 'dired-ignored
    "Face name used for files suffixed with `completion-ignored-extensions'.")
  
--- 347,353 ----
    '((t (:inherit font-lock-string-face)))
    "Face used for files suffixed with `completion-ignored-extensions'."
    :group 'dired-faces
!   :version "22.1")
  (defvar dired-ignored-face 'dired-ignored
    "Face name used for files suffixed with `completion-ignored-extensions'.")