Re-added gptel, and added Crystal support.

README.org

@@ -104,9 +104,12 @@ loading as a blank slate with only the scratch buffer open.
 (setq ring-bell-function #'ignore
       inhibit-startup-screen t)
 
-(push '(font . "Cartograph CF-11") default-frame-alist)
+(push '(font . "MonoLisa-12") default-frame-alist)
-(set-face-font 'default "Cartograph CF-11")
+(set-face-font 'default "MonoLisa-12")
-(set-face-font 'variable-pitch "Cartograph CF-11")
+(set-face-font 'variable-pitch "MonoLisa-12")
+
+;; Can open in normal browser from within EWW.
+(setq browse-url-browser-function 'eww-browse-url)
 
 (copy-face 'default 'fixed-pitch)
 
@@ -739,6 +742,20 @@ looking for.
   (embark-collect-mode . consult-preview-at-point-mode))
 #+end_src
 
+I've been using some LLMs for test generation, and search lately.  For now
+I'm going to try out gptel and see how I like it.
+
+#+BEGIN_SRC emacs-lisp
+(use-package gptel
+  :config
+  (setq
+   gptel-model 'gemini-3-pro-preview
+   gptel-api-key (auth-source-pick-first-password :host "generativelanguage.googleapis.com")
+   gptel-backend (gptel-make-gemini "Gemini"
+                   :stream t
+                   :key #'gptel-api-key-from-auth-source)))
+#+END_SRC
+
 * Hail Hydra?!
 
 I find that [[https://github.com/abo-abo/hydra][Hydra]] is great for providing visual menus for tasks that might
@@ -1516,6 +1533,7 @@ the package.
          (c-ts-mode . lsp-deferred)
          (c++-ts-mode . lsp-deferred)
          (clojure-ts-mode . lsp-deferred)
+         (crystal-mode . lsp-deferred)
          (elixir-ts-mode . lsp-deferred)
          (gleam-ts-mode . lsp-deferred)
          (go-ts-mode . lsp-deferred)
@@ -1524,7 +1542,6 @@ the package.
          (rust-ts-mode . lsp-deferred)
          (slint-mode . lsp-deferred)
          (toml-ts-mode . lsp-deferred)
-         (zig-mode . lsp-deferred)
          ;; if you want which-key integration
          (lsp-mode . lsp-enable-which-key-integration))
   :commands lsp-deferred
@@ -1586,11 +1603,6 @@ bother with an explanation on each.
   :config
   (add-to-list 'auto-mode-alist '("\\.slint\\'" . slint-mode)))
 
-(use-package zig-mode
-  :defer t
-  :config
-  (add-to-list 'auto-mode-alist '("\\.\\(zig\\|zon\\)\\'" . zig-mode)))
-
 (use-package rainbow-mode
   :commands (rainbow-mode))
 
@@ -1620,6 +1632,11 @@ bother with an explanation on each.
   :demand t
   :mode "\\.build\\'")
 
+;; Crystal
+(use-package crystal-mode
+  :ensure t
+  :mode "\\.cr\\'")
+
 ;; rust-mode
 (use-package rust-mode
   :ensure t

config.org

@@ -104,9 +104,12 @@ loading as a blank slate with only the scratch buffer open.
 (setq ring-bell-function #'ignore
       inhibit-startup-screen t)
 
-(push '(font . "Cartograph CF-11") default-frame-alist)
+(push '(font . "MonoLisa-12") default-frame-alist)
-(set-face-font 'default "Cartograph CF-11")
+(set-face-font 'default "MonoLisa-12")
-(set-face-font 'variable-pitch "Cartograph CF-11")
+(set-face-font 'variable-pitch "MonoLisa-12")
+
+;; Can open in normal browser from within EWW.
+(setq browse-url-browser-function 'eww-browse-url)
 
 (copy-face 'default 'fixed-pitch)
 

config/lsp.org

@@ -17,6 +17,7 @@ the package.
          (c-ts-mode . lsp-deferred)
          (c++-ts-mode . lsp-deferred)
          (clojure-ts-mode . lsp-deferred)
+         (crystal-mode . lsp-deferred)
          (elixir-ts-mode . lsp-deferred)
          (gleam-ts-mode . lsp-deferred)
          (go-ts-mode . lsp-deferred)
@@ -25,7 +26,6 @@ the package.
          (rust-ts-mode . lsp-deferred)
          (slint-mode . lsp-deferred)
          (toml-ts-mode . lsp-deferred)
-         (zig-mode . lsp-deferred)
          ;; if you want which-key integration
          (lsp-mode . lsp-enable-which-key-integration))
   :commands lsp-deferred

config/major_modes.org

@@ -18,11 +18,6 @@ bother with an explanation on each.
   :config
   (add-to-list 'auto-mode-alist '("\\.slint\\'" . slint-mode)))
 
-(use-package zig-mode
-  :defer t
-  :config
-  (add-to-list 'auto-mode-alist '("\\.\\(zig\\|zon\\)\\'" . zig-mode)))
-
 (use-package rainbow-mode
   :commands (rainbow-mode))
 
@@ -52,6 +47,11 @@ bother with an explanation on each.
   :demand t
   :mode "\\.build\\'")
 
+;; Crystal
+(use-package crystal-mode
+  :ensure t
+  :mode "\\.cr\\'")
+
 ;; rust-mode
 (use-package rust-mode
   :ensure t

config/qol.org

@@ -69,3 +69,16 @@ looking for.
   (embark-collect-mode . consult-preview-at-point-mode))
 #+end_src
 
+I've been using some LLMs for test generation, and search lately.  For now
+I'm going to try out gptel and see how I like it.
+
+#+BEGIN_SRC emacs-lisp
+(use-package gptel
+  :config
+  (setq
+   gptel-model 'gemini-3-pro-preview
+   gptel-api-key (auth-source-pick-first-password :host "generativelanguage.googleapis.com")
+   gptel-backend (gptel-make-gemini "Gemini"
+                   :stream t
+                   :key #'gptel-api-key-from-auth-source)))
+#+END_SRC