change a few renameFile's to rename

AFAIK, none of these ever operate on directories, but nor do I want to
explicitly check if they're files and fail if not.
This commit is contained in:
Joey Hess 2014-01-29 15:21:02 -04:00
parent 1669e80e85
commit 070ed4a766
4 changed files with 6 additions and 5 deletions

View file

@ -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. -}