![](https://secure.gravatar.com/avatar/c7be29f230d0fc8df73e146bca8366fd.jpg?s=120&d=mm&r=g)
10 May
2011
10 May
'11
7:29 p.m.
Nikodemus Siivola <nikodemus.siivola@gmail.com> writes:
Those who run into this and need to get work done with devhead SBCL can in the meanwhile stick this in their .sbclrc after the #-quicklisp stanza.
I think this should work as well - can you try it and let me know? (setf asdf:*system-definition-search-functions* (substitute (lambda (name) (let ((file (ql-dist:find-asdf-system-file name))) (when (and file (equal (pathname-name file) name)) file))) 'ql-dist:find-asdf-system-file asdf:*system-definition-search-functions*)) Thanks, Zach