X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Fbuild-from-source%2Fbuild-from-source.factor;fp=extra%2Fbuild-from-source%2Fbuild-from-source.factor;h=02b5826d790305b673c034572265e91f42186438;hp=c4f2c29ea94e4310b3437c3664ca4ee93e07dd27;hb=e20bf9b97fe60ebe18b8972b2b56fe681fce64a8;hpb=db559f6f98522594be8ef9a9392fb6d95fab3abe

diff --git a/extra/build-from-source/build-from-source.factor b/extra/build-from-source/build-from-source.factor
index c4f2c29ea9..02b5826d79 100644
--- a/extra/build-from-source/build-from-source.factor
+++ b/extra/build-from-source/build-from-source.factor
@@ -2,11 +2,12 @@
 ! See https://factorcode.org/license.txt for BSD license.
 USING: accessors arrays assocs calendar calendar.format cli.git
 combinators combinators.short-circuit continuations formatting
-github html.parser html.parser.analyzer http.client io
-io.directories io.encodings.string io.encodings.utf8 io.files
-io.launcher io.pathnames json kernel layouts math namespaces qw
-semver sequences sequences.extras sorting sorting.human
-sorting.specification splitting system unicode ;
+github html.parser html.parser.analyzer http.client
+http.download io io.directories io.encodings.string
+io.encodings.utf8 io.files io.launcher io.pathnames json kernel
+layouts math namespaces qw semver sequences sequences.extras
+sorting sorting.human sorting.specification splitting system
+unicode ;
 IN: build-from-source
 
 INITIALIZED-SYMBOL: use-gitlab-git-uris [ f ]
@@ -184,7 +185,7 @@ ERROR: no-output-file path ;
     ] with-directory ; inline
 
 : ?download ( path -- )
-    dup file-name file-exists? [ drop ] [ download ] if ; inline
+    dup file-name file-exists? [ drop ] [ download drop ] if ; inline
 
 : with-tar-gz ( path quot -- )
     '[