# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 937231198 0
# Node ID afad62240679de001f86123167db3a66bd0a93c1
# Parent  c1a7a52bbfea7dc2266371ecf4312aeac8272e5e
(mode-line, header-line, tool-bar, ): Add :version.
(highlight, secondary-selection): Add :group.
(trailing-whitespace): Add :group, :version.

diff -r c1a7a52bbfea -r afad62240679 lisp/faces.el
--- 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)