mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-28 10:56:57 +00:00
Code

New face: org-default.

Browse Source 
* install/git/org-mode/lisp/org.el (org-mode): Use org-default as
the default face in org-mode.

* install/git/org-mode/lisp/org-faces.el (org-default): New face.

M-x customize-face RET org-default RET lets the user define a default
face for org-mode.
This commit is contained in:
Bastien Guerry 2011-07-06 17:25:29 +02:00
parent c6b22dee33
commit 7a88eaec29
2 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/org-faces.el
View File

@ -51,6 +51,11 @@
:tag "Org Faces"
:group 'org-appearance)
(defface org-default
(org-compatible-face 'default nil)
"Face used for default text."
:group 'org-faces)
(defface org-hide
'((((background light)) (:foreground "white"))
(((background dark)) (:foreground "black")))

2
lisp/org.el
View File

@ -4829,6 +4829,8 @@ The following commands are available:
(set (make-local-variable 'pcomplete-parse-arguments-function)
'org-parse-arguments)
(set (make-local-variable 'pcomplete-termination-string) "")
(set (make-local-variable 'face-remapping-alist)
'((default org-default)))
;; If empty file that did not turn on org-mode automatically, make it to.
(if (and org-insert-mode-line-in-empty-file