Skip to content

GitLab

Commit 230ac7f6 authored by Roland McGrath's avatar Roland McGrath
Browse files

(map-y-or-n-p): Don't add any text to the ACTION-ALIST descriptions to make 

dialog box buttons.
parent 8e86942b
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 2 deletions
lisp/map-ynp.el
View file @ 230ac7f6
...@@ -104,8 +104,7 @@ Returns the number of actions taken." ...@@ -104,8 +104,7 @@ Returns the number of actions taken."
((, (if help (concat action " All " objects) ((, (if help (concat action " All " objects)
"Do All")) . automatic) "Do All")) . automatic)
(,@ (mapcar (lambda (elt) (,@ (mapcar (lambda (elt)
(cons (concat (capitalize (nth 2 elt)) (cons (capitalize (nth 2 elt))
" " object)
(vector (nth 1 elt)))) (vector (nth 1 elt))))
action-alist)))) action-alist))))
mouse-event last-nonmenu-event)) mouse-event last-nonmenu-event))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment