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

comment

Browse source
This commit is contained in:
Joey Hess 2011-12-20 18:00:09 -04:00
parent a2e482b590
commit 815d1318d7
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Utility/Url.hs
View file

@ -33,8 +33,12 @@ exists url =
_ -> return False _ -> return False
{- Used to download large files, such as the contents of keys. {- Used to download large files, such as the contents of keys.
-
- Uses wget or curl program for its progress bar. (Wget has a better one, - Uses wget or curl program for its progress bar. (Wget has a better one,
- so is preferred.) -} - so is preferred.) Which program to use is determined at run time; it
- would not be appropriate to test at configure time and build support
- for only one in.
-}
download :: URLString -> FilePath -> IO Bool download :: URLString -> FilePath -> IO Bool
download url file = do download url file = do
e <- inPath "wget" e <- inPath "wget"