services: mumi-service-type: Update to latest version of mumi.
* gnu/services/web.scm (%mumi-activation): Create /var/mumi/db. (mumi-shepherd-services): Add service for mumi worker.master
parent
c107e50a0e
commit
a595399230
|
@ -10,6 +10,7 @@
|
||||||
;;; Copyright © 2017, 2018, 2019 Christopher Baines <mail@cbaines.net>
|
;;; Copyright © 2017, 2018, 2019 Christopher Baines <mail@cbaines.net>
|
||||||
;;; Copyright © 2018 Marius Bakke <mbakke@fastmail.com>
|
;;; Copyright © 2018 Marius Bakke <mbakke@fastmail.com>
|
||||||
;;; Copyright © 2019 Florian Pelz <pelzflorian@pelzflorian.de>
|
;;; Copyright © 2019 Florian Pelz <pelzflorian@pelzflorian.de>
|
||||||
|
;;; Copyright © 2020 Ricardo Wurmus <rekado@elephly.net>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -1670,12 +1671,14 @@ WSGIPassAuthorization On
|
||||||
#~(begin
|
#~(begin
|
||||||
(use-modules (guix build utils))
|
(use-modules (guix build utils))
|
||||||
|
|
||||||
|
(mkdir-p "/var/mumi/db")
|
||||||
(mkdir-p "/var/mumi/mails")
|
(mkdir-p "/var/mumi/mails")
|
||||||
(let* ((pw (getpwnam "mumi"))
|
(let* ((pw (getpwnam "mumi"))
|
||||||
(uid (passwd:uid pw))
|
(uid (passwd:uid pw))
|
||||||
(gid (passwd:gid pw)))
|
(gid (passwd:gid pw)))
|
||||||
(chown "/var/mumi" uid gid)
|
(chown "/var/mumi" uid gid)
|
||||||
(chown "/var/mumi/mails" uid gid)))))
|
(chown "/var/mumi/mails" uid gid)
|
||||||
|
(chown "/var/mumi/db" uid gid)))))
|
||||||
|
|
||||||
(define %mumi-accounts
|
(define %mumi-accounts
|
||||||
(list (user-group (name "mumi") (system? #t))
|
(list (user-group (name "mumi") (system? #t))
|
||||||
|
@ -1696,6 +1699,15 @@ WSGIPassAuthorization On
|
||||||
'(#$(file-append mumi "/bin/mumi"))
|
'(#$(file-append mumi "/bin/mumi"))
|
||||||
#:user "mumi" #:group "mumi"
|
#:user "mumi" #:group "mumi"
|
||||||
#:log-file "/var/log/mumi.log"))
|
#:log-file "/var/log/mumi.log"))
|
||||||
|
(stop #~(make-kill-destructor)))
|
||||||
|
(shepherd-service
|
||||||
|
(provision '(mumi-worker))
|
||||||
|
(documentation "Mumi bug-tracking web interface.")
|
||||||
|
(requirement '(networking))
|
||||||
|
(start #~(make-forkexec-constructor
|
||||||
|
'(#$(file-append mumi "/bin/mumi") "--worker")
|
||||||
|
#:user "mumi" #:group "mumi"
|
||||||
|
#:log-file "/var/log/mumi.worker.log"))
|
||||||
(stop #~(make-kill-destructor)))))
|
(stop #~(make-kill-destructor)))))
|
||||||
|
|
||||||
(define mumi-service-type
|
(define mumi-service-type
|
||||||
|
|
Reference in New Issue