diff --git a/guix-data-service/model/build.scm b/guix-data-service/model/build.scm index 212b679..6dd7a96 100644 --- a/guix-data-service/model/build.scm +++ b/guix-data-service/model/build.scm @@ -15,7 +15,12 @@ (define* (select-build-stats conn build-servers #:key revision-commit) (define criteria - `(,@(if build-servers + `(,@(if revision-commit + ;; Ignore cross built derivations, as I'm not aware of a build server + ;; that builds them + '("package_derivations.system = package_derivations.target") + '()) + ,@(if build-servers (list (string-append "builds.build_server_id IN ("