add modules

6 files changed, 1066 insertions, 0 deletions

diff --git a/home-manager/homeModules/emacs/aliases b/home-manager/homeModules/emacs/aliases
new file mode 100644
index 0000000..26dc4e1
--- /dev/null
+++ b/home-manager/homeModules/emacs/aliases
@@ -0,0 +1,2 @@
+alias nr sudo nixos-rebuild switch --flake /home/jerpo/nixfiles#ltrr-mini
+alias hr home-manager switch --flake /home/jerpo/nixfiles
diff --git a/home-manager/homeModules/emacs/config.org b/home-manager/homeModules/emacs/config.org
new file mode 100644
index 0000000..bb438c8
--- /dev/null
+++ b/home-manager/homeModules/emacs/config.org
@@ -0,0 +1,989 @@
+#+Title: spl3g's Emacs config
+#+AUTHOR: spl3g
+#+STARTUP: showeverything
+#+OPTIONS: toc:2
+
+* Table Of Contents :toc:
+- [[#progs-to-load-first][Progs to load first]]
+  - [[#optimisations][Optimisations]]
+  - [[#elpaca][elpaca]]
+  - [[#native-comp-warnings][Native comp warnings]]
+  - [[#save-history][Save history]]
+  - [[#meow-mode][Meow mode]]
+  - [[#general-keybindings][General keybindings]]
+  - [[#which-key][Which key]]
+- [[#gui-tweaks][GUI tweaks]]
+  - [[#disable-gui-shit][Disable gui shit]]
+  - [[#fonts][Fonts]]
+  - [[#display-line-numbers][Display line numbers]]
+  - [[#theme][Theme]]
+  - [[#icons][Icons]]
+  - [[#modeline][Modeline]]
+  - [[#scroll][Scroll]]
+  - [[#dashboard][Dashboard]]
+  - [[#disable-ring-bell][Disable ring-bell]]
+  - [[#indent-guide][Indent guide]]
+  - [[#misc][Misc]]
+- [[#projects][Projects]]
+- [[#org-mode][Org mode]]
+  - [[#enabling-toc][Enabling toc]]
+  - [[#org-bullets][Org bullets]]
+  - [[#auto-tangle][Auto-tangle]]
+  - [[#org-download][Org-download]]
+- [[#better-ux][Better UX]]
+  - [[#vertico][Vertico]]
+  - [[#consult][Consult]]
+  - [[#embark][Embark]]
+- [[#eshell][Eshell]]
+  - [[#fish-completions][Fish completions]]
+  - [[#eat][Eat]]
+- [[#lsp][LSP]]
+  - [[#flycheck][Flycheck]]
+  - [[#lsp-ui][lsp-ui]]
+  - [[#lsp-booster][LSP-booster]]
+  - [[#corfu][Corfu]]
+  - [[#tree-sitter][Tree-sitter]]
+  - [[#snippets][Snippets]]
+  - [[#languages][Languages]]
+  - [[#direnv][Direnv]]
+  - [[#better-scratch][Better scratch]]
+- [[#dired][Dired]]
+  - [[#bindings][Bindings]]
+  - [[#dired-hacks][Dired hacks]]
+- [[#sql][Sql]]
+- [[#additional-apps][Additional apps]]
+  - [[#telegram-lol][Telegram lol]]
+  - [[#magit][Magit]]
+  - [[#exwm][EXWM]]
+  - [[#jupyter][Jupyter]]
+  - [[#orgnote][Orgnote]]
+  - [[#copilot][Copilot]]
+
+* Progs to load first
+** Optimisations
+#+begin_src emacs-lisp
+  (setq gc-cons-threshold 100000000)
+  (setq read-process-output-max (* 1024 1024))
+#+end_src
+** elpaca
+#+begin_src emacs-lisp
+  (defvar elpaca-installer-version 0.7)
+  (defvar elpaca-directory (expand-file-name "elpaca/" user-emacs-directory))
+  (defvar elpaca-builds-directory (expand-file-name "builds/" elpaca-directory))
+  (defvar elpaca-repos-directory (expand-file-name "repos/" elpaca-directory))
+  (defvar elpaca-order '(elpaca :repo "https://github.com/progfolio/elpaca.git"
+				:ref nil
+				:files (:defaults "elpaca-test.el" (:exclude "extensions"))
+				:build (:not elpaca--activate-package)))
+  (let* ((repo  (expand-file-name "elpaca/" elpaca-repos-directory))
+	 (build (expand-file-name "elpaca/" elpaca-builds-directory))
+	 (order (cdr elpaca-order))
+	 (default-directory repo))
+    (add-to-list 'load-path (if (file-exists-p build) build repo))
+    (unless (file-exists-p repo)
+      (make-directory repo t)
+      (when (< emacs-major-version 28) (require 'subr-x))
+      (condition-case-unless-debug err
+	  (if-let ((buffer (pop-to-buffer-same-window "*elpaca-bootstrap*"))
+		   ((zerop (call-process "git" nil buffer t "clone"
+					 (plist-get order :repo) repo)))
+		   ((zerop (call-process "git" nil buffer t "checkout"
+					 (or (plist-get order :ref) "--"))))
+		   (emacs (concat invocation-directory invocation-name))
+		   ((zerop (call-process emacs nil buffer nil "-Q" "-L" "." "--batch"
+					 "--eval" "(byte-recompile-directory \".\" 0 'force)")))
+		   ((require 'elpaca))
+		   ((elpaca-generate-autoloads "elpaca" repo)))
+	      (progn (message "%s" (buffer-string)) (kill-buffer buffer))
+	    (error "%s" (with-current-buffer buffer (buffer-string))))
+	((error) (warn "%s" err) (delete-directory repo 'recursive))))
+    (unless (require 'elpaca-autoloads nil t)
+      (require 'elpaca)
+      (elpaca-generate-autoloads "elpaca" repo)
+      (load "./elpaca-autoloads")))
+  (add-hook 'after-init-hook #'elpaca-process-queues)
+  (elpaca `(,@elpaca-order))
+
+  (elpaca elpaca-use-package
+    ;; Enable :elpaca use-package keyword.
+    (elpaca-use-package-mode)
+    ;; Assume :elpaca t unless otherwise specified.
+    (setq elpaca-use-package-by-default t))
+
+  (elpaca-wait)
+#+end_src
+** Native comp warnings
+#+begin_src emacs-lisp
+ (setq native-comp-async-report-warnings-errors nil)
+#+end_src
+** Save history
+#+begin_src emacs-lisp
+  (use-package savehist :ensure nil
+    :init
+    (setq savehist-file "~/.config/emacs/var/savehist.el")
+    :config
+    (setq history-length 500)
+    (setq savehist-additional-variables '(kill-ring search-ring))
+    (savehist-mode t))
+#+end_src
+** Meow mode
+#+begin_src emacs-lisp
+  (use-package meow
+    :config
+    (defun meow-negative-find ()
+      "Find text backward."
+      (interactive)
+      (let ((current-prefix-arg -1))
+        (call-interactively #'meow-find)))
+
+    (defun meow-negative-till ()
+      "Find text backward."
+      (interactive)
+      (let ((current-prefix-arg -1))
+        (call-interactively #'meow-till)))
+
+    (defun meow-setup ()
+      (setq meow-cheatsheet-layout meow-cheatsheet-layout-qwerty)
+      (meow-motion-overwrite-define-key
+       '("j" . meow-next)
+       '("k" . meow-prev)
+       '("<escape>" . ignore))
+      (meow-leader-define-key
+       ;; SPC j/k will run the original command in MOTION state.
+       '("j" . "H-j")
+       '("k" . "H-k")
+       ;; Use SPC (0-9) for digit arguments.
+       '("1" . meow-digit-argument)
+       '("2" . meow-digit-argument)
+       '("3" . meow-digit-argument)
+       '("4" . meow-digit-argument)
+       '("5" . meow-digit-argument)
+       '("6" . meow-digit-argument)
+       '("7" . meow-digit-argument)
+       '("8" . meow-digit-argument)
+       '("9" . meow-digit-argument)
+       '("0" . meow-digit-argument)
+       '("/" . meow-keypad-describe-key)
+       '("?" . meow-cheatsheet)
+       '("bk" . kill-this-buffer))
+      (meow-normal-define-key
+       '("0" . meow-expand-0)
+       '("9" . meow-expand-9)
+       '("8" . meow-expand-8)
+       '("7" . meow-expand-7)
+       '("6" . meow-expand-6)
+       '("5" . meow-expand-5)
+       '("4" . meow-expand-4)
+       '("3" . meow-expand-3)
+       '("2" . meow-expand-2)
+       '("1" . meow-expand-1)
+       '("-" . negative-argument)
+       '(";" . meow-reverse)
+       '("," . meow-inner-of-thing)
+       '("." . meow-bounds-of-thing)
+       '("[" . meow-beginning-of-thing)
+       '("]" . meow-end-of-thing)
+       '("a" . meow-append)
+       '("A" . meow-open-below)
+       '("b" . meow-back-word)
+       '("B" . meow-back-symbol)
+       '("c" . meow-change)
+       '("d" . meow-delete)
+       '("D" . meow-backward-delete)
+       '("e" . meow-next-word)
+       '("E" . meow-next-symbol)
+       '("f" . meow-find)
+       '("F" . meow-negative-find)
+       '("g" . meow-cancel-selection)
+       '("G" . meow-grab)
+       '("h" . meow-left)
+       '("H" . meow-left-expand)
+       '("i" . meow-insert)
+       '("I" . meow-open-above)
+       '("j" . meow-next)
+       '("J" . meow-next-expand)
+       '("k" . meow-prev)
+       '("K" . meow-prev-expand)
+       '("l" . meow-right)
+       '("L" . meow-right-expand)
+       '("m" . meow-join)
+       '("n" . meow-search)
+       '("o" . meow-block)
+       '("O" . meow-to-block)
+       '("p" . meow-yank)
+       '("q" . meow-quit)
+       '("Q" . meow-goto-line)
+       '("r" . meow-replace)
+       '("R" . meow-swap-grab)
+       '("s" . meow-kill)
+       '("t" . meow-till)
+       '("T" . meow-negative-till)
+       '("u" . meow-undo)
+       '("U" . meow-undo-in-selection)
+       '("v" . meow-visit)
+       '("w" . meow-mark-word)
+       '("W" . meow-mark-symbol)
+       '("x" . meow-line)
+       '("X" . meow-goto-line)
+       '("y" . meow-save)
+       '("Y" . meow-sync-grab)
+       '("z" . meow-pop-selection)
+       '("'" . repeat)
+       '("<escape>" . ignore)))
+    (meow-setup)
+    (meow-global-mode 1))
+#+end_src
+** General keybindings
+#+begin_src emacs-lisp
+  (use-package general
+    :demand t
+    :config
+    ;; SPC as the global leader key
+    (general-create-definer spl3g/leader-keys
+      :prefix "C-c")
+
+    (spl3g/leader-keys
+      ;; Buffers
+      "b" '(:ignore t :wk "Buffer")
+      "bi" '(ibuffer :wk "ibuffer")
+      "bk" '(kill-this-buffer :wk "Kill this buffer")
+      "bn" '(next-buffer :wk "Next buffer")
+      "bp" '(previous-buffer :wk "Previous buffer")
+      "br" '(revert-buffer :wk "Reload buffer")
+      "." '(find-file :wk "Find file")
+      ;; Splits
+      "w" '(:ignore t :wk "Splits")
+      "wv" '(split-window-right :wk "Split vertical")
+      "ws" '(split-window-below :wk "Split")
+      "ww" '(other-window :wk "Cycle throug windows")
+      "wc" '(delete-window :wk "Close window")
+      "wd" '(delete-window :wk "Close window")
+      "wl" '(windmove-right :wk "")
+      "wj" '(windmove-down :wk "")
+      "wk" '(windmove-up :wk "")
+      "wh" '(windmove-left :wk "")
+      "wo" '(delete-other-windows :wk "")
+      ;; Files
+      "f" '(:ignore t :wk "Files")
+      "fc" '((lambda () (interactive) (find-file "~/.config/emacs/config.org")) :wk "Edit emacs config")
+      "fu" '(crux-sudo-edit :wk "Sudo edit file")
+      ;; Compilation
+      "r" '(recompile :wk "Recompile")))
+  (elpaca-wait)
+#+end_src
+** Which key
+#+begin_src emacs-lisp
+  (use-package which-key
+    :init
+    (which-key-mode))
+#+end_src
+* GUI tweaks
+** Disable gui shit
+#+begin_src emacs-lisp
+  (defun spl3g/disable-scroll-bars (frame)
+    (modify-frame-parameters frame
+                             '((vertical-scroll-bars . nil)
+                               (horizontal-scroll-bars . nil))))
+  (add-hook 'after-make-frame-functions 'spl3g/disable-scroll-bars)
+#+end_src
+** Fonts
+#+begin_src emacs-lisp
+  (setq default-frame-alist '((font . "Sauce Code Pro Nerd Font")))
+  (set-face-attribute 'default nil
+		      :font "SauceCodePro Nerd Font"
+		      :height 110
+		      :weight 'medium)
+  (set-face-attribute 'fixed-pitch nil
+		      :font "SauceCodePro Nerd Font"
+		      :height 110
+		      :weight 'medium)
+  (set-face-attribute 'variable-pitch nil
+		      :font "Rubik"
+		      :height 110
+		      :weight 'medium)
+  (set-face-attribute 'font-lock-comment-face nil
+		      :slant 'italic)
+  (set-face-attribute 'font-lock-keyword-face nil
+		      :weight 'bold)
+#+end_src
+** Display line numbers
+#+begin_src emacs-lisp
+(add-hook 'prog-mode-hook 'display-line-numbers-mode)
+(visual-line-mode 1)
+#+end_src
+
+** Theme
+#+begin_src emacs-lisp
+  (use-package catppuccin-theme
+    :config
+    ;; (setq catppuccin-flavor 'macchiato)
+    (load-theme 'catppuccin t))
+  ;; (use-package monokai-pro-theme
+  ;;   :config
+  ;;   (load-theme 'monokai-pro-octagon t))
+#+end_src
+** Icons
+#+begin_src emacs-lisp
+  (use-package all-the-icons
+    :ensure t
+    :if (display-graphic-p))
+#+end_src
+** Modeline
+#+begin_src emacs-lisp
+  (defvar after-load-theme-hook nil
+    "Hook run after a color theme is loaded using `load-theme'.")
+  (defadvice load-theme (after run-after-load-theme-hook activate)
+    "Run `after-load-theme-hook'."
+    (run-hooks 'after-load-theme-hook))
+
+  (defadvice consult-theme (after run-after-load-theme-hook activate)
+    "Run `after-load-theme-hook'."
+    (run-hooks 'after-load-theme-hook))
+
+  (defun widen-mode-line ()
+    "Widen the mode-line."
+    (interactive)
+    (set-face-attribute 'mode-line nil
+			:inherit 'mode-line
+			:box '(:line-width 8 :style flat-button))
+    (set-face-attribute 'mode-line-inactive nil
+			:inherit 'mode-line-inactive
+			:box '(:line-width 8 :style flat-button)))
+  
+  (add-hook 'after-load-theme-hook 'widen-mode-line)
+
+  (use-package mood-line
+    ;; Enable mood-line
+    :config
+    (mood-line-mode)
+    :custom
+    (mood-line-segment-modal-meow-state-alist
+     '((normal "N" . mood-line-meow-normal)
+       (insert "I" . mood-line-meow-insert)
+       (keypad "K" . mood-line-meow-keypad)
+       (beacon "B" . mood-line-meow-beacon)
+       (motion "M" . mood-line-meow-motion)))
+    (mood-line-glyph-alist mood-line-glyphs-fira-code)
+    :custom-face
+    (mood-line-meow-beacon ((t (:inherit 'font-lock-function-name-face :weight bold))))
+    (mood-line-meow-insert ((t (:inherit 'font-lock-string-face :weight bold))))
+    (mood-line-meow-keypad ((t (:inherit 'font-lock-keyword-face :weight bold))))
+    (mood-line-meow-motion ((t (:inherit 'font-lock-constant-face :weight bold))))
+    (mood-line-meow-normal ((t (:inherit 'font-lock-variable-use-face :weight bold)))))
+#+end_src
+** Scroll
+#+begin_src emacs-lisp
+  (setq scroll-margin 5
+        scroll-conservatively 101
+        mouse-wheel-progressive-speed nil)
+#+end_src
+
+** Dashboard
+#+begin_src emacs-lisp
+      (use-package dashboard
+        :init
+        (dashboard-setup-startup-hook)
+        :config
+        (setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*")))
+        (setq dashboard-banner-logo-title "Yep, it's emacs, not vim")
+        (setq dashboard-startup-banner 'official)
+        (setq dashboard-center-content t)
+        (setq dashboard-items '((projects . 5)
+                                (recents . 5)
+                                (bookmarks . 5)
+                                (registers . 5))))
+#+end_src
+** Disable ring-bell
+#+begin_src emacs-lisp
+  (setq ring-bell-function 'ignore)
+#+end_src
+** Indent guide
+#+begin_src emacs-lisp
+  (use-package indent-guide
+    :hook (prog-mode . indent-guide-mode))
+#+end_src
+** Misc
+#+begin_src emacs-lisp
+  (setq window-resize-pixelwise t)
+  (setq frame-resize-pixelwise t)
+  (save-place-mode t)
+  (defalias 'yes-or-no #'y-or-n-p)
+#+end_src
+* Projects
+#+begin_src emacs-lisp
+  (use-package projectile
+    :init
+    (projectile-mode)
+    :config
+    (define-key projectile-mode-map (kbd "C-c p") 'projectile-command-map))
+#+end_src
+* Org mode
+#+begin_src emacs-lisp
+  (add-hook 'org-mode-hook 'org-indent-mode)
+  (require 'org-tempo)
+  (use-package org-mode :ensure nil
+    :mode "\\.org\\'")
+#+end_src
+** Enabling toc
+#+begin_src emacs-lisp
+  (use-package toc-org
+    :ghook 'org-mode-hook)
+#+end_src
+** Org bullets
+#+begin_src emacs-lisp
+  (use-package org-bullets
+    :ghook 'org-mode-hook)
+#+end_src
+** Auto-tangle
+#+begin_src emacs-lisp
+  (use-package org-auto-tangle
+    :ghook 'org-mode-hook)
+#+end_src
+** Org-download
+#+begin_src emacs-lisp
+  (use-package org-download
+    :ghook 'org-mode-hook)
+#+end_src
+* Better UX
+** Vertico
+#+begin_src emacs-lisp
+  (use-package vertico
+    :init
+    (vertico-mode)
+    :general
+    (:keymaps 'vertico-map
+              "M-j" 'vertico-next
+              "M-k" 'vertico-previous
+              "RET" 'vertico-directory-enter
+              "DEL" 'vertico-directory-delete-char
+              "M-DEL" 'vertico-directory-delete-word))
+  
+  (use-package emacs :ensure nil
+    :init
+    ;; Add prompt indicator to `completing-read-multiple'.
+    ;; We display [CRM<separator>], e.g., [CRM,] if the separator is a comma.
+    (defun crm-indicator (args)
+      (cons (format "[CRM%s] %s"
+                    (replace-regexp-in-string
+                     "\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" ""
+                     crm-separator)
+                    (car args))
+            (cdr args)))
+    (advice-add #'completing-read-multiple :filter-args #'crm-indicator)
+
+    ;; Do not allow the cursor in the minibuffer prompt
+    (setq minibuffer-prompt-properties
+          '(read-only t cursor-intangible t face minibuffer-prompt))
+    (add-hook 'minibuffer-setup-hook #'cursor-intangible-mode)
+
+    ;; Emacs 28: Hide commands in M-x which do not work in the current mode.
+    ;; Vertico commands are hidden in normal buffers.
+    ;; (setq read-extended-command-predicate
+    ;;       #'command-completion-default-include-p)
+
+    ;; Enable recursive minibuffers
+    (setq enable-recursive-minibuffers t))
+#+end_src
+*** Ordeless
+#+begin_src emacs-lisp
+  (use-package orderless
+    :init
+    (setq completion-styles '(orderless basic)
+          completion-category-defaults nil
+          completion-category-overrides '((file (styles partial-completion)))))
+#+end_src
+*** Marginalia
+#+begin_src emacs-lisp
+  (use-package marginalia
+    :bind (:map minibuffer-local-map
+                ("M-A" . marginalia-cycle))
+    :init
+    (marginalia-mode))
+#+end_src
+** Consult
+#+begin_src emacs-lisp
+  (use-package consult
+    :general
+    ;; my binds
+    (:prefix "C-c"
+             "f r" 'consult-recent-file
+             "," 'consult-buffer)
+
+    ;; general
+    (:prefix "C-c"
+             "k" 'consult-kmacro
+             "m" 'consult-man
+             "i" 'consult-info)
+
+    ;; one lonely command that i dont use
+    (:prefix "C-x"
+             "M-:" 'consult-complex-command)
+
+    ;; 'registers' and pop
+    ("M-#" 'consult-register-load
+     "M-'" 'consult-register-store
+     "M-y" 'consult-yank-pop)
+
+    ;; 'goto'
+    (:prefix "M-g"
+             "" '(:ignore t :wk "consult goto")
+             "c" 'consult-compile-error
+             "f" 'consult-goto-line
+             "M-g" 'consult-goto-line
+             "o" 'consult-outline)
+
+    ;; 'search'
+    (:prefix "M-s"
+             "" '(:ignore t :wk "consult search")
+             "d" 'consult-fd
+             "r" 'consult-ripgrep
+             "g" 'consult-git-grep
+             "l" 'consult-line
+             "L" 'consult-line-multi
+             "k" 'consult-keep-lines
+             "u" 'consult-focus-lines
+             "e" 'consult-isearch-history)
+
+    ;; Isearch
+    (:prefix "M-s" :keymaps 'isearch-mode-map
+             "e" 'consult-isearch-history
+             "l" 'consult-line
+             "L" 'consult-line-multi)
+    (:keymaps 'isearch-mode-map
+              "M-e" 'consult-isearch-history
+              "M-r" 'consult-history)
+
+    ;; Minibuffer history
+    (:keymaps 'minibufer-local-map
+              "M-s" 'consult-history
+              "M-r" 'consult-history)
+    :hook
+    (completion-list-mode . consult-preview-at-point-mode)
+    (eshell-mode . (lambda ()
+                     (keymap-set eshell-mode-map "M-h" 'consult-history)))
+
+    :init
+    (setq register-preview-delay 0
+          register-preview-function #'consult-register-format)
+
+    (advice-add #'register-preview :override #'consult-register-window)
+
+    :config
+    (consult-customize
+     consult-theme :preview-key '(:debounce 0.2 any)
+     consult-ripgrep consult-git-grep consult-grep
+     consult-bookmark consult-recent-file consult-xref
+     consult--source-bookmark consult--source-file-register
+     consult--source-recent-file consult--source-project-recent-file
+     ;; :preview-key "M-."
+     :preview-key '(:debounce 0.4 any))
+    (setq consult-narrow-key "C-+"))
+
+#+end_src
+*** Consult-lsp
+#+begin_src emacs-lisp
+  (use-package consult-lsp
+    :after consult lsp
+    :general
+    (:keymaps 'lsp-mode-map :prefix "M-g"
+              "f" 'consult-lsp-diagnostics
+              "s" 'consult-lsp-symbols
+              "S" 'consult-lsp-file-symbols))
+#+end_src
+*** Consult-dir
+#+begin_src emacs-lisp
+  (use-package consult-dir
+    :ensure t
+    :general
+    (:prefix "C-x" :keymaps 'vertico-map
+             "C-d" '('consult-dir :keymaps nil)
+             "C-d" 'consult-dir
+             "C-j" 'consult-dir-jump-file))
+#+end_src
+** Embark
+#+begin_src emacs-lisp
+  (use-package embark
+    :ensure t
+
+    :bind
+    (("C-." . embark-act)         ;; pick some comfortable binding
+     ("C-;" . embark-dwim)        ;; good alternative: M-.
+     ("C-h B" . embark-bindings)) ;; alternative for `describe-bindings'
+
+    :init
+
+    ;; Optionally replace the key help with a completing-read interface
+    (setq prefix-help-command #'embark-prefix-help-command)
+
+    ;; Show the Embark target at point via Eldoc. You may adjust the
+    ;; Eldoc strategy, if you want to see the documentation from
+    ;; multiple providers. Beware that using this can be a little
+    ;; jarring since the message shown in the minibuffer can be more
+    ;; than one line, causing the modeline to move up and down:
+
+    ;; (add-hook 'eldoc-documentation-functions #'embark-eldoc-first-target)
+    ;; (setq eldoc-documentation-strategy #'eldoc-documentation-compose-eagerly)
+
+    :config
+
+    ;; Hide the mode line of the Embark live/completions buffers
+    (add-to-list 'display-buffer-alist
+                 '("\\`\\*Embark Collect \\(Live\\|Completions\\)\\*"
+                   nil
+                   (window-parameters (mode-line-format . none)))))
+
+  ;; Consult users will also want the embark-consult package.
+  (use-package embark-consult
+    :ensure t ; only need to install it, embark loads it after consult if found
+    :hook config.el
+    (embark-collect-mode . consult-preview-at-point-mode))
+#+end_src
+** Pairs
+#+begin_src emacs-lisp
+  (electric-pair-mode 1)
+#+end_src
+*** Debugging
+#+begin_src emacs-lisp
+  (use-package dape
+    :config
+    (setq dape-cwd-fn 'projectile-project-root))
+#+end_src
+*** Truncate lines
+#+begin_src emacs-lisp
+  (global-visual-line-mode t)
+#+end_src
+*** No littering
+#+begin_src emacs-lisp
+  (use-package no-littering)
+#+end_src
+*** Rainbow delimiters
+#+begin_src emacs-lisp
+  (use-package rainbow-delimiters
+    :hook (prog-mode . rainbow-delimiters-mode))
+#+end_src
+*** Crux
+#+begin_src emacs-lisp
+  (use-package crux
+    :bind (("C-c o t" . crux-visit-shell-buffer)))
+#+end_src
+*** Better *help*
+#+begin_src emacs-lisp
+  (use-package helpful
+    :bind (("C-h f" . helpful-callable)
+           ("C-h v" . helpful-variable)
+           ("C-h k" . helpful-key)
+           ("C-h x" . helpful-command)
+           ("C-c C-d" . helpful-at-point)
+           ("C-h F" . helpful-function)))
+#+end_src
+*** Better other-window
+#+begin_src emacs-lisp
+  (use-package ace-window
+    :bind (("C-x o" . ace-window)
+           ("C-c w w" . ace-window)))
+#+end_src
+*** Undo Tree
+#+begin_src emacs-lisp
+  (use-package vundo
+    :custom
+    (vundo-glyph-alist vundo-unicode-symbols)
+    (vundo-compact-display t))
+#+end_src
+* Eshell
+#+begin_src emacs-lisp
+  (add-hook 'eshell-mode-hook
+          (lambda ()
+            (setq-local corfu-auto nil)
+            (corfu-mode)))
+  (add-to-list 'display-buffer-alist
+               '("*eshell*"
+                (display-buffer-reuse-window display-buffer-at-bottom)
+                (window-height . 0.35)))
+#+end_src
+** Fish completions
+#+begin_src emacs-lisp
+  (use-package fish-completion
+    :hook (eshell-mode . fish-completion-mode))
+#+end_src
+** Eat
+#+begin_src emacs-lisp
+  (use-package eat
+    :hook (eshell-mode . eat-eshell-mode)
+    :custom
+    (eat-enable-auto-line-mode t))
+#+end_src
+* LSP
+#+begin_src emacs-lisp
+  (use-package lsp-mode
+    :custom
+    (lsp-completion-provider :none)
+    :init
+    (defun lsp-mode-setup-completion ()
+      (setf (alist-get 'styles (alist-get 'lsp-capf completion-category-defaults))
+	    '(orderless)))
+
+    :hook
+    (lsp-completion-mode . lsp-mode-setup-completion))
+
+
+  (setq lsp-sqls-workspace-config-path nil
+	lsp-sqls-connections
+	'(((driver . "postgresql") (dataSourceName . "host=127.0.0.1 port=38746 user=sirius_2024 password=changed dbname=postgres sslmode=disable"))))
+#+end_src
+** Flycheck
+#+begin_src emacs-lisp
+  (use-package flycheck
+    :init
+    (global-flycheck-mode)
+    :config
+    (add-to-list 'display-buffer-alist
+		 '("\\*Flycheck"
+		   (display-buffer-reuse-window display-buffer-at-bottom)
+		   (reusable-frames . visible)
+		   (window-height . 0.35))))
+#+end_src
+** lsp-ui
+#+begin_src emacs-lisp
+  (use-package lsp-ui
+    :custom
+    (lsp-ui-doc-show-with-mouse nil))
+#+end_src
+** LSP-booster
+#+begin_src emacs-lisp
+  (defun lsp-booster--advice-json-parse (old-fn &rest args)
+    "Try to parse bytecode instead of json."
+    (or
+     (when (equal (following-char) ?#)
+       (let ((bytecode (read (current-buffer))))
+	 (when (byte-code-function-p bytecode)
+	   (funcall bytecode))))
+     (apply old-fn args)))
+  (advice-add (if (progn (require 'json)
+			 (fboundp 'json-parse-buffer))
+		  'json-parse-buffer
+		'json-read)
+	      :around
+	      #'lsp-booster--advice-json-parse)
+
+  (defun lsp-booster--advice-final-command (old-fn cmd &optional test?)
+    "Prepend emacs-lsp-booster command to lsp CMD."
+    (let ((orig-result (funcall old-fn cmd test?)))
+      (if (and (not test?)                             ;; for check lsp-server-present?
+	       (not (file-remote-p default-directory)) ;; see lsp-resolve-final-command, it would add extra shell wrapper
+	       lsp-use-plists
+	       (not (functionp 'json-rpc-connection))  ;; native json-rpc
+	       (executable-find "emacs-lsp-booster"))
+	  (progn
+	    (message "Using emacs-lsp-booster for %s!" orig-result)
+	    (cons "emacs-lsp-booster" orig-result))
+	orig-result)))
+  (advice-add 'lsp-resolve-final-command :around #'lsp-booster--advice-final-command)
+#+end_src
+** Corfu
+#+begin_src emacs-lisp
+  (use-package corfu
+    :bind (:map corfu-map
+		("M-j" . corfu-next)
+		("M-k" . corfu-previous))
+    :custom
+    (corfu-preselect 'prompt)
+    (corfu-auto t)
+    (corfu-popupinfo-delay 0.5)
+    (corfu-auto-delay 0.1)
+    (corfu-auto-prefix 2)
+    (corfu-count 16)
+    (corfu-max-width 120)
+    (corfu-scroll-margin 4)
+    (corfu-on-exact-match nil)
+    (tab-always-indent 'complete)
+    :init
+    (global-corfu-mode)
+    (corfu-popupinfo-mode))
+
+#+end_src
+*** Cape
+#+begin_src emacs-lisp
+  (use-package cape
+    :custom
+    (dabbrev-ignored-buffer-modes '(archive-mode image-mode eshell-mode))
+    :config
+    (advice-add #'lsp-completion-at-point :around #'cape-wrap-noninterruptible)
+    (advice-add #'lsp-completion-at-point :around #'cape-wrap-nonexclusive)
+    (add-to-list 'completion-at-point-functions #'cape-dabbrev)
+    (add-to-list 'completion-at-point-functions #'cape-file)
+    (add-to-list 'completion-at-point-functions #'cape-elisp-block))
+#+end_src
+** Tree-sitter
+#+begin_src emacs-lisp
+  (use-package treesit-auto
+    :custom
+    (treesit-auto-install 'prompt)
+    :config
+    (treesit-auto-add-to-auto-mode-alist 'all)
+    (global-treesit-auto-mode))
+#+end_src
+*** Additional langs
+#+begin_src emacs-lisp
+  (use-package tree-sitter-langs) 
+#+end_src
+** Snippets
+#+begin_src emacs-lisp
+  (use-package tempel
+    :custom
+    (tempel-trigger-prefix "<")
+    :config
+    (add-to-list 'completion-at-point-functions #'tempel-complete))
+  (use-package tempel-collection
+    :ensure t
+    :after tempel)
+  (use-package yasnippet)
+  (use-package yasnippet-snippets
+    :after yasnippet)
+  (use-package yasnippet-capf
+    :config
+    (add-to-list 'completion-at-point-functions #'yasnippet-capf))
+#+end_src
+** Languages
+*** Python
+#+begin_src emacs-lisp
+  (use-package py-autopep8
+    :hook (python-mode . py-autopep8-mode))
+  (use-package lsp-pyright)
+#+end_src
+*** Rust
+#+begin_src emacs-lisp
+  (use-package rust-mode
+    :mode "\\.rs\\'")
+  (use-package cargo-mode
+    :hook
+    (rust-ts-mode . cargo-minor-mode)
+    :config
+    (setq compilation-scroll-output t))
+#+end_src
+*** Fish
+#+begin_src emacs-lisp
+  (use-package fish-mode
+    :mode "\\.fish\\'")
+#+end_src
+*** Nix
+#+begin_src emacs-lisp
+  (use-package nix-mode
+    :mode ("\\.nix\\'" "\\.nix.in\\'"))
+  ;; (use-package nix-drv-mode :elpaca nil
+  ;;   :ensure nix-mode
+  ;;   :mode "\\.drv\\'")
+  ;; (use-package nix-shell :elpaca nil
+  ;;   :ensure nix-mode
+  ;;   :commands (nix-shell-unpack nix-shell-configure nix-shell-build))
+  ;; (use-package nix-repl :elpaca nil
+  ;;   :ensure nix-mode
+#+end_src
+*** Web
+#+begin_src emacs-lisp
+ (use-package web-mode
+   :mode
+   ("\\.phtml\\'"
+    "\\.tpl\\.php\\'"
+    "\\.[agj]sp\\'"
+    "\\.as[cp]x\\'"
+    "\\.erb\\'"
+    "\\.mustache\\'"
+    "\\.djhtml\\'"))
+#+end_src
+*** JavaScript
+#+begin_src emacs-lisp
+  ;; (use-package js2-mode)
+#+end_src
+** Direnv
+#+begin_src emacs-lisp
+  (use-package direnv
+    :config
+    (direnv-mode))
+#+end_src
+** Better scratch
+#+begin_src emacs-lisp
+  (use-package scratch)
+#+end_src
+* Dired
+** Bindings
+#+begin_src emacs-lisp
+  (use-package dired :ensure nil
+    :ensure nil
+    :commands (dired dired-jump)
+    :bind (:map dired-mode-map
+                ("h" . dired-up-directory)
+                ("l" . dired-find-file))
+    :custom
+    (dired-listing-switches "-hal --group-directories-first"))
+#+end_src
+** Dired hacks
+#+begin_src emacs-lisp
+  (use-package dired-ranger
+    :bind (:map dired-mode-map
+                ("r c" . dired-ranger-copy)
+                ("r m" . dired-ranger-move)
+                ("r p" . dired-ranger-paste)
+                ("\\" . dired-ranger-bookmark)
+                ("`" . dired-ranger-bookmark-visit)))
+  (use-package dired-narrow
+    :bind (:map dired-mode-map
+                ("n" . dired-narrow)))
+#+end_src
+** Dired quick sort
+#+begin_src emacs-lisp
+  (use-package dired-quick-sort
+    :config
+    (dired-quick-sort-setup))
+#+end_src
+** Async copy
+#+begin_src emacs-lisp
+  (use-package dired-rsync
+    :general (:prefix "C-c" :keymaps 'dired-mode-map
+		      "C-r" 'dired-rsync
+		      "C-x" 'dired-rsync-transient))
+#+end_src
+* Sql
+
+#+begin_src emacs-lisp
+  (use-package sql-indent
+    :hook (sql-mode . sqlind-minor-mode))
+
+  (setq sql-connection-alist
+	       '(("postgres-sirius"
+		  (sql-product 'postgres)
+		  (sql-user "sirius_2024")
+		  (sql-password "changed")
+		  (sql-server "127.0.0.1")
+		  (sql-database "postgres")
+		  (sql-port 38746))))
+
+  (setq sql-sqlite-program "sqlite3")
+#+end_src
+* Additional apps
+** Magit
+#+begin_src emacs-lisp
+  (use-package magit
+    :bind (("C-c o g" . magit)))
+#+end_src
+** Jupyter
+#+begin_src emacs-lisp
+  ;; (use-package code-cells)
+#+end_src
+** Orgnote
+#+begin_src emacs-lisp
+  (use-package orgnote
+    :defer t)
+#+end_src
+** Copilot
+#+begin_src emacs-lisp
+  ;; (use-package copilot
+  ;;   :elpaca nil ;; (:host github :repo "copilot-emacs/copilot.el" :files ("dist" "*.el"))
+  ;;   :hook (python-ts-mode . copilot-mode)
+  ;;   :bind ("M-RET" . copilot-accept-completion))
+#+end_src
+** Dash
+#+begin_src emacs-lisp
+  (use-package consult-dash
+    :general
+    ("M-s D" 'consult-dash))
+#+end_src
diff --git a/home-manager/homeModules/emacs/default.nix b/home-manager/homeModules/emacs/default.nix
new file mode 100644
index 0000000..a95b81b
--- /dev/null
+++ b/home-manager/homeModules/emacs/default.nix
@@ -0,0 +1,37 @@
+{ pkgs, config, lib, ... }:
+
+let
+  mkMutableSymlink = config.lib.meta.mkMutableSymlink;
+in
+{
+  options = {
+    emacs.enable = lib.mkEnableOption "enable emacs";
+  };
+  config = lib.mkIf config.emacs.enable {
+    home.packages = with pkgs; with python311Packages; [
+      # required dependencies
+      ripgrep
+      fd
+      tree-sitter
+      emacs-all-the-icons-fonts
+      libappindicator
+      poppler_utils
+      emacs-lsp-booster
+      nixd
+      sqlite
+    ];
+    
+    programs.emacs = {
+      enable = true;
+      package = pkgs.emacs29-pgtk;
+    };
+    
+    xdg.configFile = {
+      "emacs/config.org".source = mkMutableSymlink ./config.org;
+      "emacs/early-init.el".source = mkMutableSymlink ./early-init.el;
+      "emacs/init.el".source = mkMutableSymlink ./init.el;
+      "emacs/etc/tempel/templates.eld".source = mkMutableSymlink ./templates.eld;
+      "emacs/etc/eshell/aliases".source = mkMutableSymlink ./aliases;
+    };
+  };
+}
diff --git a/home-manager/homeModules/emacs/early-init.el b/home-manager/homeModules/emacs/early-init.el
new file mode 100644
index 0000000..c767bdc
--- /dev/null
+++ b/home-manager/homeModules/emacs/early-init.el
@@ -0,0 +1,6 @@
+(setq package-enable-at-startup nil)
+(setenv "LSP_USE_PLISTS" "true")
+(menu-bar-mode -1)
+(tool-bar-mode -1)
+(scroll-bar-mode -1)
+(setq-default pgtk-wait-for-event-timeout 0)
diff --git a/home-manager/homeModules/emacs/init.el b/home-manager/homeModules/emacs/init.el
new file mode 100644
index 0000000..6b3828c
--- /dev/null
+++ b/home-manager/homeModules/emacs/init.el
@@ -0,0 +1,20 @@
+(org-babel-load-file
+ (expand-file-name
+  "config.org"
+  user-emacs-directory))
+(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.
+ '(auth-source-save-behavior nil)
+ '(custom-safe-themes
+   '("d77d6ba33442dd3121b44e20af28f1fae8eeda413b2c3d3b9f1315fbda021992" "80214de566132bf2c844b9dee3ec0599f65c5a1f2d6ff21a2c8309e6e70f9242" default))
+ '(package-selected-packages '(marginalia embark-consult)))
+(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.
+ )
+(put 'upcase-region 'disabled nil)
diff --git a/home-manager/homeModules/emacs/templates.eld b/home-manager/homeModules/emacs/templates.eld
new file mode 100644
index 0000000..7a06758
--- /dev/null
+++ b/home-manager/homeModules/emacs/templates.eld
@@ -0,0 +1,12 @@
+nix-mode
+
+(opt "{ pkgs, config, lib, ... }:"
+     n
+     n "{"
+     n> "options = {"
+     n> (p "option name" name) ".enable = lib.mkEnableOption \"enable " (s name) "\";"
+     n "  };"
+     n> "config = lib.mkIf config." (s name) ".enable {"
+     n> q
+     n "  };"
+     n "}")