From 8bf87372fe5c9b92c36eb436d528a0e226d59061 Mon Sep 17 00:00:00 2001 From: Jen-Chieh Shen Date: Fri, 29 Nov 2024 16:57:21 +0800 Subject: [PATCH] ignore find systems --- scripts/_prepare.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scripts/_prepare.lisp b/scripts/_prepare.lisp index ccf00c8..15be4db 100644 --- a/scripts/_prepare.lisp +++ b/scripts/_prepare.lisp @@ -8,7 +8,7 @@ (defun this-load-system (name) "Load the system by NAME." - (if (asdf:find-system name) + (if (ignore-errors (asdf:find-system name)) (asdf:load-system name) (ql:quickload name)))