[nongnu] elpa/geiser-racket b86cf1f 116/191: Configurable keyword case sensitivity

[Philip Kaludercic]

branch: elpa/geiser-racket
commit b86cf1f01f2e5f8af3cfce9fef5150f7e6c58a47
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>

    Configurable keyword case sensitivity
    
    By default, keywords are now not fontified in Scheme buffers unless
    they have the correct (lower) case.  This behaviour can be altered by
    new, per-implementation customization variables.
    
    Thanks to Diogo F. S. Ramos for pointing this out.
---
 elisp/geiser-racket.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el
index f7b33e6..01a7b6b 100644
--- a/elisp/geiser-racket.el
+++ b/elisp/geiser-racket.el
@@ -65,6 +65,11 @@ This executable is used by `run-gracket', and, if
   :type '(repeat string)
   :group 'geiser-racket)
 
+(geiser-custom--defcustom geiser-racket-case-sensitive-p t
+  "Non-nil means keyword highlighting is case-sensitive."
+  :type 'boolean
+  :group 'geiser-racket)
+
 
 ;;; REPL support:
 
@@ -353,6 +358,7 @@ using start-geiser, a procedure in the geiser/server 
module."
   (external-help geiser-racket--external-help)
   (check-buffer geiser-racket--guess)
   (keywords geiser-racket--keywords)
+  (case-sensitive geiser-racket-case-sensitive-p)
   (binding-forms geiser-racket--binding-forms)
   (binding-forms* geiser-racket--binding-forms*))