app-emacs/geiser-mit/files/geiser-mit-src-dir.patch


1
2
3
4
5
6
7
8
9
10
11
12
13

diff --git a/geiser-mit.el b/geiser-mit.el
index 53edf0e..2dfe9fa 100644
--- a/geiser-mit.el
+++ b/geiser-mit.el
@@ -61,7 +61,7 @@
     geiser-mit-binary))
 
 (defvar geiser-mit-scheme-dir
-  (expand-file-name "src" (file-name-directory load-file-name))
+  (expand-file-name "src" "@SITEETC@")
   "Directory where the MIT scheme geiser package is installed.")
 
 (defun geiser-mit--parameters ()