Mercurial > emacs
comparison lisp/dired.el @ 59996:aac0a33f5772
Change release version from 21.4 to 22.1 throughout.
Change development version from 21.3.50 to 22.0.50.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 09 Feb 2005 15:50:47 +0000 |
parents | aa04ceecde25 |
children | 031a5ac39eb7 3ebd9bdb4fe5 |
comparison
equal
deleted
inserted
replaced
59995:8f4938738427 | 59996:aac0a33f5772 |
---|---|
289 | 289 |
290 (defface dired-header | 290 (defface dired-header |
291 '((t (:inherit font-lock-type-face))) | 291 '((t (:inherit font-lock-type-face))) |
292 "Face used for directory headers." | 292 "Face used for directory headers." |
293 :group 'dired-faces | 293 :group 'dired-faces |
294 :version "21.4") | 294 :version "22.1") |
295 (defvar dired-header-face 'dired-header | 295 (defvar dired-header-face 'dired-header |
296 "Face name used for directory headers.") | 296 "Face name used for directory headers.") |
297 | 297 |
298 (defface dired-mark | 298 (defface dired-mark |
299 '((t (:inherit font-lock-constant-face))) | 299 '((t (:inherit font-lock-constant-face))) |
300 "Face used for dired marks." | 300 "Face used for dired marks." |
301 :group 'dired-faces | 301 :group 'dired-faces |
302 :version "21.4") | 302 :version "22.1") |
303 (defvar dired-mark-face 'dired-mark | 303 (defvar dired-mark-face 'dired-mark |
304 "Face name used for dired marks.") | 304 "Face name used for dired marks.") |
305 | 305 |
306 (defface dired-marked | 306 (defface dired-marked |
307 '((t (:inherit font-lock-warning-face))) | 307 '((t (:inherit font-lock-warning-face))) |
308 "Face used for marked files." | 308 "Face used for marked files." |
309 :group 'dired-faces | 309 :group 'dired-faces |
310 :version "21.4") | 310 :version "22.1") |
311 (defvar dired-marked-face 'dired-marked | 311 (defvar dired-marked-face 'dired-marked |
312 "Face name used for marked files.") | 312 "Face name used for marked files.") |
313 | 313 |
314 (defface dired-flagged | 314 (defface dired-flagged |
315 '((t (:inherit font-lock-warning-face))) | 315 '((t (:inherit font-lock-warning-face))) |
316 "Face used for flagged files." | 316 "Face used for flagged files." |
317 :group 'dired-faces | 317 :group 'dired-faces |
318 :version "21.4") | 318 :version "22.1") |
319 (defvar dired-flagged-face 'dired-flagged | 319 (defvar dired-flagged-face 'dired-flagged |
320 "Face name used for flagged files.") | 320 "Face name used for flagged files.") |
321 | 321 |
322 (defface dired-warning | 322 (defface dired-warning |
323 '((t (:inherit font-lock-comment-face))) | 323 '((t (:inherit font-lock-comment-face))) |
324 "Face used to highlight a part of a buffer that needs user attention." | 324 "Face used to highlight a part of a buffer that needs user attention." |
325 :group 'dired-faces | 325 :group 'dired-faces |
326 :version "21.4") | 326 :version "22.1") |
327 (defvar dired-warning-face 'dired-warning | 327 (defvar dired-warning-face 'dired-warning |
328 "Face name used for a part of a buffer that needs user attention.") | 328 "Face name used for a part of a buffer that needs user attention.") |
329 | 329 |
330 (defface dired-directory | 330 (defface dired-directory |
331 '((t (:inherit font-lock-function-name-face))) | 331 '((t (:inherit font-lock-function-name-face))) |
332 "Face used for subdirectories." | 332 "Face used for subdirectories." |
333 :group 'dired-faces | 333 :group 'dired-faces |
334 :version "21.4") | 334 :version "22.1") |
335 (defvar dired-directory-face 'dired-directory | 335 (defvar dired-directory-face 'dired-directory |
336 "Face name used for subdirectories.") | 336 "Face name used for subdirectories.") |
337 | 337 |
338 (defface dired-symlink | 338 (defface dired-symlink |
339 '((t (:inherit font-lock-keyword-face))) | 339 '((t (:inherit font-lock-keyword-face))) |
340 "Face used for symbolic links." | 340 "Face used for symbolic links." |
341 :group 'dired-faces | 341 :group 'dired-faces |
342 :version "21.4") | 342 :version "22.1") |
343 (defvar dired-symlink-face 'dired-symlink | 343 (defvar dired-symlink-face 'dired-symlink |
344 "Face name used for symbolic links.") | 344 "Face name used for symbolic links.") |
345 | 345 |
346 (defface dired-ignored | 346 (defface dired-ignored |
347 '((t (:inherit font-lock-string-face))) | 347 '((t (:inherit font-lock-string-face))) |
348 "Face used for files suffixed with `completion-ignored-extensions'." | 348 "Face used for files suffixed with `completion-ignored-extensions'." |
349 :group 'dired-faces | 349 :group 'dired-faces |
350 :version "21.4") | 350 :version "22.1") |
351 (defvar dired-ignored-face 'dired-ignored | 351 (defvar dired-ignored-face 'dired-ignored |
352 "Face name used for files suffixed with `completion-ignored-extensions'.") | 352 "Face name used for files suffixed with `completion-ignored-extensions'.") |
353 | 353 |
354 (defvar dired-font-lock-keywords | 354 (defvar dired-font-lock-keywords |
355 (list | 355 (list |