mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix build after Utility.Url changes

Browse source
This commit is contained in:
Joey Hess 2019-11-14 22:25:06 -04:00
parent 4ab1f3ff02
commit 85c5e51c53
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Build/DistributionUpdate.hs
View file

@ -26,6 +26,7 @@ import Git.Command
import Data.Time.Clock import Data.Time.Clock
import Data.Char import Data.Char
import Data.Either
import System.Posix.Directory import System.Posix.Directory
-- git-annex distribution signing key (for Joey Hess) -- git-annex distribution signing key (for Joey Hess)
@ -86,7 +87,7 @@ getbuild repodir (url, f) = do
putStrLn $ "*** " ++ s putStrLn $ "*** " ++ s
return Nothing return Nothing
uo <- defUrlOptions uo <- defUrlOptions
ifM (download nullMeterUpdate url tmp uo) ifM (isRight <$> download nullMeterUpdate url tmp uo)
( ifM (liftIO $ virusFree tmp) ( ifM (liftIO $ virusFree tmp)
( do ( do
bv2 <- getbv bv2 <- getbv