use right uuid when not downloading from web remote

This commit is contained in:
Joey Hess 2014-12-16 15:26:25 -04:00
parent 65bce2c80d
commit 386880a763

View file

@ -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