diff options
| -rw-r--r-- | BackendUrl.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/BackendUrl.hs b/BackendUrl.hs index f18c800e9..3f0846885 100644 --- a/BackendUrl.hs +++ b/BackendUrl.hs @@ -28,7 +28,7 @@ dummyRemove state url = return False downloadUrl :: State -> Key -> FilePath -> IO Bool downloadUrl state url file = do putStrLn $ "download: " ++ url - result <- try $ rawSystem "curl" ["-o", file, url] + result <- try $ rawSystem "curl" ["-#", "-o", file, url] case (result) of Left _ -> return False Right _ -> return True |