hiro/boon
1
0
Fork 0
mirror of https://github.com/vale981/boon synced 2025-03-05 09:31:43 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

set search string after swiper

Browse source
This commit is contained in:
Jean-Philippe Bernardy 2019-08-24 14:55:40 +02:00
parent 270ae67b31
commit 339fe1b220
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
boon-search.el
View file

@ -86,9 +86,13 @@ the regexp."
(interactive) (interactive)
(hi-lock-face-buffer boon-regexp 'hi-yellow)) (hi-lock-face-buffer boon-regexp 'hi-yellow))
(defadvice isearch-exit (after ysph-hl-search activate compile) (defadvice isearch-exit (after boon-isearch-set-search activate compile)
"After isearch, highlight the search term and set it as boon current regexp." "After isearch, highlight the search term and set it as boon current regexp."
(boon-set-search-string isearch-string)) (boon-set-search-string isearch-string))
(defadvice swiper--action (after boon-swiper-set-search activate compile)
"After isearch, highlight the search term and set it as boon current regexp."
(boon-set-search-regexp (car regexp-search-ring)))
(provide 'boon-search) (provide 'boon-search)
;;; boon-search.el ends here ;;; boon-search.el ends here