New function read-char-choice for reading a restricted set of chars.

* lisp/subr.el (read-char-choice): New function, factored out from
dired-query and hack-local-variables-confirm.

* lisp/dired-aux.el (dired-query):
* lisp/files.el (hack-local-variables-confirm): Use it.

1 files changed, 3 insertions, 0 deletions

diff --git a/etc/NEWS b/etc/NEWS
index fdc066870ef..eaacfac4d49 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -662,6 +662,9 @@ sc.el, x-menu.el, rnews.el, rnewspost.el
 
 * Lisp changes in Emacs 24.1
 
+** New function `read-char-choice' reads a restricted set of characters,
+discarding any inputs not inside the set.
+
 ** `y-or-n-p' and `yes-or-no-p' now accept format string arguments.
 
 ** `image-library-alist' is renamed to `dynamic-library-alist'.