Rename counsel-unquote-regex-parens to counsel--elisp-to-pcre
Re-implemented and renamed in: https://github.com/abo-abo/swiper/pull/1863 Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
parent
2ce0efe476
commit
5f554cdca7
1 changed files with 2 additions and 2 deletions
|
|
@ -647,7 +647,7 @@ construct the command.")
|
||||||
"Grep for STRING in the current project."
|
"Grep for STRING in the current project."
|
||||||
(or (counsel-more-chars)
|
(or (counsel-more-chars)
|
||||||
(let ((default-directory (ivy-state-directory ivy-last))
|
(let ((default-directory (ivy-state-directory ivy-last))
|
||||||
(regex (counsel-unquote-regex-parens
|
(regex (counsel--elisp-to-pcre
|
||||||
(setq ivy--old-re
|
(setq ivy--old-re
|
||||||
(ivy--regex string)))))
|
(ivy--regex string)))))
|
||||||
(counsel--async-command (format counsel-projectile-grep-command
|
(counsel--async-command (format counsel-projectile-grep-command
|
||||||
|
|
@ -681,7 +681,7 @@ construct the command.")
|
||||||
(match-string 1 (buffer-name))))
|
(match-string 1 (buffer-name))))
|
||||||
(let* ((cmd (format counsel-projectile-grep-command
|
(let* ((cmd (format counsel-projectile-grep-command
|
||||||
(shell-quote-argument
|
(shell-quote-argument
|
||||||
(counsel-unquote-regex-parens
|
(counsel--elisp-to-pcre
|
||||||
(ivy--regex ivy-text)))))
|
(ivy--regex ivy-text)))))
|
||||||
(cands (split-string (shell-command-to-string cmd) "\n" t)))
|
(cands (split-string (shell-command-to-string cmd) "\n" t)))
|
||||||
;; Need precise number of header lines for `wgrep' to work.
|
;; Need precise number of header lines for `wgrep' to work.
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue