45 lines
1.3 KiB
EmacsLisp
45 lines
1.3 KiB
EmacsLisp
(provide 'thoom-theme)
|
|
|
|
;; Theme
|
|
(use-package doom-themes
|
|
:ensure t
|
|
:config
|
|
;; Global settings (defaults)
|
|
(setq doom-themes-enable-bold t ; if nil, bold is universally disabled
|
|
doom-themes-enable-italic t) ; if nil, italics is universally disabled
|
|
(load-theme 'doom-dark+ t)
|
|
|
|
;; 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
|
|
;; (set-frame-parameter (selected-frame) 'alpha '(99 98))
|
|
(modify-all-frames-parameters '((alpha 99 98)
|
|
(top . 50)
|
|
(left . 100)
|
|
(width . 120)
|
|
(height . 60)))
|
|
|
|
(setq thoom-font-candidates
|
|
'("FiraCode Nerd Font Mono" "Menlo"))
|
|
(defvar thoom-font
|
|
(seq-find #'x-list-fonts thoom-font-candidates)
|
|
"The default font to use.")
|
|
(defvar thoom-font-size
|
|
14
|
|
"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))
|
|
|