Revert "don't use writeFileProtected on windows"
This reverts commit c698d34b03
.
This commit is contained in:
parent
456a82965e
commit
7ac6090088
1 changed files with 0 additions and 4 deletions
|
@ -133,7 +133,6 @@ setSticky f = modifyFileMode f $ addModes [stickyMode]
|
|||
- as writeFile.
|
||||
-}
|
||||
writeFileProtected :: FilePath -> String -> IO ()
|
||||
#ifndef mingw32_HOST_OS
|
||||
writeFileProtected file content = do
|
||||
h <- openFile file WriteMode
|
||||
void $ tryIO $
|
||||
|
@ -141,6 +140,3 @@ writeFileProtected file content = do
|
|||
removeModes [groupReadMode, otherReadMode]
|
||||
hPutStr h content
|
||||
hClose h
|
||||
#else
|
||||
writeFileProtected = writeFile
|
||||
#endif
|
||||
|
|
Loading…
Reference in a new issue