~ruther/guix-local

9f05908fb1e3707cae593d94688748294717a546 — Leo Famulari 9 years ago b191f0a
download: Provide a fall-back guile for older daemons.

Fixes <http://bugs.gnu.org/25775>.

* guix/download.scm (in-band-download): Use %bootstrap-guile as a
fall-back when using older daemons that do not have a built-in
downloader.

Written-by: Ricardo Wurmus <rekado@elephly.net>
1 files changed, 4 insertions(+), 1 deletions(-)

M guix/download.scm
M guix/download.scm => guix/download.scm +4 -1
@@ 418,7 418,10 @@ GnuTLS itself and its dependencies.  See <http://bugs.gnu.org/22774>."
                       ;; hash of the expected result.
                       #:verify-certificate? #f)))))

  (mlet %store-monad ((guile (package->derivation guile system)))
  (mlet %store-monad ((guile (package->derivation
                              (or guile
                                  (@@ (gnu packages bootstrap) %bootstrap-guile))
                              system)))
    (gexp->derivation file-name builder
                      #:guile-for-build guile
                      #:system system