diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-06-05 20:25:32 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-06-05 20:25:32 -0400 |
| commit | 5809f33f8b3c2aa3cb8207bc775339c533a914ab (patch) | |
| tree | abea51618b04664bec3e358f939f86b056701e51 /Command/Fsck.hs | |
| parent | f8d422fe24e425676a928959a2489f277c3026d3 (diff) | |
use createAnnexDirectory when setting up tmp dir
Diffstat (limited to 'Command/Fsck.hs')
| -rw-r--r-- | Command/Fsck.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs index 38b1bbbac..ae21acf8a 100644 --- a/Command/Fsck.hs +++ b/Command/Fsck.hs @@ -16,6 +16,7 @@ import qualified Types.Backend import qualified Types.Key import qualified Backend import Annex.Content +import Annex.Perms import Logs.Location import Logs.Trust import Annex.UUID @@ -83,8 +84,8 @@ performRemote key file backend numcopies remote = withtmp a = do pid <- liftIO getProcessID t <- fromRepo gitAnnexTmpDir + createAnnexDirectory t let tmp = t </> "fsck" ++ show pid ++ "." ++ keyFile key - liftIO $ createDirectoryIfMissing True t let cleanup = liftIO $ catchIO (removeFile tmp) (const noop) cleanup cleanup `after` a tmp |