Fix help-form binding in dired-create-files

This fixes Bug#32630: since "dired-aux" moved to lexical binding mode,
the free variable TO in the constructed HELP-FORM got out of scope of
the surrounding 'let'.

* lisp/dired-aux.el (dired-create-files): Make the binding of
HELP-FORM a string.
This commit is contained in:
Michael Heerdegen 2018-09-04 22:00:11 +02:00
parent cf7932712a
commit 1531bca523

View file

@ -1712,7 +1712,7 @@ or with the current marker character if MARKER-CHAR is t."
(let* ((overwrite (file-exists-p to))
(dired-overwrite-confirmed ; for dired-handle-overwrite
(and overwrite
(let ((help-form '(format-message "\
(let ((help-form (format-message "\
Type SPC or `y' to overwrite file `%s',
DEL or `n' to skip to next,
ESC or `q' to not overwrite any of the remaining files,