Emacs config updates

thoom-emacs/modules/thoom-theme.el

@@ -7,7 +7,7 @@
   ;; 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-one t)
+  (load-theme 'doom-dark+ t)
 
   ;; Enable flashing mode-line on errors
   (doom-themes-visual-bell-config)
@@ -15,15 +15,22 @@
   (doom-themes-org-config))
 
 ;; Slightly transparent window
-(set-frame-parameter (selected-frame) 'alpha '(99 98))
-(add-to-list 'default-frame-alist '(alpha 99 98))
+;; (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.")
-(add-to-list 'default-frame-alist `(font . ,thoom-font))
+(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
@@ -34,3 +41,4 @@
 ;; On a Mac, the menu bar doesn't take up screen real-estate, so leave it on
 (unless ON-MAC
   (menu-bar-mode -1))
+