[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r102800: * lisp/subr.el (read-char-ch
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r102800: * lisp/subr.el (read-char-choice): Use read-key. Suggested by Stefan. |
Date: |
Sun, 09 Jan 2011 09:26:29 -0500 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 102800
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sun 2011-01-09 09:26:29 -0500
message:
* lisp/subr.el (read-char-choice): Use read-key. Suggested by Stefan.
* src/fns.c (Fyes_or_no_p): Minor doc fix.
modified:
lisp/ChangeLog
lisp/subr.el
src/fns.c
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-01-09 04:59:56 +0000
+++ b/lisp/ChangeLog 2011-01-09 14:26:29 +0000
@@ -1,5 +1,7 @@
2011-01-09 Chong Yidong <address@hidden>
+ * subr.el (read-char-choice): Use read-key.
+
* custom.el (custom-safe-themes): Rename from
custom-safe-theme-files. Add :risky tag.
(load-theme, custom-theme-load-confirm): Save sha1 hashes to
=== modified file 'lisp/subr.el'
--- a/lisp/subr.el 2011-01-08 21:17:58 +0000
+++ b/lisp/subr.el 2011-01-09 14:26:29 +0000
@@ -1985,7 +1985,7 @@
(unless (get-text-property 0 'face prompt)
(setq prompt (propertize prompt 'face 'minibuffer-prompt)))
(setq char (let ((inhibit-quit inhibit-keyboard-quit))
- (read-event prompt)))
+ (read-key prompt)))
(cond
((not (numberp char)))
((memq char chars)
=== modified file 'src/fns.c'
--- a/src/fns.c 2011-01-08 21:17:58 +0000
+++ b/src/fns.c 2011-01-09 14:26:29 +0000
@@ -2464,8 +2464,8 @@
doc: /* Ask user a yes-or-no question. Return t if answer is yes.
The string to display to ask the question is obtained by
formatting the string PROMPT with arguments ARGS (see `format').
-The result should end in a space; `y-or-n-p' adds \"(yes or no) \"
-to it.
+The result should end in a space; `yes-or-no-p' adds
+\"(yes or no) \" to it.
The user must confirm the answer with RET, and can edit it until it
has been confirmed.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r102800: * lisp/subr.el (read-char-choice): Use read-key. Suggested by Stefan.,
Chong Yidong <=