Mercurial > emacs
comparison lisp/map-ynp.el @ 9850:62c0e8317ce2
(map-y-or-n-p): Set help-mode in *Help* buffer.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 09 Nov 1994 05:48:55 +0000 |
parents | 2acd8bf3819a |
children | 5803ff60cf47 |
comparison
equal
deleted
inserted
replaced
9849:430b8cf09515 | 9850:62c0e8317ce2 |
---|---|
200 action-alist | 200 action-alist |
201 ";\n") | 201 ";\n") |
202 (if action-alist ";\n") | 202 (if action-alist ";\n") |
203 (format "or . (period) to %s \ | 203 (format "or . (period) to %s \ |
204 the current %s and exit." | 204 the current %s and exit." |
205 action object))))) | 205 action object)))) |
206 (save-excursion | |
207 (set-buffer standard-output) | |
208 (help-mode))) | |
206 | 209 |
207 (setq next (` (lambda () | 210 (setq next (` (lambda () |
208 (setq next '(, next)) | 211 (setq next '(, next)) |
209 '(, elt))))) | 212 '(, elt))))) |
210 ((vectorp def) | 213 ((vectorp def) |