[no subject]

[Mathieu Othacehe]

branch: master
commit 8d5b0cc5238afa2d72c9ef2f2e63fc971386986d
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Wed Apr 28 17:55:47 2021 +0200

    database: Fix pending builds cancel query.
    
    * src/cuirass/database.scm (db-cancel-pending-builds!): Fix query.
---
 src/cuirass/database.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm
index 9c83925..c7b5704 100644
--- a/src/cuirass/database.scm
+++ b/src/cuirass/database.scm
@@ -968,7 +968,7 @@ DELETE FROM Checkouts WHERE evaluation=" eval-id ";")))
     (exec-query/bind db "UPDATE Builds SET status="
                      (build-status canceled)
                      "WHERE evaluation=" eval-id
-                     "AND status = " (build-status started) ";")))
+                     "AND status < 0;")))
 
 (define (query->bind-arguments query-string)
   "Return a list of keys to query strings by parsing QUERY-STRING."