From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 21 Dec 2000 16:39:28 +0000 (+0000)
Subject: Build an alist for completing-read as in 20.7.
X-Git-Tag: emacs-pretest-21.0.95~339
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=766a82a0e1ef93b2a8c502419f260790052516a5;p=emacs.git

Build an alist for completing-read as in 20.7.
---

diff --git a/lisp/generic.el b/lisp/generic.el
index e08b4ad371c..f17e2c0814d 100644
--- a/lisp/generic.el
+++ b/lisp/generic.el
@@ -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))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;