search

waymondo / apropospriate-theme

A colorful, low-contrast, light & dark theme set for Emacs with a fun name
307 stars 18 forks source link

add missing org-mode , cider and mu4e #21

Open skovuri41 opened 7 years ago

skovuri41 commented 7 years ago

request to add the following faces per this theme. thanks.

from spacemacs theme:

`(org-ellipsis ((,class (:foreground ,keyword))))
 `(org-level-1 ((,class (:inherit bold :foreground ,head1 :height ,(if spacemacs-theme-org-height 1.3 1.0) :background ,(when spacemacs-theme-org-highlight head1-bg)))))
 `(org-level-2 ((,class (:inherit bold :foreground ,head2 :height ,(if spacemacs-theme-org-height 1.2 1.0) :background ,(when spacemacs-theme-org-highlight head2-bg)))))
 `(org-level-3 ((,class (:bold nil :foreground ,head3 :height ,(if spacemacs-theme-org-height 1.1 1.0) :background ,(when spacemacs-theme-org-highlight head3-bg)))))
 `(org-level-4 ((,class (:bold nil :foreground ,head4 :background ,(when spacemacs-theme-org-highlight head4-bg)))))
 `(org-level-5 ((,class (:bold nil :foreground ,head1))))
 `(org-level-6 ((,class (:bold nil :foreground ,head2))))
  `(org-level-7 ((,class (:bold nil :foreground ,head3))))
  `(org-level-8 ((,class (:bold nil :foreground ,head4))))
;;;;; mu4e
     `(mu4e-cited-1-face ((,class (:foreground ,base))))
     `(mu4e-cited-7-face ((,class (:foreground ,base))))
     `(mu4e-header-marks-face ((,class (:foreground ,comp))))
     `(mu4e-header-key-face ((,class (:foreground ,head2 :inherit bold))))
     `(mu4e-view-url-number-face ((,class (:foreground ,comp))))
     `(mu4e-unread-face ((,class (:foreground ,yellow :inherit bold))))

;;;;; cider
     `(cider-enlightened ((,class (:background nil :box (:color ,yellow :line-width -1 :style nil) :foreground ,yellow))))
     `(cider-enlightened-local ((,class (:foreground ,yellow))))
     `(cider-instrumented-face ((,class (:background nil :box (:color ,red :line-width -1 :style nil) :foreground ,red))))
     `(cider-result-overlay-face ((,class (:background nil :box (:color ,blue :line-width -1 :style nil) :foreground ,blue))))
     `(cider-test-error-face ((,class (:background ,war :foreground ,bg1))))
     `(cider-test-failure-face ((,class (:background ,err :foreground ,bg1))))
     `(cider-test-success-face ((,class (:background ,suc :foreground ,bg1))))
     `(cider-traced-face ((,class :box (:color ,cyan :line-width -1 :style nil))))
waymondo commented 7 years ago

I just added org-level-* faces in a28c903. I personally don't use mu4e and cider, but I would accept styles if you formatted a pull request for that face support.