From ec4d308a9e306e8784c324a2f8511e27c50f9dff Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Tue, 13 Nov 2012 22:57:36 +0100 Subject: guix-download: Use code from (guix build download). * guix-download.in (http-fetch, ftp-fetch): Remove. (fetch-and-store): Replace `uri' parameter with `name', for the output file name. Redirect the output of `fetch' to the error port. (guix-download): Call `url-fetch' for all URI schemes except `file'. Handle PATH equal to #f. * guix/download.scm: Export `%mirrors'. * tests/guix-download.sh: Change erroneous URL, because URLs at example.com are all valid redirections. --- tests/guix-download.sh | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'tests/guix-download.sh') diff --git a/tests/guix-download.sh b/tests/guix-download.sh index e756600404..3c0c6dc7cf 100644 --- a/tests/guix-download.sh +++ b/tests/guix-download.sh @@ -23,7 +23,7 @@ guix-download --version # Make sure it fails here. -if guix-download http://www.example.com/does-not-exist +if guix-download http://does.not/exist then false; else true; fi if guix-download unknown://some/where; -- cgit v1.2.3