summaryrefslogtreecommitdiff
path: root/lisp/dired-aux.el
diff options
context:
space:
mode:
authorMichael Heerdegen <michael_heerdegen@web.de>2018-09-04 22:00:11 +0200
committerMichael Heerdegen <michael_heerdegen@web.de>2018-10-20 18:51:38 +0200
commit1531bca523ea84c20eec9ce1dde0202a78956313 (patch)
treef2f2e3e57cf40253a553673d0762851c0b9dd56a /lisp/dired-aux.el
parentcf7932712a1dac49fb299b20762d2f3329f9786b (diff)
downloademacs-1531bca523ea84c20eec9ce1dde0202a78956313.tar.gz
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.
Diffstat (limited to 'lisp/dired-aux.el')
-rw-r--r--lisp/dired-aux.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index e40627309d7..eaf5f257012 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -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,