Mercurial > emacs
changeset 6438:45ab50a1dc55
(map-y-or-n-p): Call x-popup-dialog the new way.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 20 Mar 1994 07:05:14 +0000 |
| parents | f9920b777c65 |
| children | 463b12ba8260 |
| files | lisp/map-ynp.el |
| diffstat | 1 files changed, 1 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/map-ynp.el Sun Mar 20 06:30:14 1994 +0000 +++ b/lisp/map-ynp.el Sun Mar 20 07:05:14 1994 +0000 @@ -137,8 +137,7 @@ ;; Prompt the user about this object. (if mouse-event (setq def (or (x-popup-dialog mouse-event - (list "gratuitous" - (cons prompt map))) + (cons prompt map)) 'quit)) ;; Prompt in the echo area. (let ((cursor-in-echo-area (not no-cursor-in-echo-area)))