guix-download: Use code from (guix build download).
authorLudovic Courtès <ludo@gnu.org>
Tue, 13 Nov 2012 21:57:36 +0000 (22:57 +0100)
committerLudovic Courtès <ludo@gnu.org>
Tue, 13 Nov 2012 22:04:21 +0000 (23:04 +0100)
commitec4d308a9e306e8784c324a2f8511e27c50f9dff
tree73af7484ae7288c032eac7ce3966b96b818e17f0
parent352ec143de32e751286590ff51c40f5a32c7fa87
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.
guix-download.in
guix/download.scm
tests/guix-download.sh