diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2014-12-16 15:26:25 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2014-12-16 15:26:25 -0400 |
| commit | 4556a7ce6c079f27f8f02b945829ad8d41dc5881 (patch) | |
| tree | beb1e242c6192250ba521c7cd18acf708a7cd9cc | |
| parent | f3962d32f3b88ddb66ea564dbf0c3189047410b7 (diff) | |
use right uuid when not downloading from web remote
| -rw-r--r-- | Command/AddUrl.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/AddUrl.hs b/Command/AddUrl.hs index f3b4cf130..8688c8a57 100644 --- a/Command/AddUrl.hs +++ b/Command/AddUrl.hs @@ -267,7 +267,7 @@ downloadWith downloader dummykey u url file = ) where runtransfer tmp = Transfer.notifyTransfer Transfer.Download (Just file) $ - Transfer.download webUUID dummykey (Just file) Transfer.forwardRetry $ \p -> do + Transfer.download u dummykey (Just file) Transfer.forwardRetry $ \p -> do liftIO $ createDirectoryIfMissing True (parentDir tmp) downloader tmp p |