refining meow config

modules/editor/meow/config.el

@@ -77,8 +77,6 @@
   ";" #'meow-reverse
   "," #'meow-inner-of-thing
   "." #'meow-bounds-of-thing
-  "=" #'isearch-forward
-  "+" #'isearch-backward
   "\\" #'bookmark-jump
   "'" #'repeat
   ":" #'eval-last-sexp
@@ -86,9 +84,22 @@
   "]" #'sp-forward-sexp
   "{" #'sp-backward-up-sexp
   "}" #'sp-down-sexp
+  "/" #'isearch-forward
+  "'" #'isearch-backward
   "<escape>" #'corfu-quit))
 
 
+(defun meow--post-isearch-function ()
+  (unless isearch-mode-end-hook-quit
+    (when isearch-success
+      (let ((beg (car isearch-match-data))
+            (end (cadr isearch-match-data)))
+        (thread-first
+          (meow--make-selection '(select . visit) beg (if isearch-forward end isearch-other-end))
+          (meow--select (not isearch-forward)))))))
+
+(add-hook 'isearch-mode-end-hook 'meow--post-isearch-function)
+
 (use-package! meow
   :hook (doom-after-modules-config . meow-global-mode)
   :demand t
@@ -103,5 +114,4 @@
   (meow/setup-leader)
   (pushnew! meow-mode-state-list '(sly-db-mode . motion))
   (pushnew! meow-mode-state-list '(sly-inspector-mode . motion))
-  (pushnew! meow-mode-state-list '(custom-mode . normal))
-  (map! :map meow-keymap [remap describe-key] #'helpfl-key))
+  (pushnew! meow-mode-state-list '(custom-mode . motion)))