about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--early-init.el8
-rw-r--r--init.el11
2 files changed, 10 insertions, 9 deletions
diff --git a/early-init.el b/early-init.el index 2eaa8d8..b820144 100644 --- a/early-init.el +++ b/early-init.el
@@ -26,7 +26,8 @@
26(require 'acdw-frame) 26(require 'acdw-frame)
27 27
28;;; Frame settings 28;;; Frame settings
29(setq default-frame-alist 29(setq initial-frame-alist '((fullscreen . maximized))
30 default-frame-alist
30 `((tool-bar-lines . 0) 31 `((tool-bar-lines . 0)
31 (menu-bar-lines . 0) 32 (menu-bar-lines . 0)
32 (vertical-scroll-bars . nil) 33 (vertical-scroll-bars . nil)
@@ -63,15 +64,14 @@ say, `tool-bar-mode' once to toggle the tool bar back on."
63 (defun after-make-frame@setup (&rest args) 64 (defun after-make-frame@setup (&rest args)
64 (ignore args) 65 (ignore args)
65 (let ((fixed-pitch-faces 66 (let ((fixed-pitch-faces
66 '((:font "Fantasque Sans Mono" :height 110) 67 '((:font "Fantasque Sans Mono" :height 115)
67 (:font "Go Mono" :height 110) 68 (:font "Go Mono" :height 110)
68 (:font "DejaVu Sans Mono" :height 110) 69 (:font "DejaVu Sans Mono" :height 110)
69 (:font "monospace" :height 100))) 70 (:font "monospace" :height 100)))
70 (variable-pitch-faces 71 (variable-pitch-faces
71 '((:font "Inter" :height 120) 72 '((:font "Inter" :height 120)
72 (:font "Go" :height 120) 73 (:font "Go" :height 120)
73 (:font "sans-serif" 74 (:font "sans-serif" :height 100))))
74 :height 100))))
75 (acdw/set-first-face-attribute 'default 75 (acdw/set-first-face-attribute 'default
76 fixed-pitch-faces) 76 fixed-pitch-faces)
77 (acdw/set-first-face-attribute 'fixed-pitch 77 (acdw/set-first-face-attribute 'fixed-pitch
diff --git a/init.el b/init.el index 4ad55a9..a598b16 100644 --- a/init.el +++ b/init.el
@@ -393,11 +393,6 @@
393 "l" #'downcase-dwim 393 "l" #'downcase-dwim
394 "s" #'spongebob-case-dwim)) 394 "s" #'spongebob-case-dwim))
395 395
396 (add-hook 'after-make-frame-functions
397 (defun after-make-frame@maximize (frame)
398 (unless (bound-and-true-p edit-server-frame-p)
399 (toggle-frame-maximized frame))))
400
401 (column-number-mode +1)) 396 (column-number-mode +1))
402 397
403(setup encoding 398(setup encoding
@@ -1424,6 +1419,12 @@ specific to most general, they are these:
1424 ;; (t (apply fn url args)))) 1419 ;; (t (apply fn url args))))
1425 ) 1420 )
1426 1421
1422(setup (:straight-if emacs-everywhere
1423 (and (executable-find "xclip")
1424 (executable-find "xdotool")
1425 (executable-find "xprop")
1426 (executable-find "xwininfo"))))
1427
1427(setup (:straight (embark ; gotta git that fresh fresh 1428(setup (:straight (embark ; gotta git that fresh fresh
1428 :host github 1429 :host github
1429 :repo "oantolin/embark")) 1430 :repo "oantolin/embark"))