[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
118/155: services: cuirass: Create the database directory.
From: |
John Darrington |
Subject: |
118/155: services: cuirass: Create the database directory. |
Date: |
Wed, 21 Dec 2016 20:48:39 +0000 (UTC) |
jmd pushed a commit to branch wip-installer
in repository guix.
commit 25db82066e21756a3a114f186cf3872a6d90737a
Author: Ludovic Courtès <address@hidden>
Date: Tue Dec 20 09:56:55 2016 +0100
services: cuirass: Create the database directory.
* gnu/services/cuirass.scm (cuirass-activation): Create the database
directory for CONFIG.
---
gnu/services/cuirass.scm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/gnu/services/cuirass.scm b/gnu/services/cuirass.scm
index d585e26..91d78d1 100644
--- a/gnu/services/cuirass.scm
+++ b/gnu/services/cuirass.scm
@@ -114,6 +114,7 @@
(define (cuirass-activation config)
"Return the activation code for CONFIG."
(let ((cache (cuirass-configuration-cache-directory config))
+ (db (dirname (cuirass-configuration-database config)))
(user (cuirass-configuration-user config))
(group (cuirass-configuration-group config)))
(with-imported-modules '((guix build utils))
@@ -121,10 +122,12 @@
(use-modules (guix build utils))
(mkdir-p #$cache)
+ (mkdir-p #$db)
(let ((uid (passwd:uid (getpw #$user)))
(gid (group:gid (getgr #$group))))
- (chown #$cache uid gid))))))
+ (chown #$cache uid gid)
+ (chown #$db uid gid))))))
(define cuirass-service-type
(service-type
- 131/155: import: github: Use 'json-fetch'., (continued)
- 131/155: import: github: Use 'json-fetch'., John Darrington, 2016/12/21
- 151/155: Revert "gnu: curl: Update replacement to 7.52.0 [fixes CVE-2016-{9586, 9952, 9953}].", John Darrington, 2016/12/21
- 77/155: nls: Update 'pt_BR' translation., John Darrington, 2016/12/21
- 79/155: nls: Update 'fr' translation., John Darrington, 2016/12/21
- 76/155: nls: Update 'da' translation., John Darrington, 2016/12/21
- 86/155: gexp: Native inputs of nested gexps are properly accounted for., John Darrington, 2016/12/21
- 92/155: gnu: cutadapt: Update to 1.12., John Darrington, 2016/12/21
- 107/155: gnu: tor: Update to 0.2.9.8., John Darrington, 2016/12/21
- 112/155: gnu: Add Ancient Greek Aspell dictionary., John Darrington, 2016/12/21
- 74/155: gnu: hurd-headers: Update to 0.9., John Darrington, 2016/12/21
- 118/155: services: cuirass: Create the database directory.,
John Darrington <=
- 138/155: gnu: mutt: Update to 1.7.2., John Darrington, 2016/12/21
- 145/155: gnu: curl: Update replacement to 7.52.0 [fixes CVE-2016-{9586, 9952, 9953}]., John Darrington, 2016/12/21
- 78/155: nls: Update 'da' package translation., John Darrington, 2016/12/21