bwah

init.el

@@ -1,3 +1,11 @@
+;;; init.el --- Init file -*- lexical-binding: t -*-
+;;; Commentary:
+;;; Nothing to note
+;;; Code:
+(defun build-treesitter-grammars(l)
+  "Run a grammar build expression for L."
+  (treesit-install-language-grammar l))
+
 (setq custom-file (expand-file-name "custom.el" user-emacs-directory))
 (load custom-file)
 
@@ -38,13 +46,11 @@
   :ensure t
   :if (display-graphic-p))
 (use-package magit :ensure t)
+(use-package treemacs :ensure t)
 
 ;; EVIL
 (use-package evil :ensure t :init (setq evil-want-keybinding nil) :config (evil-mode t))
 (use-package evil-collection :ensure t :config (evil-collection-init))
-(use-package treemacs-evil
-  :after (treemacs evil)
-  :ensure t)
 
 ;; EGLOT
 (use-package eglot :ensure t)
@@ -60,11 +66,18 @@
 (use-package astro-ts-mode :ensure t)
 (use-package fennel-mode :ensure t)
 (use-package slime :ensure t)
-   
-;; OTHER
+
+;; TREEMACS
 (use-package treemacs-projectile
   :after (treemacs projectile)
   :ensure t)
+(use-package treemacs-evil :after (treemacs evil) :ensure t)
+(use-package treemacs-magit
+  :after (treemacs magit)
+  :ensure t)
+(use-package treemacs-icons-dired
+  :hook (dired-mode . treemacs-icons-dired-enable-once)
+  :ensure t)
 
 ;; E-GEX configuration
 (use-package emacs :init (setq inhibit-startup-message t)
@@ -73,6 +86,9 @@
   (menu-bar-mode 0)
   (tool-bar-mode 0)
   (set-scroll-bar-mode nil)
+
+  (treemacs-start-on-boot)
+  
   (setq backup-directory-alist
 	`(("." . ,(concat user-emacs-directory "backups"))))
   (setq treesit-language-source-alist
@@ -85,6 +101,5 @@
   (setq inferior-lisp-program "sbcl")
   (setq major-mode-remap-alist
 	'((python-mode . python-ts-mode))))
-
 ;;; init.el ends here