summaryrefslogtreecommitdiff
path: root/etc
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2026-02-16 10:50:23 +0200
committerAndreas Enge <andreas@enge.fr>2026-02-21 10:17:04 +0100
commit1ccb1cc14e08da11fe892590135eb0ab50fda87e (patch)
treeed415e51fda79380b58b5b7243e7a53d2bafd217 /etc
parenta1cc83b3860d8ac14223e0ed9c4a5d63b0552fef (diff)
teams: rust: Limit manifests to supported packages.
* etc/teams/rust/rust-manifest.scm, etc/teams/rust/rusty-packages.scm: Limit the manifests to packages which are supported on that architecture. Change-Id: I85b6f2a81835c961e9d320e94141eb273e99f9ba
Diffstat (limited to 'etc')
-rw-r--r--etc/teams/rust/rust-manifest.scm11
-rw-r--r--etc/teams/rust/rusty-packages.scm31
2 files changed, 21 insertions, 21 deletions
diff --git a/etc/teams/rust/rust-manifest.scm b/etc/teams/rust/rust-manifest.scm
index f34b7489ec8..40f031f401f 100644
--- a/etc/teams/rust/rust-manifest.scm
+++ b/etc/teams/rust/rust-manifest.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
+;;; Copyright © 2024, 2026 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -27,8 +27,9 @@
(map package->manifest-entry
(fold-packages
(lambda (package lst)
- (if (eq? (build-system-name (package-build-system package))
- (quote cargo))
- (cons package lst)
- lst))
+ (if (and (eq? (build-system-name (package-build-system package))
+ (quote cargo))
+ (supported-package? package))
+ (cons package lst)
+ lst))
(list))))
diff --git a/etc/teams/rust/rusty-packages.scm b/etc/teams/rust/rusty-packages.scm
index 3f8285f40a9..4bef448a3cd 100644
--- a/etc/teams/rust/rusty-packages.scm
+++ b/etc/teams/rust/rusty-packages.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
+;;; Copyright © 2024, 2026 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -17,10 +17,9 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; This file returns a manifest of packages built using the cargo-build-system
-;;; which are NOT prefixed with 'rust-' and the packages which use rust itself
-;;; as an input. This is a short list of packages which can be checked to see
-;;; if a rust update has gone smoothly. It is used to assist continuous
-;;; integration of the rust-team branch.
+;;; and the packages which use rust itself as an input. This is a short list of
+;;; packages which can be checked to see if a rust update has gone smoothly. It
+;;; is used to assist continuous integration of the rust-team branch.
(use-modules (guix packages)
(guix profiles)
@@ -31,15 +30,15 @@
(map package->manifest-entry
(fold-packages
(lambda (package lst)
- (if (or
- (eq? (build-system-name (package-build-system package))
- (quote cargo))
- (any
- (lambda (pkg)
- (member (specification->package "rust") pkg))
- (append (package-native-inputs package)
- (package-propagated-inputs package)
- (package-inputs package))))
- (cons package lst)
- lst))
+ (if (and (supported-package? package)
+ (or (eq? (build-system-name (package-build-system package))
+ (quote cargo))
+ (any
+ (lambda (pkg)
+ (member (specification->package "rust") pkg))
+ (append (package-native-inputs package)
+ (package-propagated-inputs package)
+ (package-inputs package)))))
+ (cons package lst)
+ lst))
(list))))