New option: org-fontify-whole-heading-line

Non-nil means modify the regexp in org-set-font-lock-defaults so
that headlines are fontified till the end of the line.  This is
useful when setting a background color for the org-level-* faces.
This defaults to nil so that the old behavior is preserved.
This commit is contained in:
Bastien Guerry 2009-07-23 18:46:35 +02:00
parent 12a9381803
commit 68ec49e101
2 changed files with 16 additions and 2 deletions

View File

@ -1,5 +1,8 @@
2009-07-23 Bastien Guerry <bzg@altern.org>
* org.el (org-fontify-whole-heading-line): New option.
(org-set-font-lock-defaults): Use the new option.
* org-clock.el (org-show-notification-handler): New option.
(org-show-notification): Use the new option.

View File

@ -2660,6 +2660,13 @@ Changing this variable requires a restart of Emacs to take effect."
:group 'org-font-lock
:type 'boolean)
(defcustom org-fontify-whole-heading-line nil
"Non-nil means fontify the whole line for headings.
This is useful when setting a background color for the
org-leve-* faces."
:group 'org-font-lock
:type 'boolean)
(defcustom org-highlight-latex-fragments-and-specials nil
"Non-nil means, fontify what is treated specially by the exporters."
:group 'org-font-lock
@ -4527,8 +4534,12 @@ between words."
;; Call the hook
'(org-font-lock-hook)
;; Headlines
'("^\\(\\**\\)\\(\\* \\)\\(.*\\)" (1 (org-get-level-face 1))
(2 (org-get-level-face 2)) (3 (org-get-level-face 3)))
`(,(if org-fontify-whole-heading-line
"^\\(\\**\\)\\(\\* \\)\\(.*\xa\\)"
"^\\(\\**\\)\\(\\* \\)\\(.*\\)")
(1 (org-get-level-face 1))
(2 (org-get-level-face 2))
(3 (org-get-level-face 3)))
;; Table lines
'("^[ \t]*\\(\\(|\\|\\+-[-+]\\).*\\S-\\)"
(1 'org-table t))