solarized-emacs

commit fe4a27fb0cc1915e55228c18b7040b99483e17b1
parent 387bd1b41b6cdc4795fe0433972bbc0f0d5e038f
Author: Thomas Frössman <thomasf@jossystem.se>
Date:   Thu, 19 Apr 2012 11:28:41 +0200

Use new low/high contrast accent colors for habit graph display.

Diffstat:
M
solarized-theme.el
 | 
22
+++++++++-------------

1 file changed, 9 insertions(+), 13 deletions(-)
diff --git a/solarized-theme.el b/solarized-theme.el
@@ -407,19 +407,15 @@
      `(org-todo ((,class (:bold t :foreground ,red :weight bold))))
      `(org-upcoming-deadline ((,class (:bold t :foreground ,yellow ))))
      `(org-warning ((,class (:bold t :foreground ,orange :weight bold :underline t))))
-     ;; org-habit
-     `(org-habit-clear-face ((,class ,(if (eq variant 'light)
-                                       `(:foreground ,base02 :background "#bbbbff")
-                                       `(:foreground ,base01 :background "blue")))))
-     `(org-habit-clear-future-face ((,class (:foreground ,(if (eq variant 'light) base02 base00)))))
-     `(org-habit-ready-face ((,class ,(if (eq variant 'light)
-                                        `(:foreground ,base02 :background "#aaffbb")
-                                        `(:foreground ,base02 :background "forestgreen")))))
-     `(org-habit-ready-future-face ((,class (:foreground ,base01))))
-     `(org-habit-alert-face ((,class (:foreground ,base01))))
-     `(org-habit-alert-future-face ((,class (:foreground ,base02))))
-     `(org-habit-overdue-face ((,class (:foreground ,base01))))
-     `(org-habit-overdue-future-face ((,class (:foreground ,base01))))
+     ;; org-habit (clear=blue, ready=green, alert=yellow, overdue=red. future=lower contrast)
+     `(org-habit-clear-face ((,class (:background ,blue-lc, :foreground ,blue-hc))))
+     `(org-habit-clear-future-face ((,class (:background ,blue-lc))))
+     `(org-habit-ready-face ((,class (:background ,green-lc :foreground ,green))))
+     `(org-habit-ready-future-face ((,class (:background ,green-lc))))
+     `(org-habit-alert-face ((,class (:background ,yellow-hc :foreground ,yellow-lc))))
+     `(org-habit-alert-future-face ((,class (:background ,yellow-lc))))
+     `(org-habit-overdue-face ((,class (:background ,red-hc :foreground ,red-lc))))
+     `(org-habit-overdue-future-face ((,class (:background ,red-lc))))
 
      ;; outline
      `(outline-8 ((,class (:inherit default))))