diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2021-04-21 20:54:12 +0200 |
|---|---|---|
| committer | Jonas Bernoulli <jonas@bernoul.li> | 2021-04-21 21:38:40 +0200 |
| commit | 2b45bd368b4acbcef53c3c761725241fb6846102 (patch) | |
| tree | 21ea02e33460bc06613c931400ed38774097ec24 /elisp/geiser-impl.el | |
| parent | 803dfeb9414ed7b99c5d567170f32c97cafa1114 (diff) | |
| download | geiser-2b45bd368b4acbcef53c3c761725241fb6846102.tar.gz geiser-2b45bd368b4acbcef53c3c761725241fb6846102.tar.bz2 | |
Use defvar-local
It is available since Emacs 24.3 and we already depend on Emacs 24.4.
Diffstat (limited to 'elisp/geiser-impl.el')
| -rw-r--r-- | elisp/geiser-impl.el | 10 |
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) |