diff options
| author | Roland McGrath <roland@gnu.org> | 1991-07-01 20:59:52 +0000 |
|---|---|---|
| committer | Roland McGrath <roland@gnu.org> | 1991-07-01 20:59:52 +0000 |
| commit | 33fb4502c1c13ce4a095e986c68c83c4a86f5571 (patch) | |
| tree | d5ed2dc32b620262adbdbad198da5a98e044a2b3 /lisp/map-ynp.el | |
| parent | 57679f53092ce6edbc9b199ba4c593bfdeaefdd7 (diff) | |
| download | emacs-33fb4502c1c13ce4a095e986c68c83c4a86f5571.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/map-ynp.el')
| -rw-r--r-- | lisp/map-ynp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/map-ynp.el b/lisp/map-ynp.el index b562234e9a7..f55d6e62713 100644 --- a/lisp/map-ynp.el +++ b/lisp/map-ynp.el @@ -120,7 +120,7 @@ Returns the number of actions taken." (if (funcall prompter elt) (progn (funcall actor elt) - (setq actions (1+ actions))))) + (setq actions (1+ actions)))))) ((= ?? char) (setq unread-command-char help-char) (setq next (` (function (lambda () @@ -134,7 +134,7 @@ Returns the number of actions taken." (sit-for 1) (setq next (` (function (lambda () (setq next (, next)) - t)))))))) + t))))))) (if (eval prompt) (progn (funcall actor (car list)) |