mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 11:00:45 -08:00
Code Issues Projects Releases Wiki Activity

(org-get-level-face): Fixed bug with level counting.

Browse source
This commit is contained in:
Carsten Dominik 2006-03-27 08:03:33 +00:00
parent 80d116c10e
commit c61e94b456
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/textmodes/org.el
View file

@ -2383,7 +2383,7 @@ between words."
"Get the right face for match N in font-lock matching of healdines."
(setq org-l (- (match-end 2) (match-beginning 1)))
(if org-odd-levels-only (setq org-l (1+ (/ org-l 2))))
(setq org-f (nth (1- (% org-l org-n-levels)) org-level-faces))
(setq org-f (nth (% (1- org-l) org-n-levels) org-level-faces))
(cond
((eq n 1) (if org-hide-leading-stars 'org-hide org-f))
((eq n 2) org-f)