From ed095bd7585e92d2159c34a6ce23a909f68a1900 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 8 Jul 2013 00:50:34 +0200 Subject: [PATCH] lisp/subr.el (read-quoted-char): Remove unused local variable `char'. --- lisp/ChangeLog | 14 +++++++++----- lisp/subr.el | 2 +- 2 files changed, 10 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cdc1b25c7e..ed02200144 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,8 +1,12 @@ +2013-07-07 Juanma Barranquero + + * subr.el (read-quoted-char): Remove unused local variable `char'. + 2013-07-07 Michael Kifer * faces.el (tty-run-terminal-initialization): function changed (Stefan Monnier's patch). - + * viper.el (viper-emacs-state-mode-list): add egg-status-buffer-mode. (viper-version): version update. (viper-go-away,viper-setup-hooks): function changed (Stefan Monnier's @@ -10,15 +14,15 @@ (viper--lookup-key,viper-catch-tty-ESC,viper-uncatch-tty-ESC, viper-setup-ESC-to-escape): new functions (Stefan Monnier's patch). - + * viper-cmd.el: (viper-del-forward-char-in-insert): new function. (viper-save-kill-buffer): check if buffer is modified. (viper-envelop-ESC-key): function deleted (Stefan Monnier's patch). (viper-intercept-ESC-key): function changed (Stefan Monnier's patch). - + * viper-keym.el (viper-ESC-key): constant changed (Stefan Monnier's patch). - + * ediff.el (ediff-files-command,ediff3-files-command): new functions. (ediff-merge-command,ediff-merge-with-ancestor-command): new functions. (ediff-directories-command,ediff-directories3-command): new functions. @@ -27,7 +31,7 @@ All the above are command-line interfaces to ediff: facilitate calling Emacs with the appropriate ediff functions invoked. (ediff-version): version update. - + 2013-07-07 Eli Zaretskii * simple.el (default-font-height, window-screen-lines): New diff --git a/lisp/subr.el b/lisp/subr.el index 63fb1621b3..a0ad722746 100644 --- a/lisp/subr.el +++ b/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. -- 2.20.1