From 8e8d984fd6db77bb5c1bec66369e5e99470d416f Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Tue, 14 Apr 2020 15:10:24 +0200
Subject: maint: Actually check for the availablility of system packages.

* etc/release-manifest.scm (%system-manifest): New variable.
<top level>: Add it in 'concatenate-manifests' call.
---
 etc/release-manifest.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/etc/release-manifest.scm b/etc/release-manifest.scm
index 91471bd03b..ba2ab57aab 100644
--- a/etc/release-manifest.scm
+++ b/etc/release-manifest.scm
@@ -93,6 +93,13 @@ TARGET."
                       %base-packages))
                %hydra-supported-systems)))
 
+(define %system-manifest
+  (manifest
+   (append-map (lambda (system)
+                 (map (cut package->manifest-entry* <> system)
+                      %system-packages))
+               '("x86_64-linux" "i686-linux"))))  ;Guix System
+
 (define %cross-manifest
   (manifest
    (append-map (lambda (target)
@@ -115,5 +122,6 @@ TARGET."
 
 ;; Return the union of all three manifests.
 (concatenate-manifests (list %base-manifest
+                             %system-manifest
                              %cross-manifest
                              %cross-bootstrap-manifest))
-- 
cgit v1.2.3