From 230ac7f6ed68f7a589fb4c82f51d62174c582742 Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Tue, 22 Mar 1994 00:27:12 +0000 Subject: (map-y-or-n-p): Don't add any text to the ACTION-ALIST descriptions to make dialog box buttons. --- lisp/map-ynp.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'lisp') diff --git a/lisp/map-ynp.el b/lisp/map-ynp.el index f4e22ecbb2..a96f72f61b 100644 --- a/lisp/map-ynp.el +++ b/lisp/map-ynp.el @@ -104,8 +104,7 @@ Returns the number of actions taken." ((, (if help (concat action " All " objects) "Do All")) . automatic) (,@ (mapcar (lambda (elt) - (cons (concat (capitalize (nth 2 elt)) - " " object) + (cons (capitalize (nth 2 elt)) (vector (nth 1 elt)))) action-alist)))) mouse-event last-nonmenu-event)) -- cgit v1.2.3