mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-24 07:20:37 +00:00
Build an alist for completing-read as in 20.7.
This commit is contained in:
parent
338f62706f
commit
766a82a0e1
@ -173,7 +173,7 @@ Used to determine if files in fundamental mode should be put into
|
||||
(defsubst generic-read-type ()
|
||||
(completing-read
|
||||
"Generic Type: "
|
||||
generic-mode-list
|
||||
(mapcar (lambda (elt) (list (symbol-name (car elt))))
|
||||
nil t))
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
Loading…
Reference in New Issue
Block a user