Mercurial > emacs

changeset 25687:afad62240679

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mode-line, header-line, tool-bar, ): Add :version. (highlight, secondary-selection): Add :group. (trailing-whitespace): Add :group, :version.
author Dave Love <fx@gnu.org>
date Mon, 13 Sep 1999 13:59:58 +0000
parents c1a7a52bbfea
children 63094dd28174
files lisp/faces.el
diffstat 1 files changed, 10 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Mon Sep 13 13:54:33 1999 +0000
+++ b/lisp/faces.el	Mon Sep 13 13:59:58 1999 +0000
@@ -1358,6 +1358,7 @@
     (t
      (:inverse-video t)))
   "Basic mode line face."
+  :version "21.1"
   :group 'basic-faces)
 
 ;; Make `modeline' an alias for `mode-line', for compatibility.
@@ -1369,6 +1370,7 @@
     (t
      (:inverse-video t)))
   "Basic header-line face."
+  :version "21.1"
   :group 'basic-faces)
 
 
@@ -1380,6 +1382,7 @@
     (t
      ()))
   "Basic tool-bar face."
+  :version "21.1"
   :group 'basic-faces)
 
 
@@ -1459,7 +1462,8 @@
     (((class color) (background dark))
      (:background "darkolivegreen"))
     (t (:inverse-video t)))
-  "Basic face for highlighting.")
+  "Basic face for highlighting."
+  :group 'basic-faces)
 
 
 (defface secondary-selection
@@ -1470,7 +1474,8 @@
     (((class color) (background dark))
      (:background "darkslateblue"))
     (t (:inverse-video t)))
-  "Basic face for displaying the secondary selection.")
+  "Basic face for displaying the secondary selection."
+  :group 'basic-faces)
 
 
 (defface fixed-pitch '((t (:family "courier*")))
@@ -1489,7 +1494,9 @@
     (((class color) (background dark))
      (:background "red"))
     (t (:inverse-video t)))
-  "Basic face for highlighting trailing whitespace.")
+  "Basic face for highlighting trailing whitespace."
+  :version "21.1"
+  :group 'basic-faces)