diff options
Diffstat (limited to 'Command/AddUrl.hs')
-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 87b24149d..369940bdf 100644 --- a/Command/AddUrl.hs +++ b/Command/AddUrl.hs @@ -73,7 +73,7 @@ download url file = do liftIO $ createDirectoryIfMissing True (parentDir tmp) stopUnless (downloadUrl [url] tmp) $ do backend <- chooseBackend file - let source = KeySource { keyFilename = file, contentLocation = file} + let source = KeySource { keyFilename = file, contentLocation = tmp } k <- genKey source backend case k of Nothing -> stop |