summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--init.org79
1 files changed, 53 insertions, 26 deletions
diff --git a/init.org b/init.org
index 531f000..d868d85 100644
--- a/init.org
+++ b/init.org
@@ -172,32 +172,59 @@ The default behavior of Emacs is that you can compose multiple themes; however,
The Modus themes look pretty nice.
#+BEGIN_SRC elisp
-(setq modus-themes-mode-line '(borderless))
-(setq modus-themes-region '(bg-only))
-(setq modus-themes-completions '(opinionated))
-(setq modus-themes-paren-match '(bold intense))
-(setq modus-themes-org-agenda nil)
-(setq modus-themes-headings
- '((1 . (bold 1.4))
- (2 . (bold 1.3))
- (3 . (bold 1.2))
- (t . (semilight 1.1))))
-(setq modus-themes-scale-headings t)
-(setq modus-themes-bold-constructs t)
-(setq modus-themes-org-blocks nil)
-(setq modus-themes-variable-pitch-headings t)
-(load-theme 'modus-vivendi-tinted t)
-
-;; Add frame borders and window dividers
-(modify-all-frames-parameters
- '((right-divider-width . 20)
- (internal-border-width . 20)))
-(dolist (face '(window-divider
+(use-package modus-themes
+ :init
+ (setq modus-themes-completions '(opinionated))
+ (setq modus-themes-headings
+ '((agenda-structure . (variable-pitch light 2.2))
+ (agenda-date . (variable-pitch regular 1.3))
+ (1 . (variable-pitch background bold overline 1.5))
+ (2 . (variable-pitch overline rainbow 1.3))
+ (3 . (variable-pitch overline 1.1))
+ (t . (monochrome))))
+ (setq modus-themes-bold-constructs t)
+ (setq modus-themes-org-blocks nil)
+ (setq modus-themes-variable-pitch-ui t)
+ (setq modus-themes-prompts '(bold))
+ (setq modus-themes-to-toggle '(modus-operandi-tinted modus-vivendi-tinted))
+ (setq modus-themes-common-palette-overrides
+ '((border-mode-line-active unspecified)
+ (border-mode-line-inactive unspecified)
+ ;; Parenthesis matching
+ (bg-paren-match bg-magenta-intense)
+ ;; Org Agenda
+ (date-deadline magenta-warmer)
+ (date-scheduled green-cooler)
+ (date-weekday fg-main)
+ (date-event fg-dim)
+ (date-now blue)
+ (prose-done fg-alt)
+ (prose-todo yellow)
+ ;; Region highlight
+ (bg-region bg-yellow-subtle)
+ (fg-region unspecified)
+ ;; Fewer colors in email
+ (mail-cite-0 fg-dim)
+ (mail-cite-1 blue-faint)
+ (mail-cite-2 fg-dim)
+ (mail-cite-3 blue-faint)
+ (mail-part cyan-warmer)
+ (mail-recipient blue-warmer)
+ (mail-subject magenta-cooler)
+ (mail-other cyan-warmer)
+ ))
+ (load-theme 'modus-operandi-tinted :no-confirm)
+
+ ;; Add frame borders and window dividers
+ (modify-all-frames-parameters
+ '((right-divider-width . 20)
+ (internal-border-width . 20)))
+ (dolist (face '(window-divider
window-divider-first-pixel
window-divider-last-pixel))
- (face-spec-reset-face face)
- (set-face-foreground face (face-attribute 'default :background)))
-(set-face-background 'fringe (face-attribute 'default :background))
+ (face-spec-reset-face face)
+ (set-face-foreground face (face-attribute 'default :background)))
+ (set-face-background 'fringe (face-attribute 'default :background)))
#+END_SRC
Dired mode becomes much prettier with =nerd-icons=.
@@ -213,8 +240,8 @@ I like the doom emacs modeline with buffer-appropriate icons.
:after eshell ;Make sure it gets hooked after eshell
:init (doom-modeline-mode)
:custom
- (doom-modeline-height 35)
- (doom-modeline-bar-width 6)
+ (doom-modeline-height 48)
+ (doom-modeline-bar-width 8)
(doom-modeline-lsp t)
(doom-modeline-github nil)
(doom-modeline-mu4e nil)