summaryrefslogtreecommitdiff
path: root/gnu/services/cgit.scm
diff options
context:
space:
mode:
authorClément Lassieur <clement@lassieur.org>2018-08-12 21:19:38 +0200
committerClément Lassieur <clement@lassieur.org>2018-08-13 00:29:47 +0200
commitefb22b47dbafff233e0a2d332d019270297be8b5 (patch)
tree1becef8a167ad83816b23189ca4fb18399f61f88 /gnu/services/cgit.scm
parent162c8ab82e25214f27b8f727799a7cfb83de3932 (diff)
services: cgit: Disable repo booleans having a global counterpart.
Otherwise the global counterpart is never taken into account. * doc/guix.texi (Version Control Services): Update accordingly. * gnu/services/cgit.scm (repo-boolean?, serialize-repo-boolean): Use the DEFINE-MAYBE macro to allow for the 'disabled value. (repository-cgit-configuration)[enable-commit-graph?, enable-log-filecount?, enable-log-linecount?, enable-remote-branches?, enable-subject-links?, enable-html-serving?]: Change default value to 'disabled.
Diffstat (limited to 'gnu/services/cgit.scm')
-rw-r--r--gnu/services/cgit.scm13
1 files changed, 7 insertions, 6 deletions
diff --git a/gnu/services/cgit.scm b/gnu/services/cgit.scm
index 3289d373339..a84a2dadb23 100644
--- a/gnu/services/cgit.scm
+++ b/gnu/services/cgit.scm
@@ -149,6 +149,7 @@
149 149
150(define (serialize-repo-boolean field-name val) 150(define (serialize-repo-boolean field-name val)
151 (serialize-repo-integer field-name (if val 1 0))) 151 (serialize-repo-integer field-name (if val 1 0)))
152(define-maybe repo-boolean)
152 153
153(define repo-list? list?) 154(define repo-list? list?)
154 155
@@ -239,27 +240,27 @@ is no suitable HEAD.")
239 (repo-file-object "") 240 (repo-file-object "")
240 "Override the default @code{email-filter}.") 241 "Override the default @code{email-filter}.")
241 (enable-commit-graph? 242 (enable-commit-graph?
242 (repo-boolean #f) 243 (maybe-repo-boolean 'disabled)
243 "A flag which can be used to disable the global setting 244 "A flag which can be used to disable the global setting
244@code{enable-commit-graph?}.") 245@code{enable-commit-graph?}.")
245 (enable-log-filecount? 246 (enable-log-filecount?
246 (repo-boolean #f) 247 (maybe-repo-boolean 'disabled)
247 "A flag which can be used to disable the global setting 248 "A flag which can be used to disable the global setting
248@code{enable-log-filecount?}.") 249@code{enable-log-filecount?}.")
249 (enable-log-linecount? 250 (enable-log-linecount?
250 (repo-boolean #f) 251 (maybe-repo-boolean 'disabled)
251 "A flag which can be used to disable the global setting 252 "A flag which can be used to disable the global setting
252@code{enable-log-linecount?}.") 253@code{enable-log-linecount?}.")
253 (enable-remote-branches? 254 (enable-remote-branches?
254 (repo-boolean #f) 255 (maybe-repo-boolean 'disabled)
255 "Flag which, when set to @code{#t}, will make cgit display remote 256 "Flag which, when set to @code{#t}, will make cgit display remote
256branches in the summary and refs views.") 257branches in the summary and refs views.")
257 (enable-subject-links? 258 (enable-subject-links?
258 (repo-boolean #f) 259 (maybe-repo-boolean 'disabled)
259 "A flag which can be used to override the global setting 260 "A flag which can be used to override the global setting
260@code{enable-subject-links?}.") 261@code{enable-subject-links?}.")
261 (enable-html-serving? 262 (enable-html-serving?
262 (repo-boolean #f) 263 (maybe-repo-boolean 'disabled)
263 "A flag which can be used to override the global setting 264 "A flag which can be used to override the global setting
264@code{enable-html-serving?}.") 265@code{enable-html-serving?}.")
265 (hide? 266 (hide?