Mercurial > emacs

comparison lisp/info.el @ 32563:90d5ec551e5d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Info-title-1-face, Info-title-2-face, Info-title-3-face): Define colors for tty's.
author Eli Zaretskii <eliz@gnu.org>
date Tue, 17 Oct 2000 06:52:28 +0000
parents 69087927a683
children f7ed7c88b2ed
comparison
equal deleted inserted replaced
32562:d531dc7c269a 32563:90d5ec551e5d
2362 (read-command "Find documentation for command: "))) 2362 (read-command "Find documentation for command: ")))
2363 (t 2363 (t
2364 (Info-goto-emacs-command-node command))))) 2364 (Info-goto-emacs-command-node command)))))
2365 2365
2366 (defface Info-title-1-face 2366 (defface Info-title-1-face
2367 '((t (:height 1.2 :inherit Info-title-2-face))) 2367 '((((type tty pc) (class color)) (:foreground "lightred" :weight bold))
2368 (t (:height 1.2 :inherit Info-title-2-face)))
2368 "Face for Info titles at level 1." 2369 "Face for Info titles at level 1."
2369 :group 'info) 2370 :group 'info)
2370 2371
2371 (defface Info-title-2-face 2372 (defface Info-title-2-face
2372 '((t (:height 1.2 :inherit Info-title-3-face))) 2373 '((((type tty pc) (class color)) (:foreground "yellow" :weight bold))
2374 (t (:height 1.2 :inherit Info-title-3-face)))
2373 "Face for Info titles at level 2." 2375 "Face for Info titles at level 2."
2374 :group 'info) 2376 :group 'info)
2375 2377
2376 (defface Info-title-3-face 2378 (defface Info-title-3-face
2377 '((t (:height 1.2 :weight bold :inherit variable-pitch))) 2379 '((((type tty pc) (class color)) (:foreground "lightblue" :weight bold))
2380 (t (:height 1.2 :weight bold :inherit variable-pitch)))
2378 "Face for Info titles at level 3." 2381 "Face for Info titles at level 3."
2379 :group 'info) 2382 :group 'info)
2380 2383
2381 (defun Info-fontify-node () 2384 (defun Info-fontify-node ()
2382 (save-excursion 2385 (save-excursion