emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

completion/ivy: use region is active & fix regex quoting

Browse source 
Fixes #1930
This commit is contained in:
Henrik Lissner 2019-10-22 11:27:07 -04:00
parent 6e6672b135
commit f79d191701
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 12 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
modules/config/default/autoload/default.el
View file

@ -270,7 +270,13 @@ If prefix ARG is set, prompt for a known project to search from."
"Conduct a text search in the current project for symbol at point.
If prefix ARG is set, prompt for a known project to search from."
(interactive
(list current-prefix-arg (or (thing-at-point 'symbol t) "")))
(list current-prefix-arg
(or (and (use-region-p)
(rxt-quote-pcre
(buffer-substring-no-properties (region-beginning)
(region-end))))
(rxt-quote-pcre (thing-at-point 'symbol t))
"")))
(let ((default-directory
(if arg
(if-let* ((projects (projectile-relevant-known-projects)))
@ -279,9 +285,9 @@ If prefix ARG is set, prompt for a known project to search from."
(user-error "There are no known projects"))
default-directory)))
(cond ((featurep! :completion ivy)
(+ivy/project-search nil (rxt-quote-pcre symbol)))
(+ivy/project-search nil symbol))
((featurep! :completion helm)
(+helm/project-search nil (rxt-quote-pcre symbol)))
(+helm/project-search nil symbol))
((rgrep (regexp-quote symbol))))))
;;;###autoload