From 9197acbdbde392fc53ad0f2be2cef83e452f1d28 Mon Sep 17 00:00:00 2001
From: Jonas Bernoulli <jonas@bernoul.li>
Date: Thu, 14 Jul 2022 16:20:48 +0200
Subject: Define geiser--feature-list as a variable

Defining it as a macro, as it was done from the start, is just
weird.
---
 elisp/geiser-reload.el | 52 +++++++++++++++++++++++++-------------------------
 1 file changed, 26 insertions(+), 26 deletions(-)

(limited to 'elisp')

diff --git a/elisp/geiser-reload.el b/elisp/geiser-reload.el
index 678e374..4f5f964 100644
--- a/elisp/geiser-reload.el
+++ b/elisp/geiser-reload.el
@@ -21,36 +21,36 @@
 
 ;;; Reload:
 
-(defmacro geiser--features-list ()
-  (quote '(
-           geiser-mode
-           geiser-repl
-           geiser-capf
-           geiser-doc
-           geiser-xref
-           geiser-compile
-           geiser-debug
-           geiser-completion
-           geiser-autodoc
-           geiser-edit
-           geiser-eval
-           geiser-connection
-           geiser-syntax
-           geiser-menu
-           geiser-inf
-           geiser-impl
-           geiser-image
-           geiser-custom
-           geiser-log
-           geiser-popup
-           geiser-base
-           geiser
-           )))
+(defconst geiser--features-list
+  '(
+    geiser-mode
+    geiser-repl
+    geiser-capf
+    geiser-doc
+    geiser-xref
+    geiser-compile
+    geiser-debug
+    geiser-edit
+    geiser-completion
+    geiser-autodoc
+    geiser-eval
+    geiser-connection
+    geiser-syntax
+    geiser-menu
+    geiser-inf
+    geiser-impl
+    geiser-image
+    geiser-custom
+    geiser-log
+    geiser-popup
+    geiser-base
+    geiser
+    ))
 
 (defun geiser-unload ()
   "Unload all Geiser modules."
   (interactive)
-  (let ((fs (geiser--features-list)))
+  (let ((fs geiser--features-list))
     (unload-feature 'geiser-reload t)
     (dolist (f fs)
       (when (featurep f) (unload-feature f t)))
-- 
cgit v1.2.3