From 62cab99c3297a066f466780bb4d83a4f142538c7 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Mon, 12 Nov 2012 23:10:26 +0100 Subject: Add (guix download) and (guix build download). * guix/download.scm, guix/build/download.scm: New files. * Makefile.am (MODULES): Add them. * tests/builders.scm ("url-fetch"): New test. * distro/packages/bootstrap.scm (bootstrap-origin): Support `url-fetch'. * guix/snix.scm (snix-derivation->guix-package): Use `url-fetch' instead of `http-fetch'. --- distro/packages/bootstrap.scm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'distro/packages') diff --git a/distro/packages/bootstrap.scm b/distro/packages/bootstrap.scm index 533ff42987..95a7de444c 100644 --- a/distro/packages/bootstrap.scm +++ b/distro/packages/bootstrap.scm @@ -21,6 +21,7 @@ (define-module (distro packages bootstrap) #:use-module (guix packages) #:use-module (guix ftp) #:use-module (guix http) + #:use-module (guix download) #:use-module (guix build-system) #:use-module (guix build-system gnu) #:use-module (guix build-system trivial) @@ -70,6 +71,8 @@ (define (boot fetch) (boot http-fetch)) ((eq? orig-method ftp-fetch) (boot ftp-fetch)) + ((eq? orig-method url-fetch) + (boot url-fetch)) (else orig-method)))))) (define (package-from-tarball name* source* program-to-test description*) -- cgit v1.2.3