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 | bed40c39a14811a658b884596f4c1f843a299b6a (patch) | |
| tree | 7fd02c34a6c0cd6d528a1b0cc71ec5bf3ad7716a /lisp/map-ynp.el | |
| parent | 01a453133b73e130ac2415f07f6e9f63794d9efb (diff) | |
| download | emacs-bed40c39a14811a658b884596f4c1f843a299b6a.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)) |