branch: main
commit 2cb6319130da829c010ba3e619a763a444da2fe3
Author: Romain GARBAGE <[email protected]>
AuthorDate: Fri Apr 4 16:16:21 2025 +0200
forgejo: Don't use literal value for build status comparison.
* src/cuirass/forges/forgejo.scm (forgejo-handle-notification): Don't use
literal value when checking build success.
Signed-off-by: Ludovic Courtès <[email protected]>
---
src/cuirass/forges/forgejo.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/cuirass/forges/forgejo.scm b/src/cuirass/forges/forgejo.scm
index f80a541..5ef640f 100644
--- a/src/cuirass/forges/forgejo.scm
+++ b/src/cuirass/forges/forgejo.scm
@@ -389,7 +389,8 @@ EVALUATION-FAILED are numbers and BUILD-RESULTS is a list
of build records."
evaluation-id cuirass-url evaluation-id
name cuirass-url name))
(succeeded-builds (filter-map (lambda (build)
- (and (eq? 0
(build-current-status build))
+ (and (=
(build-status succeeded)
+
(build-current-status build))
(build-nix-name build)))
build-results))
(failed-builds (filter-map (lambda (build)