summary refs log tree commit diff
diff options
context:
space:
mode:
authorMaxim Cournoyer <maxim.cournoyer@gmail.com>2018-01-27 12:22:11 -0500
committerLudovic Courtès <ludo@gnu.org>2018-01-28 23:14:55 +0100
commit8fbc1a22084640ad5cd0df1234bfd42b5d92ef98 (patch)
tree9cbfcbe4fd7ae741f4278c45030d1dccf2fc652b
parent63666a348af5ef5190cbe9611c40f2b9188b7967 (diff)
downloadguix-8fbc1a22084640ad5cd0df1234bfd42b5d92ef98.tar.gz
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>
-rw-r--r--guix/build/download.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/build/download.scm b/guix/build/download.scm
index 609a100538..1b630a9d6d 100644
--- a/guix/build/download.scm
+++ b/guix/build/download.scm
@@ -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)))