[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
From: |
Mathieu Othacehe |
Date: |
Wed, 28 Apr 2021 15:19:44 -0400 (EDT) |
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."