aboutsummaryrefslogtreecommitdiff
path: root/guix/scripts/archive.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-03-31 21:53:51 +0200
committerLudovic Courtès <ludo@gnu.org>2014-03-31 21:59:14 +0200
commitde28fefd7733619c6bcc3938bd8a5b5717fc7948 (patch)
treeed65c3a9f5f698f49889be7563612b0fef32e379 /guix/scripts/archive.scm
parentef27aa9c8ce45c975944638b534a1413d431bb75 (diff)
downloadgnu-guix-de28fefd7733619c6bcc3938bd8a5b5717fc7948.tar
gnu-guix-de28fefd7733619c6bcc3938bd8a5b5717fc7948.tar.gz
guix archive: Make sure $sysconfdir/guix exists in '--authorize'.
* guix/scripts/archive.scm (authorize-key): Add 'mkdir-p' call. Reported by Alex Sassmannshausen <alex.sassmannshausen@gmail.com>.
Diffstat (limited to 'guix/scripts/archive.scm')
-rw-r--r--guix/scripts/archive.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/guix/scripts/archive.scm b/guix/scripts/archive.scm
index c900fcecb9..0f9e4d8360 100644
--- a/guix/scripts/archive.scm
+++ b/guix/scripts/archive.scm
@@ -286,6 +286,7 @@ the input port."
;; Add KEY to the ACL and write that.
(let ((acl (public-keys->acl (cons key (acl->public-keys acl)))))
+ (mkdir-p (dirname %acl-file))
(with-atomic-file-output %acl-file
(lambda (port)
(display (canonical-sexp->string acl) port))))))