summaryrefslogtreecommitdiff
path: root/Utility/Tmp.hs
diff options
context:
space:
mode:
authorJoey Hess <joey@kitenet.net>2014-02-24 19:40:14 -0400
committerJoey Hess <joey@kitenet.net>2014-02-24 19:40:14 -0400
commit878e7471fa09dcc36b478e1ac1fd305d5a90b7bf (patch)
treed552b8faa43078e3dfe1f8b10063ec566eced4e2 /Utility/Tmp.hs
parentd80c547a7d1261f158148ca85e627cc2ecb005f2 (diff)
downloadgit-repair-878e7471fa09dcc36b478e1ac1fd305d5a90b7bf.tar.gz
merge from git-annex
Diffstat (limited to 'Utility/Tmp.hs')
-rw-r--r--Utility/Tmp.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Utility/Tmp.hs b/Utility/Tmp.hs
index 891ce50..f46e1a5 100644
--- a/Utility/Tmp.hs
+++ b/Utility/Tmp.hs
@@ -13,10 +13,11 @@ import Control.Exception (bracket)
import System.IO
import System.Directory
import Control.Monad.IfElse
+import System.FilePath
import Utility.Exception
-import System.FilePath
import Utility.FileSystemEncoding
+import Utility.PosixFiles
type Template = String
@@ -30,7 +31,7 @@ viaTmp a file content = do
(tmpfile, handle) <- openTempFile dir (base ++ ".tmp")
hClose handle
a tmpfile content
- renameFile tmpfile file
+ rename tmpfile file
{- Runs an action with a tmp file located in the system's tmp directory
- (or in "." if there is none) then removes the file. -}