~ruther/guix-local: guix archive: Make sure $sysconfdir/guix exists in '--authorize'.

de28fefd7733619c6bcc3938bd8a5b5717fc7948 — Ludovic Courtès 12 years ago ef27aa9

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>.

patch browse .tar.gz

1 files changed, 1 insertions(+), 0 deletions(-)

M guix/scripts/archive.scm

M guix/scripts/archive.scm => guix/scripts/archive.scm +1 -0

@@ 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))))))