* lisp/subr.el (read-multiple-choice): Avoid free variable.

This commit is contained in:
Glenn Morris 2016-03-04 13:34:51 -05:00
parent 9f9b4fa783
commit 0cfdf1e83d

View file

@ -2296,7 +2296,7 @@ Usage example:
altered-name))
(append choices '((?? "?")))
", ")))
tchar buf wrong-char)
tchar buf wrong-char answer)
(save-window-excursion
(save-excursion
(while (not tchar)