about summary refs log tree commit diff
diff options
context:
space:
mode:
-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>