mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-03 12:27:26 -05:00
fix(common-lisp): recognize multi-argument inferior-lisp-program (#5515)
For example: 'ros -Q run' Co-authored-by: liyang <7325560@qq.com>
This commit is contained in:
@ -73,7 +73,7 @@
|
|||||||
"Attempt to auto-start sly when opening a lisp buffer."
|
"Attempt to auto-start sly when opening a lisp buffer."
|
||||||
(cond ((or (doom-temp-buffer-p (current-buffer))
|
(cond ((or (doom-temp-buffer-p (current-buffer))
|
||||||
(sly-connected-p)))
|
(sly-connected-p)))
|
||||||
((executable-find inferior-lisp-program)
|
((executable-find (car (split-string inferior-lisp-program)))
|
||||||
(let ((sly-auto-start 'always))
|
(let ((sly-auto-start 'always))
|
||||||
(sly-auto-start)
|
(sly-auto-start)
|
||||||
(add-hook 'kill-buffer-hook #'+common-lisp--cleanup-sly-maybe-h nil t)))
|
(add-hook 'kill-buffer-hook #'+common-lisp--cleanup-sly-maybe-h nil t)))
|
||||||
|
Reference in New Issue
Block a user