Merge pull request #3415 from flatwhatson/repl-fix

Fix error when opening REPL from unsupported mode
This commit is contained in:
Henrik Lissner 2020-06-19 13:27:51 -04:00 committed by GitHub
commit 48dccf1c93
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -51,7 +51,7 @@
(defun +eval-open-repl (prompt-p &optional displayfn)
(cl-destructuring-bind (_mode fn . plist)
(or (assq major-mode +eval-repls)
(list))
(list nil nil))
(when (or (not fn) prompt-p)
(let* ((choices (or (cl-loop for sym being the symbols
for sym-name = (symbol-name sym)