diff options
| author | Jakub Kądziołka <kuba@kadziolka.net> | 2020-03-29 00:38:13 +0100 |
|---|---|---|
| committer | Jakub Kądziołka <kuba@kadziolka.net> | 2020-03-29 00:38:13 +0100 |
| commit | 44fb8cf84107bf2baa207216fda0ee5476bafb74 (patch) | |
| tree | ccfe580739e308a604fea9b05943294e2f2e9e69 /guix/build/download.scm | |
| parent | 87bc9f022cdd3487e85cf83cf82222315246abf9 (diff) | |
| parent | 62b9ad19e3a6638f8e077753454fdf08ba586146 (diff) | |
| download | guix-patches-44fb8cf84107bf2baa207216fda0ee5476bafb74.tar guix-patches-44fb8cf84107bf2baa207216fda0ee5476bafb74.tar.gz | |
Merge branch 'master' into staging
Diffstat (limited to 'guix/build/download.scm')
| -rw-r--r-- | guix/build/download.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/guix/build/download.scm b/guix/build/download.scm index c647d00f6b..46af149b2f 100644 --- a/guix/build/download.scm +++ b/guix/build/download.scm @@ -693,6 +693,13 @@ otherwise simply ignore them." (() (format (current-error-port) "failed to download ~s from ~s~%" file url) + + ;; Remove FILE in case we made an incomplete download, for example due + ;; to ENOSPC. + (catch 'system-error + (lambda () + (delete-file file)) + (const #f)) #f)))) ;;; download.scm ends here |