diff options
Diffstat (limited to 'Annex/ReplaceFile.hs')
-rw-r--r-- | Annex/ReplaceFile.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Annex/ReplaceFile.hs b/Annex/ReplaceFile.hs index 93f807978..dd93b471c 100644 --- a/Annex/ReplaceFile.hs +++ b/Annex/ReplaceFile.hs @@ -31,8 +31,7 @@ replaceFile file a = do liftIO $ catchIO (rename tmpfile file) (fallback tmpfile) where setup tmpdir = do - (tmpfile, h) <- openTempFileWithDefaultPermissions tmpdir $ - takeFileName file + (tmpfile, h) <- openTempFileWithDefaultPermissions tmpdir "tmp" hClose h return tmpfile fallback tmpfile _ = do |