added some emacs windows fluff to make it less crap

This commit is contained in:
2026-04-17 19:48:07 -04:00
parent edf5e7e57e
commit 4fa407f027
4 changed files with 665 additions and 6 deletions

View File

@@ -1,4 +1,6 @@
;; this is my current emacs config -subwafer
;; melpa stuff
@@ -15,15 +17,29 @@
(unless package-archive-contents
(package-refresh-contents))
(add-to-list 'initial-frame-alist '(fullscreen . maximized))
(defvar IS-WINDOWS (eq system-type 'windows-nt))
(defun rc/get-default-font ()
(cond
((eq system-type 'windows-nt) "CaskaydiaMono Nerd Font")
((eq system-type 'gnu-linux) "CaskaydiaMono Nerd Font")))
;; ((eq system-type 'windows-nt) "CaskaydiaMono Nerd Font")
;; ((eq system-type 'gnu-linux) "CaskaydiaMono Nerd Font")
;; ((IS-WINDOWS) "Iosevka")
((IS-WINDOWS) "Hack")
)
)
(when IS-WINDOWS
(setq w32-get-true-file-attributes nil
w32-pipe-read-delay 0
w32-pipe-buffer-size (* 64 1024)))
;;(load-theme 'tsdh-dark t)
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes")
;;(load-theme 'ayu-dark t)
(load-theme 'fleury t)
;;(load-theme 'fleury t);
(load-theme 'aldricos-gruvbox t);
; ui
(tool-bar-mode 0)
@@ -37,7 +53,7 @@
(global-display-fill-column-indicator-mode 1)
; theme related
(set-frame-parameter (selected-frame) 'alpha '(95 . 95))
;;(set-frame-parameter (selected-frame) 'alpha '(99 . 99))
(setq initial-scratch-message "")
(setq-default inhibit-splash-screen t
@@ -73,7 +89,7 @@
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(package-selected-packages '(markdown-mode smex ido-completing-read+)))
'(package-selected-packages '(rg go-mode markdown-mode smex ido-completing-read+)))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.