mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-05 22:20:24 -08:00
Make ibuffer.el use dedicated faces
* lisp/ibuffer.el (ibuffer-marked, ibuffer-deletion) (ibuffer-title, ibuffer-filter-group-name): Define the faces. (ibuffer-marked-face, ibuffer-deletion-face, ibuffer-title-face) (ibuffer-filter-group-name-face): Make the new faces the default values. (Bug#79786)
This commit is contained in:
parent
f772fe526a
commit
ad4ca87ca4
1 changed files with 24 additions and 4 deletions
|
|
@ -349,20 +349,40 @@ directory, like `default-directory'."
|
|||
(make-obsolete-variable 'ibuffer-load-hook
|
||||
"use `with-eval-after-load' instead." "28.1")
|
||||
|
||||
(defcustom ibuffer-marked-face 'warning
|
||||
(defface ibuffer-marked '((t :inherit warning))
|
||||
"Face used by default in `ibuffer-marked-face'."
|
||||
:version "31.1")
|
||||
|
||||
(defface ibuffer-deletion '((t :inherit error))
|
||||
"Face used by default in `ibuffer-deletion-face'."
|
||||
:version "31.1")
|
||||
|
||||
(defface ibuffer-title '((t :inherit font-lock-type-face))
|
||||
"Face used by default in `ibuffer-title-face'."
|
||||
:version "31.1")
|
||||
|
||||
(defface ibuffer-filter-group-name '((t :inherit bold))
|
||||
"Face used by default in `ibuffer-filter-group-name-face'."
|
||||
:version "31.1")
|
||||
|
||||
(defcustom ibuffer-marked-face 'ibuffer-marked
|
||||
"Face used for displaying marked buffers."
|
||||
:version "31.1"
|
||||
:type 'face)
|
||||
|
||||
(defcustom ibuffer-deletion-face 'error
|
||||
(defcustom ibuffer-deletion-face 'ibuffer-deletion
|
||||
"Face used for displaying buffers marked for deletion."
|
||||
:version "31.1"
|
||||
:type 'face)
|
||||
|
||||
(defcustom ibuffer-title-face 'font-lock-type-face
|
||||
(defcustom ibuffer-title-face 'ibuffer-title
|
||||
"Face used for the title string."
|
||||
:version "31.1"
|
||||
:type 'face)
|
||||
|
||||
(defcustom ibuffer-filter-group-name-face 'bold
|
||||
(defcustom ibuffer-filter-group-name-face 'ibuffer-filter-group-name
|
||||
"Face used for displaying filtering group names."
|
||||
:version "31.1"
|
||||
:type 'face)
|
||||
|
||||
(defcustom ibuffer-directory-abbrev-alist nil
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue