From 02f2aaf08060cd9821d16bcf2d4012bcd7652481 Mon Sep 17 00:00:00 2001
From: larstvei <larstvei@ifi.uio.no>
Date: Thu, 18 Sep 2025 08:10:38 +0200
Subject: [PATCH] Avoid having geiser cluttering homedir

---
 init.org | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/init.org b/init.org
index b328026..06b3525 100644
--- a/init.org
+++ b/init.org
@@ -1677,8 +1677,12 @@
         (forward-line)))
 
     (use-package geiser
-      :bind (:map scheme-mode-map
-                  ("M-RET" . insert-geiser-eval-as-comment)))
+      :bind (:map scheme-mode-map ("M-RET" . insert-geiser-eval-as-comment))
+      :config
+      (require 'xdg)
+      (let ((dir (concat (xdg-cache-home) "/geiser")))
+        (make-directory dir t)
+        (setq geiser-repl-history-filename (concat dir "/history"))))
 
     #+end_src