Commit 647ab967 authored by Leo Liu's avatar Leo Liu
Browse files

Fix argument to buffer-live-p in read-char-choice

parent 3ddfbced
2011-10-05 Leo Liu <sdl.web@gmail.com>
* subr.el (read-char-choice): Fix argument to buffer-live-p which
works with buffer object.
2011-10-05 Stefan Monnier <monnier@iro.umontreal.ca>
* mpc.el (mpc-tool-bar-map): Add labels.
......
......@@ -2170,7 +2170,7 @@ keyboard-quit events while waiting for a valid input."
(setq prompt (propertize prompt 'face 'minibuffer-prompt)))
(setq char (let ((inhibit-quit inhibit-keyboard-quit))
(read-key prompt)))
(and show-help (buffer-live-p helpbuf)
(and show-help (buffer-live-p (get-buffer helpbuf))
(kill-buffer helpbuf))
(cond
((not (numberp char)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment