add tmp flag parameter to retrieveKeyFile

This commit is contained in:
Joey Hess 2012-01-19 16:07:36 -04:00
parent 94aa6b42b5
commit 06b0cb6224
12 changed files with 29 additions and 27 deletions

View file

@ -48,8 +48,8 @@ gen r _ _ =
remotetype = remote
}
downloadKey :: Key -> FilePath -> Annex Bool
downloadKey key file = get =<< getUrls key
downloadKey :: Key -> Bool -> FilePath -> Annex Bool
downloadKey key _ file = get =<< getUrls key
where
get [] = do
warning "no known url"