52 lines
1.4 KiB
EmacsLisp
52 lines
1.4 KiB
EmacsLisp
(provide 'thoom-theme)
|
|
|
|
;; Theme
|
|
(use-package doom-themes
|
|
:ensure t
|
|
:config
|
|
(setq doom-themes-enable-bold t
|
|
doom-themes-enable-italic t)
|
|
|
|
(load-theme 'doom-monokai-pro t)
|
|
;; Lighten comments slightly for better contrast
|
|
(custom-theme-set-faces
|
|
'doom-monokai-pro
|
|
'(font-lock-comment-face
|
|
((t (:foreground "#9A989A")))))
|
|
(enable-theme 'doom-monokai-pro)
|
|
|
|
;; Enable flashing mode-line on errors
|
|
(doom-themes-visual-bell-config)
|
|
;; Corrects (and improves) org-mode's native fontification.
|
|
(doom-themes-org-config))
|
|
|
|
;; Slightly transparent window
|
|
(modify-all-frames-parameters '((alpha 99 99)
|
|
(top . 50)
|
|
(left . 100)
|
|
(width . 120)
|
|
(height . 60)))
|
|
|
|
(setq thoom-font-candidates
|
|
'("FiraCode Nerd Font Mono" "Fira Code" "Menlo" "Deja Vu Sans"))
|
|
(defvar thoom-font
|
|
(seq-find #'x-list-fonts thoom-font-candidates)
|
|
"The default font to use.")
|
|
(defvar thoom-font-size
|
|
(if ON-MAC
|
|
14
|
|
12)
|
|
"The default font size to use.")
|
|
(modify-all-frames-parameters
|
|
`((font . ,(concat thoom-font "-" (number-to-string thoom-font-size)))))
|
|
|
|
;; Hide clutter
|
|
(setq inhibit-startup-message t
|
|
use-dialog-box nil)
|
|
(tool-bar-mode -1)
|
|
(scroll-bar-mode -1)
|
|
|
|
;; On a Mac, the menu bar doesn't take up screen real-estate, so leave it on
|
|
(unless ON-MAC
|
|
(menu-bar-mode -1))
|