emacs: Remove unused packages

1 files changed, 3 insertions, 36 deletions

diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index 49831a1..9dc878b 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -35,6 +35,8 @@
 (setf user-full-name "Thanos Apollo"
       user-mail-address "[email protected]")
 
+(setq copyright-names-regexp
+      (format "%s <%s>" user-full-name user-mail-address))
 
 (defvar is-zeus (string= (system-name) "zeus"))
 (defvar is-hermes (string= (system-name) "hermes"))
@@ -285,8 +287,7 @@
 		 ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
 		 ("\\paragraph{%s}" . "\\paragraph*{%s}")))
   
-  :hook ((org-mode . org-auto-tangle-mode)
-	 (org-mode . (lambda () (display-line-numbers-mode -1) (flyspell-mode))))
+  :hook ((org-mode . (lambda () (display-line-numbers-mode -1) (flyspell-mode))))
   :bind (:map org-mode-map (("C-c l" . org-store-link)
 			    ("C-c M-t" . org-todo))))
 
@@ -673,19 +674,6 @@
   (add-to-list 'auto-mode-alist '("\\.md\\'" . gfm-mode))
   :hook ((markdown-mode . flyspell-mode)))
 
-(use-package org-auto-tangle
-  :defer t)
-
-(use-package org-present
-  :defer t)
-
-(use-package expand-region
-  :defer t)
-
-(use-package change-inner
-  :after expand-region
-  :bind ((:map thanos/search ("i" . 'change-inner))))
-
 (use-package nov
   :straight nil
   :defer t
@@ -762,12 +750,6 @@
 			  (thanos/set-eshell-aliases thanos/aliases)
 			  (display-line-numbers-mode -1)))))
 
-(use-package eat
-  :after 'eshell
-  :config
-  (add-hook 'eshell-load-hook #'eat-eshell-mode)
-  (setf eat-term-name "xterm-256color"))
-
 (use-package eshell-git-prompt
   :config
   (defun eshell-git-prompt-multiline ()
@@ -1023,24 +1005,9 @@ By default, returns all jabber related buffers format."
 (use-package package-lint
   :defer t)
 
-(use-package consult-mu
-  :straight (consult-mu :type git :host github :repo "armindarvish/consult-mu" :files (:defaults "extras/*.el"))
-  :after (mu4e consult)
-  :bind (:map mu4e-main-mode-map
-	      ("M-s" . 'consult-mu)
-	      :map mu4e-view-mode-map
-	      ("M-s" . 'consult-mu)
-	      :map mu4e-headers-mode-map
-	      ("M-s" . 'consult-mu)))
-
 (use-package yaml-mode
   :defer t)
 
-;(load-file "~/Dev/guile/guix/etc/copyright.el")
-
-(setq copyright-names-regexp
-      (format "%s <%s>" user-full-name user-mail-address))
-
 (when (or is-zeus is-hermes)
   (use-package mu4e
     :straight nil