* lisp/vc/vc-dir.el (vc-dir-search): Remove lambda.

(Bug#31578) Thanks to Dmitry Gutov <dgutov@yandex.ru>

diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el
index b823f2b3930c9e9995a89ecbe9054a5529849e33..9a6f6bb687492fc2970b9d0f74a259ca914a8f76 100644 (file)
--- a/lisp/vc/vc-dir.el
+++ b/lisp/vc/vc-dir.el
@@ -837,8 +837,7 @@ Stops when a match is found.
 To continue searching for next match, use command \\[tags-loop-continue]."
   (interactive "sSearch marked files (regexp): ")
   (tags-search regexp
-               (lambda ()
-                 (mapcar #'car (vc-dir-marked-only-files-and-states)))))
+               (mapcar #'car (vc-dir-marked-only-files-and-states))))
 
 (defun vc-dir-query-replace-regexp (from to &optional delimited)
   "Do `query-replace-regexp' of FROM with TO, on all marked files.