diff options
author | Joey Hess <joey@kitenet.net> | 2012-01-19 16:07:36 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-01-19 16:07:36 -0400 |
commit | 06b0cb6224377fd2ea86e4e209e94a502f92716e (patch) | |
tree | ae6f1a631aebbdd18a2aef7ff7ec7299d9214d26 /Remote/Git.hs | |
parent | 94aa6b42b5bc5c37c7017fb3493010a56a9d211e (diff) |
add tmp flag parameter to retrieveKeyFile
Diffstat (limited to 'Remote/Git.hs')
-rw-r--r-- | Remote/Git.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs index 796407449..5dae3334e 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -198,8 +198,8 @@ dropKey r key ] {- Tries to copy a key's content from a remote's annex to a file. -} -copyFromRemote :: Git.Repo -> Key -> FilePath -> Annex Bool -copyFromRemote r key file +copyFromRemote :: Git.Repo -> Key -> Bool -> FilePath -> Annex Bool +copyFromRemote r key _ file | not $ Git.repoIsUrl r = do params <- rsyncParams r loc <- liftIO $ gitAnnexLocation key r |