Split init.el into seperate modules

2025-09-08 12:14:12 +02:00
parent 39d5bafe42
commit e3a5872218
25 changed files with 2306 additions and 783 deletions
--- a/lisp/init-ui.el
+++ b/lisp/init-ui.el
@@ -0,0 +1,100 @@
+;;; init-ui.el --- UI and theme configurations -*- lexical-binding: t -*-
+;;; Commentary:
+;;; User interface settings, themes, and visual configurations
+
+;;; Code:
+
+;;; Display Settings
+(column-number-mode t)
+(global-display-line-numbers-mode t)
+(setq display-line-numbers-type 'relative)
+(tool-bar-mode -1)
+(when (fboundp 'scroll-bar-mode)
+  (scroll-bar-mode -1))
+(global-hl-line-mode 1)
+(show-paren-mode 1)
+(setq show-paren-delay 0)
+
+;; CUA mode for rectangles - use selection mode only to avoid conflicts
+(cua-selection-mode t)  ; Only rectangle selection, not full CUA bindings
+(setq cua-auto-tabify-rectangles nil)
+(setq cua-keep-region-after-copy t)
+
+;; Trailing whitespace
+(setq show-trailing-whitespace t)
+(add-hook 'before-save-hook 'delete-trailing-whitespace)
+
+;; Fill column indicator
+(setq-default display-fill-column-indicator-column 80)
+(setq-default display-fill-column-indicator-character ?\u2502)
+(global-display-fill-column-indicator-mode 1)
+(set-face-attribute 'fill-column-indicator nil :foreground "red")
+
+;; Window dividers for mouse resizing
+(setq mouse-autoselect-window nil)
+(setq window-divider-default-places t)
+(setq window-divider-default-bottom-width 1)
+(setq window-divider-default-right-width 1)
+(window-divider-mode 1)
+
+;;; Font Settings (preserved from custom-set-faces)
+(set-face-attribute 'default nil
+                    :family "0xProto Nerd Font Mono"
+                    :foundry "nil"
+                    :slant 'normal
+                    :weight 'regular
+                    :height 140
+                    :width 'normal)
+
+;;; Diff-hl face customizations
+(with-eval-after-load 'diff-hl
+  (set-face-attribute 'diff-hl-change nil :background "blue3" :foreground "blue3")
+  (set-face-attribute 'diff-hl-delete nil :background "red3" :foreground "red3")
+  (set-face-attribute 'diff-hl-insert nil :background "green3" :foreground "green3"))
+
+;;; Theme Management
+(defvar jens-themes
+  '(developer-dark
+    modus-vivendi
+    modus-operandi)
+  "List of preferred themes.")
+
+(defun load-jens-dark-theme ()
+  "Load the custom jens-dark theme."
+  (interactive)
+  (load-theme 'jens-dark t)
+  (message "Jens Dark theme loaded"))
+
+(defun switch-theme (theme)
+  "Switch to a different theme interactively."
+  (interactive
+   (list (intern (completing-read "Load theme: "
+                                  (mapcar #'symbol-name (custom-available-themes))))))
+  (mapc #'disable-theme custom-enabled-themes)
+  (load-theme theme t)
+  (message "Switched to %s theme" theme))
+
+;; Load default theme
+(when (member 'developer-dark (custom-available-themes))
+  (load-theme 'developer-dark t))
+
+;;; Icons
+(use-package all-the-icons
+  :ensure t
+  :defer t)
+
+(use-package all-the-icons-dired
+  :ensure t
+  :after all-the-icons
+  :hook (dired-mode . all-the-icons-dired-mode))
+
+;;; Which-key for discovering keybindings
+(use-package which-key
+  :ensure t
+  :init (which-key-mode)
+  :config
+  (setq which-key-idle-delay 0.3)
+  (setq which-key-popup-type 'side-window))
+
+(provide 'init-ui)
+;;; init-ui.el ends here