129 lines
4.2 KiB
EmacsLisp
129 lines
4.2 KiB
EmacsLisp
(setq inhibit-startup-message t)
|
|
;; neccesary non-package related config
|
|
(setq auto-save-default nil)
|
|
(setq make-backup-files nil)
|
|
(global-set-key (kbd "<escape>") 'keyboard-escape-quit)
|
|
(set-face-attribute 'default nil :font "IBM Plex Mono" :height 120)
|
|
(scroll-bar-mode -1)
|
|
(tool-bar-mode -1)
|
|
(set-fringe-mode 10)
|
|
(menu-bar-mode -1)
|
|
|
|
(setq org-edit-src-content-indentation 0
|
|
org-src-tab-acts-natively t
|
|
org-src-preserve-indentation t)
|
|
|
|
;; stupid hacks
|
|
(global-set-key (kbd "C-c y") 'clipboard-yank)
|
|
(global-set-key (kbd "C-c x") 'kill-ring-save)
|
|
|
|
;; straight.el bootstrapping
|
|
(defvar bootstrap-version)
|
|
(let ((bootstrap-file
|
|
(expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
|
|
(bootstrap-version 5))
|
|
(unless (file-exists-p bootstrap-file)
|
|
(with-current-buffer
|
|
(url-retrieve-synchronously
|
|
"https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
|
|
'silent 'inhibit-cookies)
|
|
(goto-char (point-max))
|
|
(eval-print-last-sexp)))
|
|
(load bootstrap-file nil 'nomessage))
|
|
|
|
;; package list we want installed
|
|
;; first grab use-package :3
|
|
(straight-use-package 'use-package)
|
|
(use-package el-patch :straight t)
|
|
(use-package monokai-pro-theme
|
|
:straight t
|
|
:config (load-theme 'monokai-pro-spectrum t))
|
|
(use-package doom-modeline
|
|
:straight t
|
|
:init (doom-modeline-mode 1)
|
|
:custom (doom-mode-line-height 14))
|
|
(use-package all-the-icons :straight t)
|
|
(use-package paredit
|
|
:straight t
|
|
:config
|
|
(add-hook 'emacs-lisp-mode-hook #'paredit-mode)
|
|
(add-hook 'lisp-interaction-mode-hook #'paredit-mode)
|
|
(add-hook 'ielm-mode-hook #'paredit-mode)
|
|
(add-hook 'lisp-mode-hook #'paredit-mode)
|
|
(add-hook 'eval-expression-minibuffer-setup-hook #'paredit-mode))
|
|
(use-package which-key
|
|
:straight t
|
|
:config (which-key-mode))
|
|
(use-package projectile
|
|
:straight t
|
|
:init (projectile-mode +1)
|
|
:config (setq projectile-project-search-path '("~/projects"))
|
|
:bind (:map projectile-mode-map
|
|
("s-p" . projectile-command-map)
|
|
("C-c p" . projectile-command-map)))
|
|
|
|
(use-package treemacs
|
|
:straight t
|
|
:init (with-eval-after-load 'winum
|
|
(define-key winum-keymap (kbd "M-0") #'treemacs-select-window))
|
|
:bind
|
|
(:map global-map
|
|
("M-0" . treemacs-select-window)
|
|
("C-x t t" . treemacs)
|
|
("C-x t C-t" . treemacs-find-file)))
|
|
(use-package treemacs-projectile
|
|
:straight t
|
|
:after (treemacs projectile))
|
|
|
|
;; I hate that I need this, but WSL is /special/.
|
|
(when (and (eq system-type 'gnu/linux)
|
|
(getenv "WSLENV"))
|
|
(use-package exec-path-from-shell :straight t)
|
|
(exec-path-from-shell-initialize)
|
|
)
|
|
|
|
;; lsp-mode stuff
|
|
(use-package eglot :straight t
|
|
:config (add-hook 'go-mode-hook 'eglot-ensure))
|
|
(use-package company :straight t
|
|
:config
|
|
(add-hook 'after-init-hook 'global-company-mode)
|
|
(setq company-idle-delay 0)
|
|
(setq company-minimum-prefix-length 1))
|
|
(use-package go-mode :straight t)
|
|
(use-package nix-mode :straight t
|
|
:mode "\\.nix\\'")
|
|
(custom-set-variables
|
|
;; custom-set-variables was added by Custom.
|
|
;; 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.
|
|
'(safe-local-variable-values
|
|
'((eval modify-syntax-entry 43 "'")
|
|
(eval modify-syntax-entry 36 "'")
|
|
(eval modify-syntax-entry 126 "'")
|
|
(eval let
|
|
((root-dir-unexpanded
|
|
(locate-dominating-file default-directory ".dir-locals.el")))
|
|
(when root-dir-unexpanded
|
|
(let*
|
|
((root-dir
|
|
(expand-file-name root-dir-unexpanded))
|
|
(root-dir*
|
|
(directory-file-name root-dir)))
|
|
(unless
|
|
(boundp 'geiser-guile-load-path)
|
|
(defvar geiser-guile-load-path 'nil))
|
|
(make-local-variable 'geiser-guile-load-path)
|
|
(require 'cl-lib)
|
|
(cl-pushnew root-dir* geiser-guile-load-path :test #'string-equal))))
|
|
(eval setq-local guix-directory
|
|
(locate-dominating-file default-directory ".dir-locals.el"))))
|
|
'(warning-suppress-log-types '((comp))))
|
|
(custom-set-faces
|
|
;; custom-set-faces was added by Custom.
|
|
;; 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.
|
|
)
|