gergely/my-emacs-d
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Get rid of gpolonkai/isearch-regexp

Browse Source 
isearch is good in itself, so this also rebinds isearch commands to their
rightful bindings.
This commit is contained in:
Gergely Polonkai 2023-10-21 06:40:39 +02:00
parent d8eb235b25
commit 38c2dacedc
No known key found for this signature in database
GPG Key ID: 2D2885533B869ED4
1 changed files with 2 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
configuration.org
View File

@ -3150,14 +3150,6 @@ Because that’s still my favourite language.
* Key bindings * Key bindings
#+begin_src emacs-lisp #+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) (defvar gpolonkai/transpose-map (make-sparse-keymap)
"Map for transpose commands.") "Map for transpose commands.")
(define-prefix-command 'gpolonkai/transpose-map) (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-k" . find-function-on-key)
("C-h C-v" . find-variable) ("C-h C-v" . find-variable)
("M-q" . sachachua/fill-or-unfill-paragraph) ("M-q" . sachachua/fill-or-unfill-paragraph)
("C-r" . gpolonkai/isearch-regexp) ("C-r" . isearch-backward-regexp)
("C-M-r" . isearch-backward) ("C-M-r" . isearch-backward)
("C-s" . consult-line) ("C-s" . isearch-forward-regexp)
("C-M-s" . isearch-forward) ("C-M-s" . isearch-forward)
("M-t" . gpolonkai/transpose-map) ("M-t" . gpolonkai/transpose-map)
("C-z" . nil) ("C-z" . nil)