addurl: Was broken by a typo introduced 2 released ago, now fixed. Closes: #677576
This commit is contained in:
parent
06caf52f03
commit
ca9d94a0ad
2 changed files with 3 additions and 1 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue