finish fixing removeLink on windows
9cb250f7be
got the ones in RawFilePath,
but there were others that used the one from unix-compat, which fails at
runtime on windows. To avoid this,
import System.PosixCompat.Files hiding removeLink
This commit was sponsored by Ethan Aubin.
This commit is contained in:
parent
dce0781391
commit
a3b714ddd9
28 changed files with 73 additions and 64 deletions
|
@ -16,7 +16,7 @@ module Utility.Directory (
|
|||
|
||||
import Control.Monad
|
||||
import System.FilePath
|
||||
import System.PosixCompat.Files
|
||||
import System.PosixCompat.Files hiding (removeLink)
|
||||
import Control.Applicative
|
||||
import System.IO.Unsafe (unsafeInterleaveIO)
|
||||
import Data.Maybe
|
||||
|
|
|
@ -16,7 +16,7 @@ module Utility.FileMode (
|
|||
import System.IO
|
||||
import Control.Monad
|
||||
import System.PosixCompat.Types
|
||||
import System.PosixCompat.Files
|
||||
import System.PosixCompat.Files hiding (removeLink)
|
||||
import Control.Monad.IO.Class
|
||||
import Foreign (complement)
|
||||
import Control.Monad.Catch
|
||||
|
|
|
@ -14,7 +14,7 @@ module Utility.FileSize (
|
|||
getFileSize',
|
||||
) where
|
||||
|
||||
import System.PosixCompat.Files
|
||||
import System.PosixCompat.Files hiding (removeLink)
|
||||
import qualified Utility.RawFilePath as R
|
||||
#ifdef mingw32_HOST_OS
|
||||
import Control.Exception (bracket)
|
||||
|
|
|
@ -15,7 +15,7 @@ module Utility.MoveFile (
|
|||
|
||||
import Control.Monad
|
||||
import System.FilePath
|
||||
import System.PosixCompat.Files
|
||||
import System.PosixCompat.Files hiding (removeLink)
|
||||
import System.IO.Error
|
||||
import Prelude
|
||||
|
||||
|
|
|
@ -20,7 +20,7 @@ import System.IO
|
|||
import System.FilePath
|
||||
import System.Directory
|
||||
import Control.Monad.IO.Class
|
||||
import System.PosixCompat.Files
|
||||
import System.PosixCompat.Files hiding (removeLink)
|
||||
|
||||
import Utility.Exception
|
||||
import Utility.FileSystemEncoding
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue