procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Give feedback to the user in dired-do-find-regexp

Browse source 
* lisp/dired-aux.el (dired-do-find-regexp): Give some feedback to
the user (bug#35352).
This commit is contained in:
Lars Ingebrigtsen 2021-06-22 17:10:19 +02:00
parent 3c0b50d1fc
commit 142962a8bd
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/dired-aux.el
View file

@ -3208,10 +3208,12 @@ REGEXP should use constructs supported by your local `grep' command."
files))
(push mark files)))
(nreverse marks))
(message "Searching...")
(setq xrefs
(xref-matches-in-files regexp files))
(unless xrefs
(user-error "No matches for: %s" regexp))
(message "Searching...done")
xrefs))))
(xref--show-xrefs fetcher nil)))