lisp/subr.el (read-quoted-char): Remove unused local variable `char'.

lisp/ChangeLog

+2013-07-07  Juanma Barranquero  <lekktu@gmail.com>
+
+	* subr.el (read-quoted-char): Remove unused local variable `char'.
+
 2013-07-07  Michael Kifer  <kifer@cs.stonybrook.edu>
 
 	* faces.el  (tty-run-terminal-initialization): function changed (Stefan

lisp/subr.el

@@ -1980,7 +1980,7 @@ any other terminator is used itself as input.
 The optional argument PROMPT specifies a string to use to prompt the user.
 The variable `read-quoted-char-radix' controls which radix to use
 for numeric input."
-  (let ((message-log-max nil) done (first t) (code 0) char translated)
+  (let ((message-log-max nil) done (first t) (code 0) translated)
     (while (not done)
       (let ((inhibit-quit first)
 	    ;; Don't let C-h get the help message--only help function keys.