Update scheme stuff

init.el

@@ -819,7 +819,7 @@ With NO-EWW, don't update eww's state."
                      'evil-cp-insert-at-end-of-form)
   (keymap-unset evil-cleverparens-mode-map "<normal-state> M-o" t)
   (defun my/-enable-evil-cleverparens ()
-    (if (derived-mode-p 'lisp-data-mode)
+    (if (derived-mode-p '(lisp-data-mode scheme-mode))
         (evil-cleverparens-mode 1)
       (electric-pair-local-mode 1)))
   (cl-defun my/range-inside-thing-p (thing beg end &optional no-edge)
@@ -872,7 +872,7 @@ With NO-EDGE, return nil if beg or end fall on the edge of the range."
 
 ;; better lisp editing
 (use-package adjust-parens
-  :hook (lisp-data-mode . adjust-parens-mode)
+  :hook ((lisp-data-mode scheme-mode) . adjust-parens-mode)
   :config
   (defun my/lisp-indent-adjust-parens ()
     "Like `lisp-indent-adjust-parens', but got to first char on line first.
@@ -3656,7 +3656,7 @@ Color can be any color which can be passed to `color-values'."
 
 ;; rainbow-delimiters
 (use-package rainbow-delimiters
-  :hook (lisp-data-mode . rainbow-delimiters-mode)
+  :hook ((lisp-data-mode scheme-mode) . rainbow-delimiters-mode)
   :config
   ;; generate dark version of the rainbow delimiters faces
   (defun my/-rainbow-delimiters-recalc-dark-faces (&optional frame)
@@ -3709,7 +3709,7 @@ one of the normal rainbow-delimiters-depth-N-face faces."
 
 ;; auto-highlight-symbol
 (use-package auto-highlight-symbol
-  :hook (lisp-data-mode . auto-highlight-symbol-mode)
+  :hook ((lisp-data-mode scheme-mode) . auto-highlight-symbol-mode)
   :init
   (setq ahs-face 'bold
         ahs-face-unfocused 'bold