summaryrefslogtreecommitdiff
path: root/elisp/geiser-custom.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-custom.el')
-rw-r--r--elisp/geiser-custom.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/elisp/geiser-custom.el b/elisp/geiser-custom.el
index 8d04885..8095863 100644
--- a/elisp/geiser-custom.el
+++ b/elisp/geiser-custom.el
@@ -50,6 +50,12 @@
(add-to-list 'geiser-custom--memoized-vars name))
(defmacro geiser-custom--defcustom (name &rest body)
+ "Like `defcustom' but also put NAME on an internal list.
+That list is used by `geiser-reload' to preserve the values
+of the listed variables. It is not used for anything else."
+ ;; FIXME Remembering the value like this is not actually
+ ;; necessary. Evaluting `defcustom' always preserves the
+ ;; existing value, if any.
(declare (doc-string 3) (debug (name body)))
`(progn
(geiser-custom--memoize ',name)