branch: main
commit 2cb6319130da829c010ba3e619a763a444da2fe3
Author: Romain GARBAGE <romain.garb...@inria.fr>
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 <l...@gnu.org>
---
 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)

Reply via email to