about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-10-06 11:17:47 -0500
committerCase Duckworth2021-10-06 11:17:47 -0500
commitf9fd9e5f62ac0adbc92ebae3342d074f8c189376 (patch)
treebb760080ce42e264aabf7c1a4dd0a6a46efdcaee
parentUn-banish the mouse (diff)
parentMerge branch 'main' of github.com:duckwork/.emacs.d (diff)
downloademacs-f9fd9e5f62ac0adbc92ebae3342d074f8c189376.tar.gz
emacs-f9fd9e5f62ac0adbc92ebae3342d074f8c189376.zip
Merge branch 'main' of https://github.com/duckwork/.emacs.d
-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 a48723b..22c06f8 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
@@ -1420,6 +1415,12 @@ specific to most general, they are these:
1420 ;; (t (apply fn url args)))) 1415 ;; (t (apply fn url args))))
1421 ) 1416 )
1422 1417
1418(setup (:straight-if emacs-everywhere
1419 (and (executable-find "xclip")
1420 (executable-find "xdotool")
1421 (executable-find "xprop")
1422 (executable-find "xwininfo"))))
1423
1423(setup (:straight (embark ; gotta git that fresh fresh 1424(setup (:straight (embark ; gotta git that fresh fresh
1424 :host github 1425 :host github
1425 :repo "oantolin/embark")) 1426 :repo "oantolin/embark"))