From 05eba838eab4ca928d8df926d70677821714e962 Mon Sep 17 00:00:00 2001 From: Mathieu Lirzin Date: Thu, 1 Dec 2016 20:59:43 +0100 Subject: [PATCH] base: Create the parent directories of '%package-cachedir'. * src/cuirass/base.scm (fetch-repository): Use 'mkdir-p' instead of 'mkdir' for 'cachedirectory'. --- src/cuirass/base.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm index 1deb389..8a14ddc 100644 --- a/src/cuirass/base.scm +++ b/src/cuirass/base.scm @@ -82,7 +82,7 @@ if required." commit)) (let ((cachedir (%package-cachedir))) - (or (file-exists? cachedir) (mkdir cachedir)) + (or (file-exists? cachedir) (mkdir-p cachedir)) (with-directory-excursion cachedir (let ((name (assq-ref spec #:name)) (url (assq-ref spec #:url))