[nongnu] elpa/geiser-kawa 0c311ae 051/119: Rename var to geiser-kawa-use-included-kawa

[Philip Kaludercic]

branch: elpa/geiser-kawa
commit 0c311aeaadd65dcd1726c60e360b7b0641f90d6d
Author: spellcard199 <spellcard199@protonmail.com>
Commit: spellcard199 <spellcard199@protonmail.com>

    Rename var to geiser-kawa-use-included-kawa
---
 elisp/geiser-kawa.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/elisp/geiser-kawa.el b/elisp/geiser-kawa.el
index 14b4f05..59d5d26 100644
--- a/elisp/geiser-kawa.el
+++ b/elisp/geiser-kawa.el
@@ -117,7 +117,7 @@
   :type 'string
   :group 'geiser-kawa)
 
-(defcustom geiser-kawa-use-kawa-version-included-in-kawa-geiser
+(defcustom geiser-kawa-use-included-kawa
   nil
   "Instead of downloading kawa yourself, you can use the Kawa version
  included in geiser-kawa, which is the head of Kawa's master branch."
@@ -129,8 +129,8 @@
 
 (defun geiser-kawa--binary ()
   ". If `geiser-kawa-binary' is a list, take the first and ignore
- `geiser-kawa-use-kawa-version-included-in-kawa-geiser'."
-  (if geiser-kawa-use-kawa-version-included-in-kawa-geiser
+ `geiser-kawa-use-included-kawa'."
+  (if geiser-kawa-use-included-kawa
       "java"
     (if (listp geiser-kawa-binary)
         (car geiser-kawa-binary)
@@ -140,7 +140,7 @@
   (let ((jars
          (append
           (if (and
-               (not geiser-kawa-use-kawa-version-included-in-kawa-geiser)
+               (not geiser-kawa-use-included-kawa)
                (executable-find geiser-kawa-binary))
               (let ((lib-dir (expand-file-name
                               "../lib/"
@@ -170,7 +170,7 @@
   "Return a list with all parameters needed to start Kawa Scheme."
   (append
    (list (format "-Djava.class.path=%s" (geiser-kawa--make-classpath)))
-   (if geiser-kawa-use-kawa-version-included-in-kawa-geiser
+   (if geiser-kawa-use-included-kawa
        (list "kawa.repl"))
    geiser-kawa--arglist))