* lisp/subr.el (read-quoted-char): Use read-key.