diff options
| author | Nguyễn Gia Phong <mcsinyx@disroot.org> | 2025-10-10 00:22:15 +0900 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2025-11-02 14:48:38 +0100 |
| commit | b7a3ad2922cb407b18fb6c3489158dcbe533c6d3 (patch) | |
| tree | 1bb548aefa2d6835add8441b4d3e05d03138a5df /gnu | |
| parent | 04e9d68c579285fa97acdfc76d668f2069638654 (diff) | |
services: gitile: Add git-owner-validation? configuration.
* gnu/services/version-control.scm (gitile-configuration):
Add git-owner-validation? field.
* doc/guix.text (Version Control Services): Document it.
Change-Id: I7d35e66e512fcaae25a5eac138b0fb2437a7c70c
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/services/version-control.scm | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/gnu/services/version-control.scm b/gnu/services/version-control.scm index 93038c8286b..a7f40812a6c 100644 --- a/gnu/services/version-control.scm +++ b/gnu/services/version-control.scm @@ -86,7 +86,8 @@ gitile-configuration-port gitile-configuration-database gitile-configuration-repositories - gitile-configuration-git-base-url + gitile-configuration-git-owner-validation? + gitile-configuration-base-git-url gitile-configuration-index-title gitile-configuration-intro gitile-configuration-footer @@ -503,6 +504,8 @@ provide a web interface to view selected repositories."))) (default "/var/lib/gitile/gitile-db.sql")) (repositories gitile-configuration-repositories (default "/var/lib/gitolite/repositories")) + (git-owner-validation? gitile-configuration-git-owner-validation? + (default #t)) (base-git-url gitile-configuration-base-git-url) (index-title gitile-configuration-index-title (default "Index")) @@ -512,7 +515,8 @@ provide a web interface to view selected repositories."))) (default '())) (nginx gitile-configuration-nginx)) -(define (gitile-config-file host port database repositories base-git-url +(define (gitile-config-file host port database repositories + git-owner-validation? base-git-url index-title intro footer) (define build #~(write `(config @@ -520,6 +524,7 @@ provide a web interface to view selected repositories."))) (host #$host) (database #$database) (repositories #$repositories) + (git-owner-validation? #$git-owner-validation?) (base-git-url #$base-git-url) (index-title #$index-title) (intro #$intro) @@ -531,7 +536,7 @@ provide a web interface to view selected repositories."))) (define gitile-nginx-server-block (match-lambda (($ <gitile-configuration> package host port database repositories - base-git-url index-title intro footer nginx) + git-owner-validation? base-git-url index-title intro footer nginx) (list (nginx-server-configuration (inherit nginx) (locations @@ -557,7 +562,7 @@ provide a web interface to view selected repositories."))) (define gitile-shepherd-service (match-lambda (($ <gitile-configuration> package host port database repositories - base-git-url index-title intro footer nginx) + git-owner-validation? base-git-url index-title intro footer nginx) (list (shepherd-service (provision '(gitile)) (requirement '(loopback)) @@ -567,6 +572,7 @@ provide a web interface to view selected repositories."))) `(,#$gitile "-c" #$(gitile-config-file host port database repositories + git-owner-validation? base-git-url index-title intro footer)) #:user "gitile" |