mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

Revert "don't use writeFileProtected on windows"

Browse source 
This reverts commit c698d34b03.
This commit is contained in:
Joey Hess 2013-12-06 21:24:34 -04:00
parent 456a82965e
commit 7ac6090088
1 changed files with 0 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Utility/FileMode.hs
View file

@ -133,7 +133,6 @@ setSticky f = modifyFileMode f $ addModes [stickyMode]
- as writeFile. - as writeFile.
-} -}
writeFileProtected :: FilePath -> String -> IO () writeFileProtected :: FilePath -> String -> IO ()
#ifndef mingw32_HOST_OS
writeFileProtected file content = do writeFileProtected file content = do
h <- openFile file WriteMode h <- openFile file WriteMode
void $ tryIO $ void $ tryIO $
@ -141,6 +140,3 @@ writeFileProtected file content = do
removeModes [groupReadMode, otherReadMode] removeModes [groupReadMode, otherReadMode]
hPutStr h content hPutStr h content
hClose h hClose h
#else
writeFileProtected = writeFile
#endif