kyle
/
emacsd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

cleaning up code 

should be able to bootstrap from scratch.

the problem child right now is go-mode.
This commit is contained in:
Kyle Isom 2025-04-11 09:02:39 -07:00
parent bbd0d92f12
commit eddc04b224
2 changed files with 11 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ensure.el
View File

@ -8,15 +8,10 @@
(let ((initial-package-list (let ((initial-package-list
'(auto-complete '(auto-complete
c-eldoc c-eldoc
cargo
cider
ellama ellama
elpy elpy
exec-path-from-shell
geiser geiser
go ;; play the game
go-autocomplete
go-direx
go-guru
go-mode go-mode
gruvbox-theme gruvbox-theme
;; irfc ;; irfc
@ -33,10 +28,10 @@
paredit paredit
pelican-mode pelican-mode
projectile projectile
racket-mode
rust-mode
scpaste scpaste
slime slime
undo-tree))) undo-tree)))
(when (executable-find "racket")
(setf initial-package-list (append initial-package-list '(racket-mode))))
(dolist (package initial-package-list) (dolist (package initial-package-list)
(ensure-package package))) (ensure-package package)))

41
init.el
View File

@ -2,6 +2,7 @@
;;; (global-font-lock-mode 0) ;;; (global-font-lock-mode 0)
(require 'cl-lib) (require 'cl-lib)
(setq debug-on-error t)
(defun localize-path (path) (defun localize-path (path)
"If the path is relative, place it in the user's home directory." "If the path is relative, place it in the user's home directory."
@ -10,16 +11,11 @@
path path
(expand-file-name path home-dir)))) (expand-file-name path home-dir))))
(defun remove-if-not (tst lst)
"(remove-if-not tst lst)
Returns a list with all items for which tst is false removed from lst."
(mapcan #'(lambda (x) (when (funcall tst x) (list x))) lst))
(defun localize-and-filter (paths) (defun localize-and-filter (paths)
"Given a list of paths, localize them and remove any that aren't "Given a list of paths, localize them and remove any that aren't
present on disk." present on disk."
(remove-if-not #'file-exists-p (cl-remove-if-not #'file-exists-p
(mapcar #'localize-path paths))) (mapcar #'localize-path paths)))
(defun cache-path (path) (defun cache-path (path)
"Return a localized, expanded path within the emacs cache directory." "Return a localized, expanded path within the emacs cache directory."
@ -128,6 +124,7 @@ present on disk."
(elpy-enable) (elpy-enable)
;; golang stuff ;; golang stuff
;; disabled while I debug some packages
(setq gofmt-command "goimports") (setq gofmt-command "goimports")
(require 'go-mode) (require 'go-mode)
(add-hook 'before-save-hook 'gofmt-before-save) (add-hook 'before-save-hook 'gofmt-before-save)
@ -220,37 +217,15 @@ present on disk."
;; Your init file should contain only one such instance. ;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(ansi-color-names-vector '(ansi-color-names-vector
["#2d3743" "#ff4242" "#74af68" "#dbdb95" "#34cae2" "#008b8b" "#00ede1" ["#2d3743" "#ff4242" "#74af68" "#dbdb95" "#34cae2" "#008b8b" "#00ede1" "#e1e1e0"])
"#e1e1e0"])
'(chess-default-display 'chess-plain) '(chess-default-display 'chess-plain)
'(custom-safe-themes '(custom-safe-themes
'("5a0ddbd75929d24f5ef34944d78789c6c3421aa943c15218bac791c199fc897d" '("5a0ddbd75929d24f5ef34944d78789c6c3421aa943c15218bac791c199fc897d" "5aedf993c7220cbbe66a410334239521d8ba91e1815f6ebde59cecc2355d7757" "75b371fce3c9e6b1482ba10c883e2fb813f2cc1c88be0b8a1099773eb78a7176" "18a1d83b4e16993189749494d75e6adb0e15452c80c431aca4a867bcc8890ca9" "8363207a952efb78e917230f5a4d3326b2916c63237c1f61d7e5fe07def8d378" "51fa6edfd6c8a4defc2681e4c438caf24908854c12ea12a1fbfd4d055a9647a3" "d5fd482fcb0fe42e849caba275a01d4925e422963d1cd165565b31d3f4189c87" "4c7228157ba3a48c288ad8ef83c490b94cb29ef01236205e360c2c4db200bb18" "7b8f5bbdc7c316ee62f271acf6bcd0e0b8a272fdffe908f8c920b0ba34871d98" "37768a79b479684b0756dec7c0fc7652082910c37d8863c35b702db3f16000f8" "bf390ecb203806cbe351b966a88fc3036f3ff68cd2547db6ee3676e87327b311" "e1943fd6568d49ec819ee3711c266a8a120e452ba08569045dd8f50cc5ec5dd3" "4561c67b0764aa6343d710bb0a6f3a96319252b2169d371802cc94adfea5cfc9" "5f95ce79b4a8870b3486b04de22ca2e0785b287da8779f512cdd847f42266989" default))
"5aedf993c7220cbbe66a410334239521d8ba91e1815f6ebde59cecc2355d7757"
"75b371fce3c9e6b1482ba10c883e2fb813f2cc1c88be0b8a1099773eb78a7176"
"18a1d83b4e16993189749494d75e6adb0e15452c80c431aca4a867bcc8890ca9"
"8363207a952efb78e917230f5a4d3326b2916c63237c1f61d7e5fe07def8d378"
"51fa6edfd6c8a4defc2681e4c438caf24908854c12ea12a1fbfd4d055a9647a3"
"d5fd482fcb0fe42e849caba275a01d4925e422963d1cd165565b31d3f4189c87"
"4c7228157ba3a48c288ad8ef83c490b94cb29ef01236205e360c2c4db200bb18"
"7b8f5bbdc7c316ee62f271acf6bcd0e0b8a272fdffe908f8c920b0ba34871d98"
"37768a79b479684b0756dec7c0fc7652082910c37d8863c35b702db3f16000f8"
"bf390ecb203806cbe351b966a88fc3036f3ff68cd2547db6ee3676e87327b311"
"e1943fd6568d49ec819ee3711c266a8a120e452ba08569045dd8f50cc5ec5dd3"
"4561c67b0764aa6343d710bb0a6f3a96319252b2169d371802cc94adfea5cfc9"
"5f95ce79b4a8870b3486b04de22ca2e0785b287da8779f512cdd847f42266989"
default))
'(custom-theme-directory "~/.emacs.d/themes") '(custom-theme-directory "~/.emacs.d/themes")
'(ellama-sessions-directory (cache-path "ellama-sessions")) '(ellama-sessions-directory (cache-path "ellama-sessions"))
'(global-font-lock-mode t) '(global-font-lock-mode t)
'(package-selected-packages '(package-selected-packages
'(arduino-mode cargo chatgpt-shell cider dockerfile-mode ellama elpy '(mwim undo-tree slime scpaste racket-mode projectile pelican-mode paredit nixos-options nix-ts-mode nix-modeline nix-mode markdown-mode magit luarocks lua-mode keychain-environment gruvbox-theme geiser exec-path-from-shell elpy ellama c-eldoc auto-complete)))
exec-path-from-shell geiser go go-autocomplete
go-direx go-guru graphviz-dot-mode gruvbox-theme
keychain-environment lua-mode luarocks magit mwim
nord-theme ollama-buddy org-ai paredit pelican-mode
projectile protobuf-mode racket-mode rust-mode
scpaste slime swift-mode swift3-mode terraform-mode
treemacs undo-tree xcscope)))
(custom-set-faces (custom-set-faces
;; custom-set-faces was added by Custom. ;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful. ;; If you edit it by hand, you could mess it up, so be careful.
@ -294,7 +269,7 @@ p :publishing-directory "/ssh:phobos.wntrmute.net:/var/www/sites/tmp/"
test equal test equal
data ( data (
"titan.local" 16 ;; 16" MBP "titan.local" 16 ;; 16" MBP
"ono-sendai" 12 ;; 12.5" X230 "ono-sendai" 13 ;; 12.5" X230
"imladris" 18 ;; 14" X1 carbon "imladris" 18 ;; 14" X1 carbon
))) )))