summaryrefslogtreecommitdiff
path: root/Remote/Rsync.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-06-05 20:25:32 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-06-05 20:25:32 -0400
commit5809f33f8b3c2aa3cb8207bc775339c533a914ab (patch)
treeabea51618b04664bec3e358f939f86b056701e51 /Remote/Rsync.hs
parentf8d422fe24e425676a928959a2489f277c3026d3 (diff)
use createAnnexDirectory when setting up tmp dir
Diffstat (limited to 'Remote/Rsync.hs')
-rw-r--r--Remote/Rsync.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Remote/Rsync.hs b/Remote/Rsync.hs
index 60cbf4595..df4e0a44f 100644
--- a/Remote/Rsync.hs
+++ b/Remote/Rsync.hs
@@ -19,6 +19,7 @@ import Remote.Helper.Special
import Remote.Helper.Encryptable
import Crypto
import Utility.RsyncFile
+import Annex.Perms
type RsyncUrl = String
@@ -176,6 +177,7 @@ withRsyncScratchDir :: (FilePath -> Annex Bool) -> Annex Bool
withRsyncScratchDir a = do
pid <- liftIO getProcessID
t <- fromRepo gitAnnexTmpDir
+ createAnnexDirectory t
let tmp = t </> "rsynctmp" </> show pid
nuke tmp
liftIO $ createDirectoryIfMissing True tmp