From: Oleh Krehel <ohwoeowho@gmail.com>
Date: Thu, 18 Aug 2016 14:05:29 +0000 (+0200)
Subject: lisp/textmodes/table.el (table-generate-source): Fix completing-read call
X-Git-Tag: emacs-26.0.90~1723
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=45522a1ed316ea639bee563e7ad91060b921dbfa;p=emacs.git

lisp/textmodes/table.el (table-generate-source): Fix completing-read call

Doesn't make sense to pass '(("html") ("latex") ("cals")) to
`completing-read'.
---

diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el
index 3502adf5e29..8330e1772d7 100644
--- a/lisp/textmodes/table.el
+++ b/lisp/textmodes/table.el
@@ -2968,8 +2968,7 @@ CALS (DocBook DTD):
 	  (default (car table-source-language-history))
 	  (language (downcase (completing-read
 			       (format "Language (default %s): " default)
-			       (mapcar (lambda (s) (list (symbol-name s)))
-				       table-source-languages)
+			       table-source-languages
 			       nil t nil 'table-source-language-history default))))
      (list
       (intern language)