branch master updated: Fix weather value.

[Mathieu Othacehe]

This is an automated email from the git hooks/post-receive script.

mothacehe pushed a commit to branch master
in repository guix-cuirass.

The following commit(s) were added to refs/heads/master by this push:
     new 8bdc7ee  Fix weather value.
8bdc7ee is described below

commit 8bdc7ee5351c2d932c90697f84a200a4f49ab6da
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Tue Feb 2 14:27:49 2021 +0100

    Fix weather value.
    
    * src/cuirass/database.scm (db-get-builds): Fix weather value.
    * tests/http.scm (build-query-result): Adapt it.
---
 src/cuirass/database.scm | 5 +++--
 tests/http.scm           | 2 +-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm
index 8cb48a8..a9a6aae 100644
--- a/src/cuirass/database.scm
+++ b/src/cuirass/database.scm
@@ -1134,8 +1134,9 @@ ORDER BY ~a;"
                          (#:status . ,(string->number status))
                          (#:last-status . ,(and last-status
                                                 (string->number last-status)))
-                         (#:weather . ,(and weather
-                                            (string->number weather)))
+                         (#:weather . ,(if weather
+                                           (string->number weather)
+                                           (build-weather unknown)))
                          (#:priority . ,(string->number priority))
                          (#:max-silent . ,(string->number max-silent))
                          (#:timeout . ,(string->number timeout))
diff --git a/tests/http.scm b/tests/http.scm
index d6a9c6d..b814c4e 100644
--- a/tests/http.scm
+++ b/tests/http.scm
@@ -65,7 +65,7 @@
     (#:system . "x86_64-linux")
     (#:nixname . "fake-1.0")
     (#:buildstatus . 0)
-    (#:weather . #nil)
+    (#:weather . -1)
     (#:busy . 0)
     (#:priority . 0)
     (#:finished . 1)