diff options
| author | Jakub Kądziołka <kuba@kadziolka.net> | 2021-02-14 14:15:32 +0100 |
|---|---|---|
| committer | Jakub Kądziołka <kuba@kadziolka.net> | 2021-02-14 14:15:32 +0100 |
| commit | 8970fb019aff5eebedd100ce1f2c972cbe929f18 (patch) | |
| tree | 20a57574370a70b0fd50ce25ea356b6a0a9671b4 /guix/scripts/pull.scm | |
| parent | 3afcb87b0b1c8365aa4fa06df9731f069d99dcfe (diff) | |
| parent | 19783b9f553e433743fd695302df8cac4ec91ae1 (diff) | |
Merge branch 'master' into staging
Diffstat (limited to 'guix/scripts/pull.scm')
| -rw-r--r-- | guix/scripts/pull.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/scripts/pull.scm b/guix/scripts/pull.scm index 4e0ab5d341..13d5eceada 100644 --- a/guix/scripts/pull.scm +++ b/guix/scripts/pull.scm @@ -39,7 +39,7 @@ close-inferior) #:use-module (guix scripts build) #:use-module (guix scripts describe) - #:autoload (guix build utils) (which) + #:autoload (guix build utils) (which mkdir-p) #:use-module ((guix build syscalls) #:select (with-file-lock/no-wait)) #:use-module (guix git) @@ -521,6 +521,7 @@ true, display what would be built without actually building it." (catch 'system-error (lambda () (false-if-exception (delete-file link)) + (mkdir-p (dirname link)) (symlink %current-profile link)) (lambda args (leave (G_ "while creating symlink '~a': ~a~%") |