Lines Matching refs:choice
58 we make that menu bar item (the one at that position) the default choice."
117 marked letters to pick up your choice. Type C-g or ESC ESC ESC to cancel.
122 :type '(choice string (const nil))
129 :type '(choice (const downcase)
131 (repeat (choice (const downcase) (const upcase))))
138 :type '(choice integer (const nil))
157 DEFAULT-ITEM, if non-nil, specifies an initial default choice.
166 chosen-string choice
178 ;; Choose an element of tmm-km-list; put it in choice.
184 (setq choice (cdr (car tmm-km-list)))
242 (setq choice (cdr (assoc out tmm-km-list)))
243 (and (null choice)
247 choice (cdr (assoc out tmm-km-list))))
248 (and (null choice) out
250 choice (cdr (assoc out tmm-km-list)))))
252 (setq chosen-string (car choice))
253 (setq choice (cdr choice))
256 choice)
258 (not-menu (tmm-prompt choice t))
260 ((keymapp choice)
261 (if (symbolp choice)
262 (setq choice (indirect-function choice)))
267 (x-popup-menu nil choice) ; Get the shortcuts
269 (tmm-prompt choice))
271 (choice
275 (call-interactively choice))
276 choice)))))