summaryrefslogtreecommitdiff
path: root/elisp/geiser-impl.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-impl.el')
-rw-r--r--elisp/geiser-impl.el10
1 files changed, 4 insertions, 6 deletions
diff --git a/elisp/geiser-impl.el b/elisp/geiser-impl.el
index b67c6bf..c1dc065 100644
--- a/elisp/geiser-impl.el
+++ b/elisp/geiser-impl.el
@@ -57,8 +57,7 @@ in order to determine its scheme flavour."
(geiser-custom--memoize 'geiser-impl--load-files)
-(make-variable-buffer-local
- (defvar geiser-impl--implementation nil))
+(defvar-local geiser-impl--implementation nil)
(defsubst geiser-impl--impl-str (&optional impl)
(let ((impl (or impl geiser-impl--implementation)))
@@ -246,10 +245,9 @@ switcher (switch-to-NAME), and provides geiser-NAME."
;;; Trying to guess the scheme implementation:
-(make-variable-buffer-local
- (defvar geiser-scheme-implementation nil
- "Set this buffer local variable to specify the Scheme
-implementation to be used by Geiser."))
+(defvar-local geiser-scheme-implementation nil
+ "Set this buffer local variable to specify the Scheme
+implementation to be used by Geiser.")
(put 'geiser-scheme-implementation 'safe-local-variable 'symbolp)