projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
update.
[chise/xemacs-chise.git-]
/
lisp
/
cmdloop.el
diff --git
a/lisp/cmdloop.el
b/lisp/cmdloop.el
index
53fd00b
..
e5b4be0
100644
(file)
--- a/
lisp/cmdloop.el
+++ b/
lisp/cmdloop.el
@@
-433,9
+433,9
@@
and can edit it until it has been confirmed."
(while (stringp ans)
(setq ans (downcase (read-string p nil t))) ;no history
(cond ((string-equal ans (gettext "yes"))
(while (stringp ans)
(setq ans (downcase (read-string p nil t))) ;no history
(cond ((string-equal ans (gettext "yes"))
- (setq ans 't))
+ (setq ans t))
((string-equal ans (gettext "no"))
((string-equal ans (gettext "no"))
- (setq ans 'nil))
+ (setq ans nil))
(t
(ding nil 'yes-or-no-p)
(discard-input)
(t
(ding nil 'yes-or-no-p)
(discard-input)