aboutsummaryrefslogtreecommitdiff
path: root/genenetwork/services/genenetwork.scm
diff options
context:
space:
mode:
Diffstat (limited to 'genenetwork/services/genenetwork.scm')
-rw-r--r--genenetwork/services/genenetwork.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm
index a6f757b..ef59701 100644
--- a/genenetwork/services/genenetwork.scm
+++ b/genenetwork/services/genenetwork.scm
@@ -126,7 +126,7 @@
(gn2-server-url gn-uploader-configuration-gn2-server-url
(default "https://genenetwork.org"))
(log-level gn-uploader-configuration-log-level
- (default "WARNING")))
+ (default 'warning)))
(define %genenetwork-accounts
(list (user-group
@@ -578,7 +578,9 @@ a @code{<genenetwork-configuration>} record."
(file-system-mapping
(source gn-uploader-profile)
(target source))))
- (extra-cli-arguments (list "--log-level" log-level)))))))
+ (extra-cli-arguments
+ (list "--log-level"
+ (string-upcase (symbol->string log-level)))))))))
(define (gn-uploader-nginx-server-block config)
(match-record config <gn-uploader-configuration>