diff options
author | Michael Heerdegen <michael_heerdegen@web.de> | 2018-09-04 22:00:11 +0200 |
---|---|---|
committer | Michael Heerdegen <michael_heerdegen@web.de> | 2018-10-20 18:51:38 +0200 |
commit | 1531bca523ea84c20eec9ce1dde0202a78956313 (patch) | |
tree | f2f2e3e57cf40253a553673d0762851c0b9dd56a /lisp/dired-aux.el | |
parent | cf7932712a1dac49fb299b20762d2f3329f9786b (diff) | |
download | emacs-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.el | 2 |
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, |