From 2cf67731692e031d7e5d49104c02ac2cd9a8de29 Mon Sep 17 00:00:00 2001
From: cake <code@cakey.me>
Date: Thu, 29 May 2025 12:32:40 +0200
Subject: [PATCH] IDFK what I am doing anymore

---
 init.el | 17 +++++++++++++----
 1 file changed, 13 insertions(+), 4 deletions(-)

diff --git a/init.el b/init.el
index 03c6708..6a4367a 100644
--- a/init.el
+++ b/init.el
@@ -47,7 +47,11 @@
   :ensure t)
 
 ;; EGLOT
-(use-package eglot :ensure t)
+(use-package eglot
+  :ensure t
+  :config
+  (add-to-list 'eglot-server-programs
+	       '(gleam-ts-mode . ("gleam" "lsp"))))
 
 ;; MODES
 (use-package rustic
@@ -60,8 +64,12 @@
 (use-package astro-ts-mode :ensure t)
 (use-package fennel-mode :ensure t)
 (use-package slime :ensure t)
-   
+(use-package gleam-ts-mode
+  :ensure t
+  :mode (rx ".gleam" eos))
+
 ;; OTHER
+(use-package projectile :ensure t)
 (use-package treemacs-projectile
   :after (treemacs projectile)
   :ensure t)
@@ -73,6 +81,7 @@
   (menu-bar-mode 0)
   (tool-bar-mode 0)
   (set-scroll-bar-mode nil)
+  (setq inferior-lisp-program "sbcl")
   (setq backup-directory-alist
 	`(("." . ,(concat user-emacs-directory "backups"))))
   (setq treesit-language-source-alist
@@ -81,8 +90,8 @@
         (tsx "https://github.com/tree-sitter/tree-sitter-typescript" "master" "tsx/src")
         (typescript "https://github.com/tree-sitter/tree-sitter-typescript" "master" "typescript/src")
 	(python "https://github.com/tree-sitter/tree-sitter-python")
-	(rust "https://github.com/tree-sitter/tree-sitter-rust")))
-  (setq inferior-lisp-program "sbcl")
+	(rust "https://github.com/tree-sitter/tree-sitter-rust")
+	(gleam "https://github.com/gleam-lang/tree-sitter-gleam")))
   (setq major-mode-remap-alist
 	'((python-mode . python-ts-mode))))