Fix wrong-type-argument: commandp error when opening some REPLs
This commit is contained in:
parent
c31bb6a744
commit
53df5178a3
1 changed files with 5 additions and 1 deletions
|
@ -18,7 +18,11 @@
|
|||
(funcall (if same-window-p #'switch-to-buffer #'pop-to-buffer)
|
||||
(if (buffer-live-p buffer)
|
||||
buffer
|
||||
(setq buffer (save-window-excursion (call-interactively command)))
|
||||
(setq buffer
|
||||
(save-window-excursion
|
||||
(if (commandp command)
|
||||
(call-interactively command)
|
||||
(funcall command))))
|
||||
(unless (bufferp buffer)
|
||||
(error "REPL command didn't return a buffer"))
|
||||
(with-current-buffer buffer (+eval-repl-mode +1))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue