493 lines
21 KiB
Org Mode
493 lines
21 KiB
Org Mode
#+PROPERTY: header-args :tangle yes
|
|
|
|
* My Emacs Config
|
|
** Built-in
|
|
*** Performance
|
|
#+begin_src emacs-lisp
|
|
(setq gc-cons-threshold #x40000000)
|
|
(setq read-process-output-max (* 1024 1024 4))
|
|
#+end_src
|
|
|
|
*** Emacs
|
|
#+begin_src emacs-lisp
|
|
(use-package emacs
|
|
:ensure nil
|
|
:custom ;; Set custom variables to configure Emacs behavior.
|
|
(auto-save-default nil) ;; Disable automatic saving of buffers.
|
|
(column-number-mode t) ;; Display the column number in the mode line.
|
|
(create-lockfiles nil) ;; Prevent the creation of lock files when editing.
|
|
(delete-by-moving-to-trash t) ;; Move deleted files to the trash instead of permanently deleting them.
|
|
(delete-selection-mode 1) ;; Enable replacing selected text with typed text.
|
|
(display-line-numbers-type 'relative) ;; Use relative line numbering in programming modes.
|
|
(global-auto-revert-non-file-bUffers t) ;; Automatically refresh non-file buffers.
|
|
(history-length 25) ;; Set the length of the command history.
|
|
(indent-tabs-mode nil) ;; Disable the use of tabs for indentation (use spaces instead).
|
|
(inhibit-startup-message t) ;; Disable the startup message when Emacs launches.
|
|
(initial-scratch-message "") ;; Clear the initial message in the *scratch* buffer.
|
|
(ispell-dictionary "en_US") ;; Set the default dictionary for spell checking.
|
|
(make-backup-files nil) ;; Disable creation of backup files.
|
|
(pixel-scroll-precision-mode t) ;; Enable precise pixel scrolling.
|
|
(pixel-scroll-precision-use-momentum nil) ;; Disable momentum scrolling for pixel precision.
|
|
(ring-bell-function 'ignore) ;; Disable the audible bell.
|
|
(split-width-threshold 300) ;; Prevent automatic window splitting if the window width exceeds 300 pixels.
|
|
(switch-to-buffer-obey-display-actions t) ;; Make buffer switching respect display actions.
|
|
(tab-always-indent 'complete) ;; Make the TAB key complete text instead of just indenting.
|
|
(tab-width 4) ;; Set the tab width to 4 spaces.
|
|
(treesit-font-lock-level 4) ;; Use advanced font locking for Treesit mode.
|
|
(truncate-lines t) ;; Enable line truncation to avoid wrapping long lines.
|
|
(use-dialog-box nil) ;; Disable dialog boxes in favor of minibuffer prompts.
|
|
(use-short-answers t) ;; Use short answers in prompts for quicker responses (y instead of yes)
|
|
(warning-minimum-level :emergency) ;; Set the minimum level of warnings to display.
|
|
|
|
:hook ;; Add hooks to enable specific features in certain modes.
|
|
(prog-mode . display-line-numbers-mode) ;; Enable line numbers in programming modes.
|
|
|
|
:config
|
|
(set-face-attribute 'default nil :family "JetBrainsMono Nerd Font" :height 100)
|
|
(when (eq system-type 'darwin) ;; Check if the system is macOS.
|
|
(setq mac-command-modifier 'meta) ;; Set the Command key to act as the Meta key.
|
|
(set-face-attribute 'default nil :family "JetBrainsMono Nerd Font" :height 130))
|
|
|
|
;; Save manual customizations to a separate file instead of cluttering `init.el'.
|
|
(setq custom-file (locate-user-emacs-file "custom-vars.el")) ;; Specify the custom file path.
|
|
(load custom-file 'noerror 'nomessage) ;; Load the custom file quietly, ignoring errors.
|
|
|
|
:init ;; Initialization settings that apply before the package is loaded.
|
|
(tool-bar-mode -1) ;; Disable the tool bar for a cleaner interface.
|
|
(menu-bar-mode -1) ;; Disable the menu bar for a more streamlined look.
|
|
(when scroll-bar-mode
|
|
(scroll-bar-mode -1)) ;; Disable the scroll bar if it is active.
|
|
(global-hl-line-mode -1) ;; Disable highlight of the current line
|
|
(global-auto-revert-mode 1) ;; Enable global auto-revert mode to keep buffers up to date with their corresponding files.
|
|
(recentf-mode 1) ;; Enable tracking of recently opened files.
|
|
(savehist-mode 1) ;; Enable saving of command history.
|
|
(save-place-mode 1) ;; Enable saving the place in files for easier return.
|
|
(winner-mode 1) ;; Enable winner mode to easily undo window configuration changes.
|
|
(xterm-mouse-mode 1) ;; Enable mouse support in terminal mode.
|
|
(file-name-shadow-mode 1) ;; Enable shadowing of filenames for clarity.
|
|
(modify-coding-system-alist 'file "" 'utf-8))
|
|
#+end_src
|
|
|
|
*** Dired
|
|
#+begin_src emacs-lisp
|
|
(use-package dired
|
|
:ensure nil ;; This is built-in, no need to fetch it.
|
|
:custom
|
|
(dired-listing-switches "-lah --group-directories-first") ;; Display files in a human-readable format and group directories first.
|
|
(dired-dwim-target t) ;; Enable "do what I mean" for target directories.
|
|
(dired-kill-when-opening-new-dired-buffer t)) ;; Close the previous buffer when opening a new `dired' instance.
|
|
#+end_src
|
|
*** Eldoc
|
|
#+begin_src emacs-lisp
|
|
(use-package eldoc
|
|
:ensure nil ;; This is built-in, no need to fetch it.
|
|
:config
|
|
(setq eldoc-idle-delay 0) ;; Automatically fetch doc help
|
|
(setq eldoc-echo-area-use-multiline-p nil) ;; We use the "K" floating help instead
|
|
;; set to t if you want docs on the echo area
|
|
(setq eldoc-echo-area-display-truncation-message nil)
|
|
:init
|
|
(global-eldoc-mode))
|
|
#+end_src
|
|
*** Flymake
|
|
#+begin_src emacs-lisp
|
|
(use-package flymake
|
|
:ensure nil ;; This is built-in, no need to fetch it.
|
|
:defer t
|
|
:hook (prog-mode . flymake-mode)
|
|
:custom
|
|
(flymake-margin-indicators-string
|
|
'((error "!»" compilation-error) (warning "»" compilation-warning) (note "»" compilation-info))))
|
|
#+end_src
|
|
*** Which-key
|
|
#+begin_src emacs-lisp
|
|
(use-package which-key
|
|
:ensure nil ;; This is built-in, no need to fetch it.
|
|
:defer t ;; Defer loading Which-Key until after init.
|
|
:hook
|
|
(after-init . which-key-mode)) ;; Enable which-key mode after initialization.
|
|
#+end_src
|
|
** Packages
|
|
*** Vertico
|
|
- Provides a vertical selection interface for both buffer and minibuffer completions
|
|
#+begin_src emacs-lisp
|
|
(use-package vertico
|
|
:ensure t
|
|
:hook
|
|
(after-init . vertico-mode) ;; Enable vertico after Emacs has initialized.
|
|
:custom
|
|
(vertico-count 10) ;; Number of candidates to display in the completion list.
|
|
(vertico-resize nil) ;; Disable resizing of the vertico minibuffer.
|
|
(vertico-cycle nil)) ;; Do not cycle through candidates when reaching the end of the list.
|
|
#+end_src
|
|
*** Orderless
|
|
- improved pattern matching on completion, works with vertico
|
|
#+begin_src emacs-lisp
|
|
(use-package orderless
|
|
:ensure t
|
|
:defer t ;; Load Orderless on demand.
|
|
:after vertico ;; Ensure Vertico is loaded before Orderless.
|
|
:init
|
|
(setq completion-styles '(orderless basic) ;; Set the completion styles.
|
|
completion-category-defaults nil ;; Clear default category settings.
|
|
completion-category-overrides '((file (styles partial-completion))))) ;; Customize file completion styles.
|
|
|
|
#+end_src
|
|
*** Marginalia
|
|
- adds additional context in completion margins
|
|
#+begin_src emacs-lisp
|
|
(use-package marginalia
|
|
:ensure t
|
|
:hook
|
|
(after-init . marginalia-mode))
|
|
#+end_src
|
|
*** Consult
|
|
- provides completion and narrowing commands for emacs
|
|
#+begin_src emacs-lisp
|
|
(use-package consult
|
|
:ensure t
|
|
:defer t
|
|
:init
|
|
;; Enhance register preview with thin lines and no mode line.
|
|
(advice-add #'register-preview :override #'consult-register-window)
|
|
|
|
;; Use Consult for xref locations with a preview feature.
|
|
(setq xref-show-xrefs-function #'consult-xref
|
|
xref-show-definitions-function #'consult-xref))
|
|
#+end_src
|
|
*** Embark
|
|
- Allows for contextual action menu on any completion candidate
|
|
#+begin_src emacs-lisp
|
|
(use-package embark
|
|
:ensure t
|
|
:defer t)
|
|
#+end_src
|
|
*** Embark-Consult
|
|
- Creates a bridge between embark and consult, allowing for consult features like previews in embark
|
|
#+begin_src emacs-lisp
|
|
(use-package embark-consult
|
|
:ensure t
|
|
:hook
|
|
(embark-collect-mode . consult-preview-at-point-mode)) ;; Enable preview in Embark collect mode.
|
|
#+end_src
|
|
*** Treesit-auto
|
|
- Created automatic mode mapping to treesitter modes
|
|
#+begin_src emacs-lisp
|
|
(use-package treesit-auto
|
|
:ensure t
|
|
:after emacs
|
|
:config
|
|
(treesit-auto-add-to-auto-mode-alist 'all)
|
|
(global-treesit-auto-mode t))
|
|
#+end_src
|
|
*** Corfu
|
|
- text completion framework for emacs
|
|
#+begin_src emacs-lisp
|
|
(use-package corfu
|
|
:ensure t
|
|
:defer t
|
|
:custom
|
|
(corfu-auto t) ;; Only completes when hitting TAB
|
|
(corfu-auto-delay 0) ;; Delay before popup (enable if corfu-auto is t)
|
|
(corfu-auto-prefix 1) ;; Trigger completion after typing 1 character
|
|
(corfu-quit-no-match t) ;; Quit popup if no match
|
|
(corfu-scroll-margin 5) ;; Margin when scrolling completions
|
|
(corfu-max-width 50) ;; Maximum width of completion popup
|
|
(corfu-min-width 50) ;; Minimum width of completion popup
|
|
(corfu-popupinfo-delay 0.5) ;; Delay before showing documentation popup
|
|
:config
|
|
(add-to-list 'corfu-margin-formatters #'nerd-icons-corfu-formatter)
|
|
:init
|
|
(global-corfu-mode)
|
|
(corfu-popupinfo-mode t))
|
|
|
|
|
|
(use-package nerd-icons-corfu
|
|
:ensure t
|
|
:defer t
|
|
:after (:all corfu))
|
|
#+end_src
|
|
*** LSP
|
|
#+begin_src emacs-lisp
|
|
(use-package lsp-mode
|
|
:ensure t
|
|
:defer t
|
|
:hook (;; Replace XXX-mode with concrete major mode (e.g. python-mode)
|
|
(lsp-mode . lsp-enable-which-key-integration) ;; Integrate with Which Key
|
|
((js-mode ;; Enable LSP for JavaScript
|
|
tsx-ts-mode ;; Enable LSP for TSX
|
|
typescript-ts-mode ;; Enable LSP for TypeScript
|
|
css-mode ;; Enable LSP for CSS
|
|
go-ts-mode ;; Enable LSP for Go
|
|
js-ts-mode ;; Enable LSP for JavaScript (TS mode)
|
|
web-mode) . lsp-deferred)) ;; Enable LSP for Web (HTML)
|
|
:commands lsp
|
|
:custom
|
|
(lsp-keymap-prefix "C-c l") ;; Set the prefix for LSP commands.
|
|
(lsp-inlay-hint-enable nil) ;; Usage of inlay hints.
|
|
(lsp-completion-provider :none) ;; Disable the default completion provider.
|
|
(lsp-session-file (locate-user-emacs-file ".lsp-session")) ;; Specify session file location.
|
|
(lsp-log-io nil) ;; Disable IO logging for speed.
|
|
(lsp-idle-delay 0.5) ;; Set the delay for LSP to 0 (debouncing).
|
|
(lsp-keep-workspace-alive nil) ;; Disable keeping the workspace alive.
|
|
;; Core settings
|
|
(lsp-enable-xref t) ;; Enable cross-references.
|
|
(lsp-auto-configure t) ;; Automatically configure LSP.
|
|
(lsp-enable-links nil) ;; Disable links.
|
|
(lsp-eldoc-enable-hover t) ;; Enable ElDoc hover.
|
|
(lsp-enable-file-watchers nil) ;; Disable file watchers.
|
|
(lsp-enable-folding nil) ;; Disable folding.
|
|
(lsp-enable-imenu t) ;; Enable Imenu support.
|
|
(lsp-enable-indentation nil) ;; Disable indentation.
|
|
(lsp-enable-on-type-formatting nil) ;; Disable on-type formatting.
|
|
(lsp-enable-suggest-server-download t) ;; Enable server download suggestion.
|
|
(lsp-enable-symbol-highlighting t) ;; Enable symbol highlighting.
|
|
(lsp-enable-text-document-color t) ;; Enable text document color.
|
|
;; Modeline settings
|
|
(lsp-modeline-code-actions-enable nil) ;; Keep modeline clean.
|
|
(lsp-modeline-diagnostics-enable nil) ;; Use `flymake' instead.
|
|
(lsp-modeline-workspace-status-enable t) ;; Display "LSP" in the modeline when enabled.
|
|
(lsp-signature-doc-lines 1) ;; Limit echo area to one line.
|
|
(lsp-eldoc-render-all t) ;; Render all ElDoc messages.
|
|
;; Completion settings
|
|
(lsp-completion-enable t) ;; Enable completion.
|
|
(lsp-completion-enable-additional-text-edit t) ;; Enable additional text edits for completions.
|
|
(lsp-enable-snippet nil) ;; Disable snippets
|
|
(lsp-completion-show-kind t) ;; Show kind in completions.
|
|
;; Lens settings
|
|
(lsp-lens-enable t) ;; Enable lens support.
|
|
;; Headerline settings
|
|
(lsp-headerline-breadcrumb-enable-symbol-numbers t) ;; Enable symbol numbers in the headerline.
|
|
(lsp-headerline-arrow "▶") ;; Set arrow for headerline.
|
|
(lsp-headerline-breadcrumb-enable-diagnostics nil) ;; Disable diagnostics in headerline.
|
|
(lsp-headerline-breadcrumb-icons-enable nil) ;; Disable icons in breadcrumb.
|
|
;; Semantic settings
|
|
(lsp-semantic-tokens-enable nil)) ;; Disable semantic tokens.
|
|
#+end_src
|
|
|
|
*** Eldoc-box
|
|
#+begin_src emacs-lisp
|
|
(use-package eldoc-box
|
|
:ensure t
|
|
:defer t)
|
|
#+end_src
|
|
*** Diff-hl
|
|
#+begin_src emacs-lisp
|
|
(use-package diff-hl
|
|
:defer t
|
|
:ensure t
|
|
:hook
|
|
(find-file . (lambda ()
|
|
(global-diff-hl-mode) ;; Enable Diff-HL mode for all files.
|
|
(diff-hl-flydiff-mode) ;; Automatically refresh diffs.
|
|
(diff-hl-margin-mode))) ;; Show diff indicators in the margin.
|
|
:custom
|
|
(diff-hl-side 'left) ;; Set the side for diff indicators.
|
|
(diff-hl-margin-symbols-alist '((insert . "┃") ;; Customize symbols for each change type.
|
|
(delete . "-")
|
|
(change . "┃")
|
|
(unknown . "┆")
|
|
(ignored . "i"))))
|
|
#+end_src
|
|
*** Magit
|
|
#+begin_src emacs-lisp
|
|
(use-package magit
|
|
:ensure t
|
|
:config
|
|
(setopt magit-format-file-function #'magit-format-file-nerd-icons) ;; Turns on magit nerd-icons
|
|
:defer t)
|
|
#+end_src
|
|
*** Evil
|
|
#+begin_src emacs-lisp
|
|
(use-package evil
|
|
:ensure t
|
|
:defer t
|
|
:hook
|
|
(after-init . evil-mode)
|
|
:init
|
|
(setq evil-want-integration t) ;; Integrate `evil' with other Emacs features (optional as it's true by default).
|
|
(setq evil-want-keybinding nil) ;; Disable default keybinding to set custom ones.
|
|
(setq evil-want-C-u-scroll t) ;; Makes C-u scroll
|
|
(setq evil-want-C-u-delete t) ;; Makes C-u delete on insert mode
|
|
:config
|
|
(evil-set-undo-system 'undo-tree) ;; Uses the undo-tree package as the default undo system
|
|
(evil-set-leader 'normal (kbd "SPC"))
|
|
(evil-set-leader 'visual (kbd "SPC"))
|
|
(setq evil-want-fine-undo t))
|
|
|
|
|
|
(use-package evil-collection
|
|
:defer t
|
|
:ensure t
|
|
:custom
|
|
(evil-collection-want-find-usages-bindings t)
|
|
:hook
|
|
(evil-mode . evil-collection-init))
|
|
|
|
|
|
(use-package evil-surround
|
|
:ensure t
|
|
:after evil-collection
|
|
:config
|
|
(global-evil-surround-mode 1))
|
|
|
|
|
|
(use-package evil-matchit
|
|
:ensure t
|
|
:after evil-collection
|
|
:config
|
|
(global-evil-matchit-mode 1))
|
|
#+end_src
|
|
*** General
|
|
#+begin_src emacs-lisp
|
|
(use-package general
|
|
:ensure t
|
|
:after (evil evil-collection)
|
|
:init
|
|
(setq general-override-states '(insert
|
|
emacs
|
|
hybrid
|
|
normal
|
|
visual
|
|
motion
|
|
operator
|
|
replace))
|
|
:config
|
|
(general-evil-setup t)
|
|
(general-define-key
|
|
:states 'normal
|
|
"] d" '(flymake-goto-next-error :wk "Goto next error")
|
|
"[ d" '(flymake-goto-prev-error :wk "Goto prev error")
|
|
"] c" '(diff-hl-next-hunk :wk "Goto next hunk")
|
|
"[ c" '(diff-hl-previous-hunk :wk "Goto prev hunk")
|
|
"g r" '(lsp-find-references :wk "Goto references")
|
|
"K" '(eldoc-box-help-at-point :wk "Describe"))
|
|
|
|
(general-create-definer my-leader-def
|
|
:states '(normal insert visual motion emacs)
|
|
:keymaps 'override
|
|
:prefix "SPC"
|
|
:global-prefix "C-SPC")
|
|
|
|
(my-leader-def
|
|
"f" '(:ignore t :wk "Find")
|
|
"f c" '((lambda () (interactive) (find-file "~/.config/emacs/init.el")) :wk "Edit emacs config")
|
|
"f r" '(consult-recent-file :wk "Recent files")
|
|
"f f" '(consult-find :wk "Find Files")
|
|
"f g" '(consult-ripgrep :wk "Ripgrep search in files")
|
|
"f G" '(consult-git-grep :wk "Ripgrep search in files")
|
|
"f l" '(consult-line :wk "Find line")
|
|
"f i" '(consult-imenu :wk "Imenu buffer locations"))
|
|
|
|
(my-leader-def
|
|
"c" '(:ignore t :wk "Code")
|
|
"c a" '(lsp-execute-code-action :wk "Code actions"))
|
|
|
|
(my-leader-def
|
|
"h" '(:ignore t :wk "Help")
|
|
"h v" '(describe-variable :wk "Describe variable")
|
|
"h f" '(describe-function :wk "Describe function")
|
|
"h k" '(describe-key :wk "Describe key"))
|
|
|
|
(my-leader-def
|
|
"p" '(:ignore t :wk "Project")
|
|
"p b" '(consult-project-buffer :wk "Project buffers")
|
|
"p p" '(project-switch-project :wk "Project switch")
|
|
"p f" '(project-find-file :wk "Project find file")
|
|
"p g" '(project-find-regexp :wk "Project grep file")
|
|
"p k" '(project-kill-buffers :wk "Project kill buffers")
|
|
"p d" '(project-dired :wk "Project dired"))
|
|
|
|
(my-leader-def
|
|
"x" '(:ignore t :wk "Flymake")
|
|
"x x" '(consult-flymake :wk "Show diagnostics"))
|
|
|
|
(my-leader-def
|
|
"g" '(:ignore t :wk "Git")
|
|
"g g" '(magit-status :wk "Magit status")
|
|
"g l" '(magit-log-current :wk "Magit log"))
|
|
|
|
(my-leader-def
|
|
"r n" '(lsp-rename :wk "Rename"))
|
|
|
|
(my-leader-def
|
|
"u" '(undo-tree-visualize :wk "Undo-tree")))
|
|
#+end_src
|
|
*** Undo tree
|
|
#+begin_src emacs-lisp
|
|
(use-package undo-tree
|
|
:defer t
|
|
:ensure t
|
|
:hook
|
|
(after-init . global-undo-tree-mode)
|
|
:init
|
|
(setq undo-tree-visualizer-timestamps t
|
|
undo-tree-visualizer-diff t
|
|
undo-limit 800000 ;; Limit for undo entries.
|
|
undo-strong-limit 12000000 ;; Strong limit for undo entries.
|
|
undo-outer-limit 120000000) ;; Outer limit for undo entries.
|
|
:config
|
|
(setq undo-tree-history-directory-alist '(("." . "~/.emacs.d/.cache/undo"))))
|
|
#+end_src
|
|
*** Dotenv mode
|
|
#+begin_src emacs-lisp
|
|
(use-package dotenv-mode
|
|
:defer t
|
|
:ensure t)
|
|
#+end_src
|
|
*** Doom Modeline
|
|
#+begin_src emacs-lisp
|
|
(use-package doom-modeline
|
|
:ensure t
|
|
:defer t
|
|
:custom
|
|
(doom-modeline-buffer-file-name-style 'buffer-name) ;; Set the buffer file name style to just the buffer name (without path).
|
|
(doom-modeline-project-detection 'project) ;; Enable project detection for displaying the project name.
|
|
(doom-modeline-buffer-name t) ;; Show the buffer name in the mode line.
|
|
(doom-modeline-vcs-max-length 25) ;; Limit the version control system (VCS) branch name length to 25 characters.
|
|
:config
|
|
(setq doom-modeline-icon t) ;; Enable icons in the mode line if nerd fonts are used.
|
|
:hook
|
|
(after-init . doom-modeline-mode))
|
|
#+end_src
|
|
*** Nerd icons
|
|
#+begin_src emacs-lisp
|
|
(use-package nerd-icons
|
|
:ensure t
|
|
:defer t)
|
|
|
|
(use-package nerd-icons-dired
|
|
:ensure t ;; Ensure the package is installed.
|
|
:defer t ;; Load the package only when needed to improve startup time.
|
|
:hook
|
|
(dired-mode . nerd-icons-dired-mode))
|
|
|
|
(use-package nerd-icons-completion
|
|
:ensure t ;; Ensure the package is installed.
|
|
:after (:all nerd-icons marginalia) ;; Load after `nerd-icons' and `marginalia' to ensure proper integration.
|
|
:config
|
|
(nerd-icons-completion-mode) ;; Activate nerd icons for completion interfaces.
|
|
(add-hook 'marginalia-mode-hook #'nerd-icons-completion-marginalia-setup)) ;; Setup icons in the marginalia mode for enhanced completion display.
|
|
#+end_src
|
|
*** Path fixes
|
|
#+begin_src emacs-lisp
|
|
(use-package exec-path-from-shell
|
|
:ensure t
|
|
:init
|
|
(exec-path-from-shell-initialize))
|
|
|
|
(use-package envrc
|
|
:ensure t
|
|
:init
|
|
(setq envrc-show-summary-in-minibuffer nil)
|
|
:hook
|
|
(after-init . envrc-global-mode))
|
|
#+end_src
|
|
*** Theme
|
|
#+begin_src emacs-lisp
|
|
(use-package modus-themes
|
|
:ensure t
|
|
:config
|
|
(load-theme 'modus-operandi t))
|
|
#+end_src
|