diff --git a/.gitignore b/.gitignore index 8c65286..d682f89 100644 --- a/.gitignore +++ b/.gitignore @@ -2,3 +2,10 @@ *~ quicklisp.tar quicklisp.tar.gz +asdf.lisp.* +cache +client-info.sexp +dists +local-projects +retired +tmp diff --git a/quicklisp/setup.lisp b/quicklisp/setup.lisp index a62b4aa..fb2a671 100644 --- a/quicklisp/setup.lisp +++ b/quicklisp/setup.lisp @@ -132,7 +132,7 @@ (when (and (consp form) (eq (first form) 'cl:defpackage) (ignore-errors (string (second form)))) - (show-package (second form))) + (show-package (second form))) (incf seen-so-far) (when (<= forms-per-char seen-so-far) (setf seen-so-far 0) @@ -158,7 +158,7 @@ (call-with-macroexpand-progress (lambda () (format t "~&; Loading ~S~%" (name strategy)) - (asdf:oos 'asdf:load-op (name strategy) :verbose nil)))) + (asdf:load-system (name strategy) :verbose nil)))) (defun autoload-system-and-dependencies (name &key prompt) "Try to load the system named by NAME, automatically loading any