From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 18 May 2021 22:06:15 +0000 (-0400)
Subject: * lisp/find-dired.el (find-dired): Use a proper closure
X-Git-Tag: emacs-28.0.90~2415
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2520a163cb28a180222fe4421123cc743581b893;p=emacs.git

* lisp/find-dired.el (find-dired): Use a proper closure
---

diff --git a/lisp/find-dired.el b/lisp/find-dired.el
index adc5672eca9..87a7407a866 100644
--- a/lisp/find-dired.el
+++ b/lisp/find-dired.el
@@ -225,8 +225,8 @@ it finishes, type \\[kill-find]."
       (use-local-map map))
     (setq-local dired-sort-inhibit t)
     (setq-local revert-buffer-function
-                `(lambda (ignore-auto noconfirm)
-                   (find-dired ,dir ,find-args)))
+                (lambda (_ignore-auto _noconfirm)
+                  (find-dired dir find-args)))
     ;; Set subdir-alist so that Tree Dired will work:
     (if (fboundp 'dired-simple-subdir-alist)
 	;; will work even with nested dired format (dired-nstd.el,v 1.15