From de28fefd7733619c6bcc3938bd8a5b5717fc7948 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Mon, 31 Mar 2014 21:53:51 +0200
Subject: [PATCH] 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>.
---
guix/scripts/archive.scm | 1 +
1 file changed, 1 insertion(+)
diff --git a/guix/scripts/archive.scm b/guix/scripts/archive.scm
index c900fcecb90..0f9e4d83604 100644
--- a/guix/scripts/archive.scm
+++ b/guix/scripts/archive.scm
@@ -286,6 +286,7 @@ (define (read-key)
;; 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))))))
--
GitLab