X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fasdf-install%2Finstaller.lisp;h=5e7f970bd0ff8b69730c4f5c96d9c68190d7b24e;hb=1e9a538c32223df9132c1e7fb2b67a2129c40a8d;hp=607b02dcb818bbeebb91c64a2639d810c39e4907;hpb=4ed3f0d08c3a57a6762018d9622f253ab9d0f2b6;p=sbcl.git

diff --git a/contrib/asdf-install/installer.lisp b/contrib/asdf-install/installer.lisp
index 607b02d..5e7f970 100644
--- a/contrib/asdf-install/installer.lisp
+++ b/contrib/asdf-install/installer.lisp
@@ -326,6 +326,7 @@
 			     (unless restart-p (return))))))))
 	     (one-iter packages)))
       (let ((p (merge-pathnames "trusted-uids.lisp" *dot-sbcl*)))
+	(ensure-directories-exist p)
 	(with-open-file (out p :direction :output)
 	  (with-standard-io-syntax
 	    (prin1 *trusted-uids* out))))