unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* outline should have its own face definitions
@ 2002-12-08 18:37 Hannu Koivisto
  0 siblings, 0 replies; 4+ messages in thread
From: Hannu Koivisto @ 2002-12-08 18:37 UTC (permalink / raw)


This bug report will be sent to the Free Software Foundation,
not to your local site managers!
Please write in English, because the Emacs maintainers do not have
translators to read other languages for them.

Your bug report will be posted to the bug-gnu-emacs@gnu.org mailing list,
and to the gnu.emacs.bug news group.

In GNU Emacs 21.2.2 (i686-pc-linux-gnu, X toolkit)
 of 2002-03-26 on lynx
configured using `configure  --prefix=/usr/local/emacs-21 --with-xpm --with-jpeg --with-tiff --with-gif'
Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: fi_FI@euro
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: iso-latin-9
  default-enable-multibyte-characters: t

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

Currently outline-mode uses faces such as
font-lock-function-name-face and font-lock-variable-name-face for
fontifying heading lines at different levels.  This makes it
impossible for user to customize the fontification of outline
heading lines without affecting fontification of other modes.

If you want to default to the currently used faces, perhaps
outline-specific faces could inherit from them by default.

If you are not interested in fixing this before the next release
comes out or at all, perhaps a new PROBLEMS entry could be
introduced that mentions that something along the lines of of the
example code below can be used to work around the problem in one's
personal .emacs.

(defface outline-1-face
  '((t (:bold t)))
  "Outline face for level 1.")

(defface outline-2-face
  '((t (:foreground "DarkBlue")))
  "Outline face for level 2.")

(defface outline-3-face
  '((t (:foreground "FireBrick4")))
  "Outline face for level 3.")

(defface outline-4-face
  '((t (:foreground "Purple4")))
  "Outline face for level 4.")

(defface outline-5-face
  '((t ()))
  "Outline face for level 5.")

(defface outline-6-face
  '((t ()))
  "Outline face for level 6.")

(defface outline-7-face
  '((t ()))
  "Outline face for level 7.")

(defface outline-8-face
  '((t ()))
  "Outline face for level 8.")

(defvar
 outline-font-lock-keywords
 ;; Highlight headings according to the level.
 '((eval . (list (concat "^" outline-regexp ".+")
                 0 '(or (cdr (assq (outline-font-lock-level)
                                   '((1 . outline-1-face)
                                     (2 . outline-2-face)
                                     (3 . outline-3-face)
                                     (4 . outline-4-face)
                                     (5 . outline-5-face)
                                     (6 . outline-6-face)
                                     (7 . outline-7-face)
                                     (8 . outline-8-face))))
                        font-lock-warning-face)
                 nil t))))

-- 
Hannu

^ permalink raw reply	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2002-12-09 15:29 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
     [not found] <mailman.8.1039372645.19936.bug-gnu-emacs@gnu.org>
2002-12-08 21:21 ` outline should have its own face definitions Miles Bader
     [not found]   ` <miles@gnu.org>
2002-12-09 14:50     ` Peter S Galbraith
     [not found]   ` <mailman.32.1039445453.19936.bug-gnu-emacs@gnu.org>
2002-12-09 15:29     ` Miles Bader
2002-12-08 18:37 Hannu Koivisto

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).