From d771e24efa8be71a24aed84afbb98ec7bd969a4b Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Wed, 11 Mar 2026 02:54:27 -0400 Subject: [PATCH] fix(common-lisp): +lisp/reload-project `sly-asdf-load-system` doesn't auto-select the current system without a little help. Fix: #8708 --- modules/lang/common-lisp/autoload/common-lisp.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/modules/lang/common-lisp/autoload/common-lisp.el b/modules/lang/common-lisp/autoload/common-lisp.el index 5bd5f56de..da089893f 100644 --- a/modules/lang/common-lisp/autoload/common-lisp.el +++ b/modules/lang/common-lisp/autoload/common-lisp.el @@ -31,7 +31,10 @@ (error "Failed to reload Lisp project in 5 attempts.") (recurse (1+ attempt))))))) (recurse 1) - (sly-asdf-load-system))) + (sly-asdf-load-system + (or (sly-asdf-find-current-system) + (car sly-asdf-system-history) + (user-error "Can't find a system to reload"))))) ;;;###autoload (defun +lisp/find-file-in-quicklisp ()