diff options
| author | David Morgan <djm_uk@protonmail.com> | 2023-05-19 09:54:36 +0100 |
|---|---|---|
| committer | David Morgan <djm_uk@protonmail.com> | 2023-05-19 09:54:36 +0100 |
| commit | 24c2302e805291c7dd3f79e48a9b4f3821c787e5 (patch) | |
| tree | 18077ec3a79945003fd60ba6eda5dae5906e0023 | |
| parent | 0156d2dcba208124e8d2e4a033c394dae361d04d (diff) | |
| download | dotfiles-24c2302e805291c7dd3f79e48a9b4f3821c787e5.tar.gz | |
Tweak isearch ui
| -rw-r--r-- | .emacs.d/lisp/init-search.el | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/.emacs.d/lisp/init-search.el b/.emacs.d/lisp/init-search.el index e2945b2..9d4e487 100644 --- a/.emacs.d/lisp/init-search.el +++ b/.emacs.d/lisp/init-search.el @@ -3,20 +3,28 @@ ;;; Code: (use-feature isearch + :config + (defface isearch-prompt + '((t (:foreground "gold"))) + "Face for isearch minibuffer prompt." + :group 'isearch) :custom (search-whitespace-regexp ".*\\b") (isearch-lax-whitespace t) (isearch-allow-scroll t) (isearch-yank-on-move 'shift) (isearch-lazy-count t) + (lazy-count-prefix-format nil) + (lazy-count-suffix-format " (%s/%s)") + (isearch-message-properties '(read-only t cursor-intangible t face isearch-prompt)) :bind-keymap ("C-c s" . search-map) ;; M-s clashes with paredit/smartparens bindings :bind ("C-*" . isearch-forward-symbol-at-point) (:map search-map - ("M-s M-<" . isearch-beginning-of-buffer) - ("M-s M->" . isearch-end-of-buffer) - ("C-c s M-<" . isearch-beginning-of-buffer) - ("C-c s M->" . isearch-end-of-buffer))) + ("M-s M-<" . isearch-beginning-of-buffer) + ("M-s M->" . isearch-end-of-buffer) + ("C-c s M-<" . isearch-beginning-of-buffer) + ("C-c s M->" . isearch-end-of-buffer))) (use-package isearch-dabbrev :after isearch |