Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
051f2775
Commit
051f2775
authored
Jul 12, 2013
by
Andreas Schwab
Browse files
* emacs-lisp/map-ynp.el (map-y-or-n-p): Fix last change.
parent
f6774c1a
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
2 deletions
+7
-2
lisp/ChangeLog
lisp/ChangeLog
+4
-0
lisp/emacs-lisp/map-ynp.el
lisp/emacs-lisp/map-ynp.el
+3
-2
No files found.
lisp/ChangeLog
View file @
051f2775
2013-07-12 Andreas Schwab <schwab@linux-m68k.org>
* emacs-lisp/map-ynp.el (map-y-or-n-p): Fix last change.
2013-07-12 Eli Zaretskii <eliz@gnu.org>
* simple.el (next-line, previous-line): Document TRY-VSCROLL and ARG.
...
...
lisp/emacs-lisp/map-ynp.el
View file @
051f2775
...
...
@@ -131,8 +131,9 @@ Returns the number of actions taken."
(
unwind-protect
(
progn
(
if
(
stringp
prompter
)
(
setq
prompter
(
lambda
(
object
)
(
format
prompter
object
))))
(
setq
prompter
(
let
((
prompter
prompter
))
(
lambda
(
object
)
(
format
prompter
object
)))))
(
while
(
funcall
next
)
(
setq
prompt
(
funcall
prompter
elt
))
(
cond
((
stringp
prompt
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment