diff --git a/asdf.lisp b/asdf.lisp index cd066a5f8697a4dfa953f63a0805a44bc3701fbf..24e5f9dbb35dded1cf7bc6a954877b82da01ae9b 100644 --- a/asdf.lisp +++ b/asdf.lisp @@ -532,7 +532,7 @@ called with an object of type asdf:system." (system-source-file (cdr system-pair))))))) (defvar *central-registry* - '(*default-pathname-defaults*) + `((directory-namestring *default-pathname-defaults*)) "A list of 'system directory designators' ASDF uses to find systems. A 'system directory designator' is a pathname or a function