From 38c2dacedc2243efcbf3156d7c59247c00e4ae11 Mon Sep 17 00:00:00 2001
From: Gergely Polonkai <gergely@polonkai.eu>
Date: Sat, 21 Oct 2023 06:40:39 +0200
Subject: [PATCH] Get rid of gpolonkai/isearch-regexp

isearch is good in itself, so this also rebinds isearch commands to their
rightful bindings.
---
 configuration.org | 12 ++----------
 1 file changed, 2 insertions(+), 10 deletions(-)

diff --git a/configuration.org b/configuration.org
index 65c9eb3..af54cb0 100644
--- a/configuration.org
+++ b/configuration.org
@@ -3150,14 +3150,6 @@ Because that’s still my favourite language.
 * Key bindings
 
 #+begin_src emacs-lisp
-(defun gpolonkai/isearch-regexp (prefix)
-  "Call `isearch-forward-regex'.  If PREFIX is non-nil, call `isearch-backward-regex' instead."
-  (interactive "P")
-  (call-interactively
-   (if prefix
-       'isearch-backward-regexp
-     'isearch-forward-regexp)))
-
 (defvar gpolonkai/transpose-map (make-sparse-keymap)
   "Map for transpose commands.")
 (define-prefix-command 'gpolonkai/transpose-map)
@@ -3179,9 +3171,9 @@ Because that’s still my favourite language.
  ("C-h C-k" . find-function-on-key)
  ("C-h C-v" . find-variable)
  ("M-q" . sachachua/fill-or-unfill-paragraph)
- ("C-r" . gpolonkai/isearch-regexp)
+ ("C-r" . isearch-backward-regexp)
  ("C-M-r" . isearch-backward)
- ("C-s" . consult-line)
+ ("C-s" . isearch-forward-regexp)
  ("C-M-s" . isearch-forward)
  ("M-t" . gpolonkai/transpose-map)
  ("C-z" . nil)