[nongnu] elpa/geiser-gauche 202336b 006/119: Add case-sensitivity variable

[Philip Kaludercic]

branch: elpa/geiser-gauche
commit 202336b506880bf36add4b631b308de03f89d049
Author: András Simonyi <andras.simonyi@gmail.com>
Commit: András Simonyi <andras.simonyi@gmail.com>

    Add case-sensitivity variable
---
 geiser-gauche.el | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/geiser-gauche.el b/geiser-gauche.el
index 77cd9b5..4f95a19 100644
--- a/geiser-gauche.el
+++ b/geiser-gauche.el
@@ -40,6 +40,11 @@
   :type '(repeat string)
   :group 'geiser-gauche)
 
+(geiser-custom--defcustom geiser-gauche-case-sensitive-p t
+  "Non-nil means keyword highlighting is case-sensitive."
+  :type 'boolean
+  :group 'geiser-gauche)
+
 
 ;;; REPL support:
 
@@ -139,7 +144,7 @@
 
 ;;; Implementation definition:
 
-(define-geiser-implementation chez
+(define-geiser-implementation gauche
   (binary geiser-gauche--binary)
   (arglist geiser-gauche--parameters)
   (version-command geiser-gauche--version)
@@ -158,8 +163,7 @@
   ;; (external-help geiser-gauche--manual-look-up)
   ;; (check-buffer geiser-gauche--guess)
   ;; (keywords geiser-gauche--keywords)
-  ;; (case-sensitive geiser-gauche-case-sensitive-p)
-  )
+  (case-sensitive geiser-gauche-case-sensitive-p))
 
 (geiser-impl--add-to-alist 'regexp "\\.scm$" 'gauche t)