01/02: hydra: bayfront: Adjust the binary tarball job on Cuirass.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository maintenance.

commit 9779050ef9dfde97370972fb84abab097d498d90
Author: Ludovic Courtès <address@hidden>
Date:   Fri Mar 17 22:23:06 2017 +0100

    hydra: bayfront: Adjust the binary tarball job on Cuirass.
    
    * hydra/cuirass-jobs.scm (tarball-job): Use 'self-contained-tarball'
    from (guix scripts pack).
---
 hydra/cuirass-jobs.scm | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/hydra/cuirass-jobs.scm b/hydra/cuirass-jobs.scm
index acfc339..45951f7 100644
--- a/hydra/cuirass-jobs.scm
+++ b/hydra/cuirass-jobs.scm
@@ -29,6 +29,7 @@
              (guix store)
              (guix grafts)
              (guix packages)
+             (guix profiles)
              (guix derivations)
              (guix monads)
              ((guix licenses)
@@ -39,9 +40,11 @@
              (gnu packages commencement)
              (gnu packages guile)
              (gnu packages make-bootstrap)
+             (gnu packages package-management)
              (gnu system)
              (gnu system vm)
-             (gnu system install)
+             ((guix scripts pack)
+              #:select (lookup-compressor self-contained-tarball))
              (srfi srfi-1)
              (ice-9 match))
 
@@ -120,8 +123,14 @@ for TARGET on SYSTEM."
                           (run-with-store store
                             (mbegin %store-monad
                               (set-guile-for-build (default-guile))
-                              (self-contained-tarball))
-                            #:system system))))
+                              (>>= (profile-derivation
+                                    (packages->manifest (list guix)))
+                                   (lambda (profile)
+                                     (self-contained-tarball
+                                      "guix-binary" profile
+                                      #:compressor
+                                      (lookup-compressor "lzip"))))))
+                          #:system system)))
       (#:description . "Stand-alone binary Guix tarball")
       (#:long-description . "This is a tarball containing binaries of Guix
 and all its dependencies, and ready to be installed on non-GuixSD