Compare commits

..

5 Commits

Author SHA1 Message Date
3b2f0a4cb4 Fix root finding.
The problem was projectile
2025-01-30 21:19:37 +01:00
6f70238b4e Add comments 2025-01-30 13:05:24 +01:00
59bf980f10 Disable buffer-menu-evil fix
We use ibuffer anyways
2025-01-30 12:57:43 +01:00
18ad943003 Better bindings. Use ibuffer. 2025-01-30 12:55:58 +01:00
ed4bfe44c2 Elecritc + disable some linenumbers + add rainbow 2025-01-29 16:15:17 +01:00

146
.emacs
View File

@ -1,9 +1,15 @@
;;; package --- Summary: Emacs init
;;; Commentary:
;; Main features are LSP support and Evil mode
;;; Code:
;; =========================== ;; ===========================
;; Package Management Setup ;; Package Management Setup
;; =========================== ;; ===========================
(require 'package) (require 'package)
;(setq package-check-signature nil); Add MELPA, Org, and GNU package archives ;; Add MELPA, Org, and GNU package archives
(setq package-archives '(("melpa" . "https://melpa.org/packages/") (setq package-archives '(("melpa" . "https://melpa.org/packages/")
("org" . "https://orgmode.org/elpa/") ("org" . "https://orgmode.org/elpa/")
("gnu" . "https://elpa.gnu.org/packages/"))) ("gnu" . "https://elpa.gnu.org/packages/")))
@ -94,6 +100,7 @@
;; If we cannot detect the theme, default to light ;; If we cannot detect the theme, default to light
(load-theme light-theme t))))) (load-theme light-theme t)))))
;; Apply theme at startup ;; Apply theme at startup
(my/set-theme-based-on-appearance) (my/set-theme-based-on-appearance)
@ -101,13 +108,10 @@
;; UI Customizations ;; UI Customizations
;; =========================== ;; ===========================
;; Revert buffers when the underlying file has changed ;; Use ibuffer, instead of Buffer-menu-mode.
(global-auto-revert-mode 1) (global-set-key (kbd "C-x C-b") 'ibuffer)
;; Electric Pair Mode - Completes parentheses, quotes, etc. ;; Replace yes-no prompts to y-n
(electric-pair-mode 1)
;; Replace yes-no prompts with y-n
(defalias 'yes-or-no-p 'y-or-n-p) (defalias 'yes-or-no-p 'y-or-n-p)
;; Disable unnecessary UI elements ;; Disable unnecessary UI elements
@ -122,6 +126,20 @@
;; Enable visual line mode globally ;; Enable visual line mode globally
(global-visual-line-mode 1) (global-visual-line-mode 1)
;; Disable line numbers for some modes
(dolist (mode '(dired-mode-hook
doc-view-mode-hook
eshell-mode-hook
comint-mode-hook
inferior-python-mode-hook
org-mode-hook
shell-mode-hook
term-mode-hook))
(add-hook mode (lambda () (display-line-numbers-mode 0))))
;; Complete parentheses, quotes, etc
(electric-pair-mode 1)
;; Set Default Font to Iosevka 18pt ;; Set Default Font to Iosevka 18pt
;;(set-face-attribute 'default nil :family "Iosevka" :height 150) ;;(set-face-attribute 'default nil :family "Iosevka" :height 150)
;; Set font ;; Set font
@ -155,35 +173,70 @@
(add-to-list 'exec-path "/opt/homebrew/bin") (add-to-list 'exec-path "/opt/homebrew/bin")
) )
;; =========================== ;; ===========================
;; Evil Mode Configuration ;; Evil Mode Configuration
;; =========================== ;; ===========================
(use-package evil (use-package evil
:ensure t :ensure t
:init :init
(setq evil-want-integration t) (setq evil-want-integration t
(setq evil-want-keybinding nil) evil-want-keybinding nil)
:config :config
(evil-mode 1)) ;; Enable Evil Mode globally (evil-mode 1)
;; Force modes to start in Emacs state
;;(dolist (mode '(;;Buffer-menu-mode
;;;;ibuffer-mode
;;dired-mode
;;help-mode
;;bookmark-bmenu-mode
;;gnus-summary-mode
;;gnus-group-mode
;;package-menu-mode))
;;(evil-set-initial-state mode 'emacs))
;; Correct keybindings for minibuffer maps using actual keymap objects
(dolist (keymap '(minibuffer-local-map
minibuffer-local-ns-map
minibuffer-local-completion-map
minibuffer-local-must-match-map
minibuffer-local-isearch-map))
(define-key (symbol-value keymap) [escape] 'minibuffer-keyboard-quit))
;; Set escape to quit in Evil states
(with-eval-after-load 'evil-maps
(define-key evil-normal-state-map [escape] 'keyboard-quit)
(define-key evil-visual-state-map [escape] 'keyboard-quit))
(keymap-global-set "C-u" 'evil-scroll-up))
(use-package evil-collection (use-package evil-collection
:init
:after evil :after evil
:ensure t :ensure t
:config :config
(evil-collection-init)) (evil-collection-init))
(keymap-global-set "C-u" 'evil-scroll-up) ;;(defun my/buffer-menu-evil-fix ()
;;"Disable Evil's C-n and C-p in `Buffer-menu-mode'."
;;(evil-define-key 'normal Buffer-menu-mode-map
;;(kbd "C-n") nil
;;(kbd "C-p") nil))
;;
;;(add-hook 'buffer-menu-mode-hook #'my/buffer-menu-evil-fix)
;; =========================== ;; ===========================
;; Additional Packages ;; Additional Packages
;; =========================== ;; ===========================
;; Install and enable Helm ;; Skip helm for now, since it interferes with evil
(use-package helm ;;(use-package helm
:config ;;:ensure t
(helm-mode 1)) ;;:init
;;(setq helm-display-function #'helm-default-display-buffer) ;; Fix potential display issues
;;:config
;;(helm-mode 1)
;;(define-key helm-map (kbd "<tab>") 'helm-execute-persistent-action) ;; Better navigation
;;(define-key helm-map (kbd "C-z") 'helm-select-action)) ;; Show actions list
;; Install and enable Company Mode globally ;; Install and enable Company Mode globally
(use-package company (use-package company
@ -194,13 +247,14 @@
(setq company-minimum-prefix-length 1 (setq company-minimum-prefix-length 1
company-idle-delay 0.0)) ;; Show completions immediately company-idle-delay 0.0)) ;; Show completions immediately
;; Install and configure Projectile
(use-package projectile (use-package projectile
:init
(projectile-mode)
:config :config
(projectile-mode +1) (setq projectile-project-root-files '(".git" ".lsp-root"))
(define-key projectile-mode-map (kbd "C-c p") 'projectile-command-map) ;;(setq projectile-project-root-files-bottom-up '(".git" ".clangd"))
(setq projectile-project-search-path '("~/Documents/Code/")) (projectile-mode +1))
)
;; Install and bind Magit ;; Install and bind Magit
(use-package magit (use-package magit
@ -211,6 +265,10 @@
:config :config
(which-key-mode)) (which-key-mode))
(use-package rainbow-delimiters
:ensure t
:hook (prog-mode . rainbow-delimiters-mode))
;; =========================== ;; ===========================
;; LSP Configuration ;; LSP Configuration
;; =========================== ;; ===========================
@ -222,9 +280,35 @@
(rust-mode . lsp)) (rust-mode . lsp))
:commands lsp :commands lsp
:config :config
(setq lsp-prefer-flymake nil) ;; Use lsp-ui and flycheck instead of flymake (setq lsp-prefer-flymake nil)
(setq lsp-enable-snippet t) ;; Disable snippet support if not needed (setq lsp-enable-snippet t)
(setq lsp-headerline-breadcrumb-enable nil)) ;; Disable breadcrumb for performance (setq lsp-headerline-breadcrumb-enable nil)
;; Enhanced project root detection with debug logging
(defun my/lsp-get-project-root ()
"Find the project root by locating the nearest .git directory with validation."
(let* ((current-file (or (buffer-file-name) default-directory))
(root-dir (locate-dominating-file current-file ".git"))
(valid-root (when root-dir
(expand-file-name root-dir))))
(when valid-root
(message "[LSP] Detected project root: %s" valid-root)
valid-root)))
;; Set project root detection for C/C++ before LSP initializes
(add-hook 'c-mode-hook (lambda ()
(setq-local lsp-project-root-function #'my/lsp-get-project-root)
(message "[LSP] C mode root: %s" (my/lsp-get-project-root))))
(add-hook 'c++-mode-hook (lambda ()
(setq-local lsp-project-root-function #'my/lsp-get-project-root)
(message "[LSP] C++ mode root: %s" (my/lsp-get-project-root))))
;; Configure ignored directories for better performance
(setq lsp-file-watch-ignored '("[/\\\\]\\.git$"
"[/\\\\]build$"
"[/\\\\]bin$"
"[/\\\\]tests$")))
(use-package lsp-ui (use-package lsp-ui
:commands lsp-ui-mode :commands lsp-ui-mode
@ -279,6 +363,16 @@
(setq rust-format-on-save t) (setq rust-format-on-save t)
) )
;; ===========================
;; C/C++ Line Length Configuration
;; ===========================
(defun my/c-mode-line-limit ()
"Set 80-character line limit for C/C++ files."
(setq fill-column 80)
(display-fill-column-indicator-mode 1)
)
(add-hook 'c-mode-hook #'my/c-mode-line-limit)
(message "Emacs init loaded.") (message "Emacs init loaded.")
(custom-set-variables (custom-set-variables
;; custom-set-variables was added by Custom. ;; custom-set-variables was added by Custom.
@ -287,7 +381,7 @@
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(helm-minibuffer-history-key "M-p") '(helm-minibuffer-history-key "M-p")
'(package-selected-packages '(package-selected-packages
'(catppuccin-theme lsp-pyright zenburn-theme which-key solarized-theme rust-mode projectile poetry magit lsp-ui lsp-treemacs kotlin-mode helm flycheck evil-collection dracula-theme company better-defaults))) '(helm-evil rainbow-delimiters rainbow-delimiter catppuccin-theme lsp-pyright zenburn-theme which-key solarized-theme rust-mode projectile poetry magit lsp-ui lsp-treemacs kotlin-mode helm flycheck evil-collection dracula-theme company better-defaults)))
(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.