From 3612ae55413e782398274e18e0add66e76c3c897 Mon Sep 17 00:00:00 2001 From: Joe Wreschnig Date: Sun, 8 Oct 2017 21:29:01 +0200 Subject: [PATCH] Add first pass at Jabber faces. --- BTCSB-theme.el | 37 +++++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) diff --git a/BTCSB-theme.el b/BTCSB-theme.el index cdb7511..5277a33 100644 --- a/BTCSB-theme.el +++ b/BTCSB-theme.el @@ -228,6 +228,43 @@ recommended pairings are Fantasque Sans or Monaco.") `(elfeed-search-last-update-face ((t (:foreground ,clr08)))) `(elfeed-search-unread-count-face ((t (:foreground ,clr18)))) `(elfeed-search-filter-face ((t (:foreground ,clr20)))) + + ;; Jabber.el + `(jabber-rare-time-face ((t (:inherit (variable-pitch) + :foreground ,clr08)))) + `(jabber-chat-text-foreign ((t (:inherit (variable-pitch))))) + `(jabber-chat-text-local ((t (:inherit (variable-pitch))))) + `(jabber-chat-prompt-foreign ((t (:inherit (jabber-chat-text-foreign) + :foreground ,clr14)))) + `(jabber-chat-prompt-local ((t (:inherit (jabber-chat-text-local) + :foreground ,clr13)))) + `(jabber-chat-prompt-system ((t (:inherit (variable-pitch) + :foreground ,clr23)))) + `(jabber-chat-error ((t (:inherit (variable-pitch) + :foreground ,clr27)))) + `(jabber-roster-user-online ((t (:inherit (default) + :foreground ,clr17)))) + `(jabber-roster-user-xa ((t (:inherit (default) + :foreground ,clr09)))) + `(jabber-roster-user-dnd ((t (:inherit (default) + :foreground ,clr09)))) + `(jabber-roster-user-away ((t (:inherit (default) + :foreground ,clr09)))) + `(jabber-roster-user-chatty ((t (:inherit (default) + :foreground ,clr21)))) + `(jabber-roster-user-error ((t (:inherit (default) + :foreground ,clr27)))) + `(jabber-roster-user-offline ((t (:inherit (default) + :foreground ,clr07)))) + `(jabber-title-small ((t (:inherit (variable-pitch) + :height 1.0 + :foreground ,clr08)))) + `(jabber-title-medium ((t (:inherit (variable-pitch) + :height 1.0 :weight bold + :foreground ,clr08)))) + `(jabber-title-large ((t (:inherit (variable-pitch) + :height 1.5 :weight bold + :foreground ,clr08)))) )) ;;;###autoload -- 2.30.2