Define org-level-* faces in tsdh-light theme.

* etc/themes/tsdh-light-theme.el (tsdh-light): Define org-level-*
faces.

diff --git a/etc/ChangeLog b/etc/ChangeLog
index 7f07c9a4b70a68fd1f77b1ceb9d5cacecb75d5c3..d952550832e705f896bfcdc8f38e4e321181d7bf 100644 (file)
--- a/etc/ChangeLog
+++ b/etc/ChangeLog
@@ -1,3 +1,8 @@
+2014-01-05  Tassilo Horn  <tsdh@gnu.org>
+
+       * themes/tsdh-light-theme.el (tsdh-light): Define org-level-*
+       faces.
+
 2013-12-29  Paul Eggert  <eggert@cs.ucla.edu>
 
        Plain copy-file no longer chmods an existing destination (Bug#16133).

diff --git a/etc/themes/tsdh-light-theme.el b/etc/themes/tsdh-light-theme.el
index 3ebd0fcf3e3e1e18a81de82b9ff9b04f241103b6..6f6dae057813237ad0a9dc2dc44e6202bd98182d 100644 (file)
--- a/etc/themes/tsdh-light-theme.el
+++ b/etc/themes/tsdh-light-theme.el
@@ -38,13 +38,21 @@ Used and created by Tassilo Horn.")
  '(header-line ((t (:inherit mode-line :inverse-video t))))
  '(hl-line ((t (:background "grey95"))))
  '(minibuffer-prompt ((t (:background "yellow" :foreground "medium blue" :box (:line-width -1 :color "red" :style released-button) :weight bold))))
- '(mode-line ((t (:box (:line-width -1 :color "red" :style released-button) :family "DejaVu Sans"))))
- '(mode-line-inactive ((t (:inherit mode-line :foreground "dim gray"))))
+ '(mode-line ((t (:background "wheat" :foreground "black" :box (:line-width 1 :color "tan") :family "DejaVu Sans"))))
+ '(mode-line-inactive ((t (:inherit mode-line :foreground "dark gray"))))
  '(org-agenda-date ((t (:inherit org-agenda-structure))))
  '(org-agenda-date-today ((t (:inherit org-agenda-date :underline t))))
  '(org-agenda-date-weekend ((t (:inherit org-agenda-date :foreground "dark green"))))
  '(org-agenda-structure ((t (:foreground "Blue1" :weight bold :height 1.1 :family "DeJaVu Sans"))))
  '(org-hide ((t (:foreground "white"))))
+ '(org-level-1 ((t (:inherit outline-1 :box nil))))
+ '(org-level-2 ((t (:inherit outline-2 :box nil))))
+ '(org-level-3 ((t (:inherit outline-3 :box nil))))
+ '(org-level-4 ((t (:inherit outline-4 :box nil))))
+ '(org-level-5 ((t (:inherit outline-5 :box nil))))
+ '(org-level-6 ((t (:inherit outline-6 :box nil))))
+ '(org-level-7 ((t (:inherit outline-7 :box nil))))
+ '(org-level-8 ((t (:inherit outline-8 :box nil))))
  '(org-tag ((t (:weight bold))))
  '(outline-1 ((t (:inherit font-lock-function-name-face :weight bold))))
  '(outline-2 ((t (:inherit font-lock-variable-name-face :weight bold))))