~ruther/guix-local

8fbc1a22084640ad5cd0df1234bfd42b5d92ef98 — Maxim Cournoyer 8 years ago 63666a3 
download: Fix return value of the url-fetch procedure.

Fixes <https://bugs.gnu.org/30270>.
Regression was introduced by commit 347fa4aebf.

* guix/build/download.scm (url-fetch): Return `file' instead of #t upon success.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
patch browse .tar.gz 
1 files changed, 1 insertions(+), 1 deletions(-)

M guix/build/download.scm

M guix/build/download.scm => guix/build/download.scm +1 -1
@@ 770,7 770,7 @@ otherwise simply ignore them."
                          #:reporter (progress-reporter/file
                                      (uri-abbreviation uri) size))
              (newline)))
          #t)))
          file)))
      ((ftp)
       (false-if-exception* (ftp-fetch uri file
                                       #:timeout timeout)))