From 766a82a0e1ef93b2a8c502419f260790052516a5 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 21 Dec 2000 16:39:28 +0000
Subject: [PATCH] Build an alist for completing-read as in 20.7.

---
 lisp/generic.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-- 
2.11.4.GIT