Make Ollama config pull models dynamically

emacs/.emacs.d/config/init-ai.el

@@ -39,12 +39,22 @@
                                  :stream t
                                  :models '("gpt-4o"
                                            "gpt-4o-mini")))
-  (defvar gptel-backend-ollama (gptel-make-ollama "Ollama"
+  (defun ollama-models ()
-                                 :stream t
+    (if (executable-find "ollama")
-                                 :models '("llama3.1:latest"
+        (->> (shell-command-to-string "ollama list")
+             (s-lines)
+             (cdr)
+             (mapcar (lambda (line)
+                       (let ((parts (s-split-up-to " " line 1 t)))
+                         (car parts))))
+             (-filter #'s-present?))
+      (list "llama3.1:latest"
             "mistral-nemo:latest"
             "gemma2:2b"
             "tinyllama:latest")))
+  (defvar gptel-backend-ollama (gptel-make-ollama "Ollama"
+                                 :stream t
+                                 :models (ollama-models)))
   (defvar gptel-backend-anthropic (gptel-make-anthropic "Claude"
                                     :stream t
                                     :key (password-store-get "anthropic-api-key")))

emacs/.emacs.d/config/init-ide.el

@@ -227,6 +227,7 @@
   (typescript-mode . eglot-ensure)
   (python-mode . eglot-ensure)
   (js-web-mode . eglot-ensure)
+  (tsx-ts-mode . eglot-ensure)
   (html-web-mode . eglot-ensure)
   (scala-mode . eglot-ensure)
   (c-mode . eglot-ensure)

emacs/.emacs.d/config/init-treesit.el

@@ -1,6 +1,7 @@
 ;; -*- lexical-binding: t; -*-
 (use-package treesit
   :straight (:type built-in)
+  :mode ("\\.tsx\\'" . tsx-ts-mode)
   :config
   (setq treesit-language-source-alist
         '((bash "https://github.com/tree-sitter/tree-sitter-bash")