From ff696760f250643b53f5084a958c0186199ee69b Mon Sep 17 00:00:00 2001 From: Christian Cunningham Date: Sun, 15 Mar 2026 22:58:57 -0700 Subject: Beautify --- elchemy-user.el | 6 +++--- elchemy.el | 5 ++--- 2 files changed, 5 insertions(+), 6 deletions(-) diff --git a/elchemy-user.el b/elchemy-user.el index 4f9aaf9..d93d78a 100644 --- a/elchemy-user.el +++ b/elchemy-user.el @@ -37,11 +37,11 @@ ;; Modeline (setq-default mode-line-format `((:propertize " ♥ " face (:family ,elchemy/user/alt-font-name :foreground "red")) (:propertize "PlayTime" face (:weight bold)) - (:propertize " ♦ " face (:family ,elchemy/user/alt-font-name :foreground "red")) + (:propertize " ♦ " face (:family ,elchemy/user/alt-font-name :foreground "orange")) (:propertize "%b" face (:slant italic)) - (:propertize " ♣ " face (:family ,elchemy/user/alt-font-name :foreground "black")) + (:propertize " ♣ " face (:family ,elchemy/user/alt-font-name :foreground "darkgreen")) (:propertize (:eval mode-name) face (:foreground "red")) - (:propertize " ♠ " face (:family ,elchemy/user/alt-font-name :foreground "black")))) + (:propertize " ♠ " face (:family ,elchemy/user/alt-font-name :foreground "darkblue")))) ;; Don't treat url-like file names as urls and ping accidentally when emacs greps! ;; [https://old.reddit.com/r/emacs/comments/1gjlv1z/why_is_emacs_grep_command_pinging_external_servers/] diff --git a/elchemy.el b/elchemy.el index 18ac73f..ae82f60 100644 --- a/elchemy.el +++ b/elchemy.el @@ -28,7 +28,6 @@ ;; If there is more than one, they won't work right. `(default ((t (:height ,elchemy/user/font-height)))) '(link ((t (:underline t)))) - '(mode-line ((t (:box (:line-width (1 . 1) :style flat-button) :height 1.1)))) '(org-document-title ((t (:height 2.0 :underline nil)))) '(org-level-1 ((t (:inherit outline-1 :extend nil :weight extra-bold :height 1.4)))) '(org-level-2 ((t (:inherit outline-2 :extend nil :slant italic :weight bold :height 1.2)))) @@ -43,5 +42,5 @@ '(cursor ((t (:background "gray30")))) '(link ((t (:foreground "blue")))) '(minibuffer-prompt ((t (:foreground "#771C9B")))) - '(mode-line ((t (:box (:color "grey75"))))) - '(mode-line-inactive ((t (:foreground "gray20")))))) + '(mode-line ((t (:foreground "grey30" :background "grey75")))) + '(mode-line-inactive ((t (:foreground "gray50")))))) -- cgit v1.2.1