Checkboxes: New face

Checkboxes not have their own face.  This can be used to make them
look different.  Default is still just bold.
This commit is contained in:
Carsten Dominik 2009-03-20 14:09:10 +01:00
parent 5d958f13b3
commit cf6cdd5c44
3 changed files with 11 additions and 1 deletions

View File

@ -1,5 +1,9 @@
2009-03-20 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-set-font-lock-defaults): Use new checkbox face.
* org-faces.el (org-checkbox): New face.
* org-exp.el (org-export-html-preprocess): Only create LaTeX
fragement images if there is an export file.

View File

@ -343,6 +343,12 @@ list of attributes, like (:foreground \"blue\" :weight bold :underline t)."
(setq org-tags-special-faces-re
(concat ":\\(" (mapconcat 'car value "\\|") "\\):"))))
(defface org-checkbox
(org-compatible-face 'bold
'((t (:bold t))))
"Face for checkboxes"
:group 'org-faces)
(defcustom org-tag-faces nil
"Faces for specific tags.
This is a list of cons cells, with tags in the car and faces in the cdr.

View File

@ -4352,7 +4352,7 @@ between words."
'(org-do-emphasis-faces)))
;; Checkboxes
'("^[ \t]*\\([-+*]\\|[0-9]+[.)]\\) +\\(\\[[- X]\\]\\)"
2 'bold prepend)
2 'org-checkbox prepend)
(if org-provide-checkbox-statistics
'("\\[\\([0-9]*%\\)\\]\\|\\[\\([0-9]*\\)/\\([0-9]*\\)\\]"
(0 (org-get-checkbox-statistics-face) t)))