fix build

diff --git a/Build/DistributionUpdate.hs b/Build/DistributionUpdate.hs
index 4cddf1004caf30f40a5969fe31fc2858ba89eddc..0243e9bcb19abbd4ca237d30443629e7323eabc7 100644 (file)
--- a/Build/DistributionUpdate.hs
+++ b/Build/DistributionUpdate.hs
@@ -91,7 +91,7 @@ getbuild repodir (url, f) = do
                putStrLn $ "*** " ++ s
                return Nothing
        uo <- defUrlOptions
-       ifM (isRight <$> download nullMeterUpdate url tmp uo)
+       ifM (isRight <$> download nullMeterUpdate Nothing url tmp uo)
                ( ifM (liftIO $ virusFree tmp)
                        ( do
                                bv2 <- getbv