fix build
This commit is contained in:
parent
22a7f14e7b
commit
376de6fcce
1 changed files with 1 additions and 1 deletions
|
@ -52,7 +52,7 @@ viaTmp a file content = bracketIO setup cleanup use
|
|||
-- not as a temp file. (This may fail on some filesystems
|
||||
-- that don't support file modes well, so ignore
|
||||
-- exceptions.)
|
||||
void $ tryIO $ setFileMode tmpfile =<< defaultFileMode
|
||||
_ <- liftIO $ tryIO $ setFileMode tmpfile =<< defaultFileMode
|
||||
liftIO $ hClose h
|
||||
a tmpfile content
|
||||
liftIO $ rename tmpfile file
|
||||
|
|
Loading…
Reference in a new issue