From: Miles Bader <miles@gnu.org>
Date: Mon, 18 Sep 2000 05:55:03 +0000 (+0000)
Subject: (Info-title-3-face, Info-title-2-face, Info-title-1-face):
X-Git-Tag: emacs-pretest-21.0.90~1550
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8ec8f673fab973455f8a7e6b471144cb91cf806a;p=emacs.git

(Info-title-3-face, Info-title-2-face, Info-title-1-face):
  Use face inheritance and relative sizes instead of hard-wiring things.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4c7c764fc10..4cb997f98a9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2000-09-18  Miles Bader  <miles@lsi.nec.co.jp>
+
+	* info.el (Info-title-3-face, Info-title-2-face) 
+	(Info-title-1-face): Use face inheritance and relative sizes
+	instead of hard-wiring things.
+
+	* faces.el (secondary-selection): Make dark-background variant sane.
+
 2000-09-16  Andrew Innes  <andrewi@gnu.org>
 
 	* makefile.nt (compile-files): No need to make .elc files
diff --git a/lisp/info.el b/lisp/info.el
index 4a2ed94ad46..28ec2ca5e98 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2340,17 +2340,17 @@ the variable `Info-file-list-for-emacs'."
 	   (Info-goto-emacs-command-node command)))))
 
 (defface Info-title-1-face
-  '((t (:family "helv" :height 240 :weight bold)))
+  '((t (:height 1.2 :inherit Info-title-2-face)))
   "Face for Info titles at level 1."
   :group 'info)
 
 (defface Info-title-2-face
-  '((t (:family "helv" :height 180 :weight bold)))
+  '((t (:height 1.2 :inherit Info-title-3-face)))
   "Face for Info titles at level 2."
   :group 'info)
 
 (defface Info-title-3-face
-  '((t (:family "helv" :height 160 :weight bold)))
+  '((t (:height 1.2 :weight bold :inherit variable-pitch)))
   "Face for Info titles at level 3."
   :group 'info)