use local clone to limit bandwidth usage

This commit is contained in:
Rob Vermaas 2010-07-27 18:06:47 +00:00
parent 6d028a8d43
commit 812689e523

View file

@ -407,7 +407,7 @@ sub fetchInputHg {
$ENV{"PRINT_PATH"} = "1"; $ENV{"PRINT_PATH"} = "1";
(my $res, $stdout, $stderr) = captureStdoutStderr(600, (my $res, $stdout, $stderr) = captureStdoutStderr(600,
("nix-prefetch-hg", $uri, $revision)); ("nix-prefetch-hg", $clonePath, $revision));
die "Cannot check out Mercurial repository `$uri':\n$stderr" unless $res; die "Cannot check out Mercurial repository `$uri':\n$stderr" unless $res;
($sha256, $storePath) = split ' ', $stdout; ($sha256, $storePath) = split ' ', $stdout;