diff options
| author | Juri Linkov | 2019-07-16 01:12:12 +0300 |
|---|---|---|
| committer | Juri Linkov | 2019-07-16 01:12:12 +0300 |
| commit | 6253541c76a449780815f4a8fd75a9aa70b931ae (patch) | |
| tree | 27bcdb591c007efff245dc0ad7c334ec62d6e241 | |
| parent | 0746a9e275d6318be80dde39d7be72a447200612 (diff) | |
| download | emacs-6253541c76a449780815f4a8fd75a9aa70b931ae.tar.gz emacs-6253541c76a449780815f4a8fd75a9aa70b931ae.zip | |
* lisp/vc/vc-dir.el (vc-dir-search): Remove lambda.
(Bug#31578) Thanks to Dmitry Gutov <dgutov@yandex.ru>
| -rw-r--r-- | lisp/vc/vc-dir.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el index b823f2b3930..9a6f6bb6874 100644 --- a/lisp/vc/vc-dir.el +++ b/lisp/vc/vc-dir.el | |||
| @@ -837,8 +837,7 @@ Stops when a match is found. | |||
| 837 | To continue searching for next match, use command \\[tags-loop-continue]." | 837 | To continue searching for next match, use command \\[tags-loop-continue]." |
| 838 | (interactive "sSearch marked files (regexp): ") | 838 | (interactive "sSearch marked files (regexp): ") |
| 839 | (tags-search regexp | 839 | (tags-search regexp |
| 840 | (lambda () | 840 | (mapcar #'car (vc-dir-marked-only-files-and-states)))) |
| 841 | (mapcar #'car (vc-dir-marked-only-files-and-states))))) | ||
| 842 | 841 | ||
| 843 | (defun vc-dir-query-replace-regexp (from to &optional delimited) | 842 | (defun vc-dir-query-replace-regexp (from to &optional delimited) |
| 844 | "Do `query-replace-regexp' of FROM with TO, on all marked files. | 843 | "Do `query-replace-regexp' of FROM with TO, on all marked files. |