From 07c77b732c4a52b0734a8e19ef12054e9210247b Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 19 Jun 2016 13:51:31 -0400 Subject: Generalized fileProperty can now operate on files as either a series of lines, or a ByteString. --- src/Utility/FileMode.hs | 5 ----- 1 file changed, 5 deletions(-) (limited to 'src/Utility') diff --git a/src/Utility/FileMode.hs b/src/Utility/FileMode.hs index 3068d55a..bb3780c6 100644 --- a/src/Utility/FileMode.hs +++ b/src/Utility/FileMode.hs @@ -13,7 +13,6 @@ module Utility.FileMode ( ) where import System.IO -import qualified Data.ByteString.Lazy as L import Control.Monad import System.PosixCompat.Types import Utility.PosixFiles @@ -167,7 +166,3 @@ writeFileProtected' file writer = withUmask 0o0077 $ withFile file WriteMode $ \h -> do void $ tryIO $ modifyFileMode file $ removeModes otherGroupModes writer h - -writeBytesProtected :: FilePath -> L.ByteString -> IO () -writeBytesProtected file content = writeFileProtected' file - (`L.hPutStr` content) -- cgit v1.2.3