avoid warnings about not exported System.Directory.isSymbolicLink

This commit is contained in:
Joey Hess 2016-04-28 15:18:11 -04:00
parent 9f6c29fb38
commit b22409db38
Failed to extract signature
20 changed files with 18 additions and 21 deletions

View file

@ -6,9 +6,12 @@
-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -fno-warn-tabs #-}
{-# OPTIONS_GHC -fno-warn-tabs -w #-}
module Utility.Directory where
module Utility.Directory (
module Utility.Directory,
module System.Directory
) where
import System.IO.Error
import System.Directory hiding (isSymbolicLink)

View file

@ -33,9 +33,9 @@ import Utility.Path
import Utility.UserInfo
import Utility.Process
import Utility.PartialPrelude
import Utility.Directory
import System.Environment
import System.Directory hiding (isSymbolicLink)
import System.FilePath
import Data.List
import Data.String.Utils

View file

@ -14,7 +14,6 @@ import Utility.Monad
import Utility.Path
import Data.Maybe
import System.Directory hiding (isSymbolicLink)
import System.FilePath
import Data.List.Utils
import System.Posix.Files

View file

@ -34,7 +34,6 @@ import Data.List
import Network.BSD
import System.FilePath
import Data.Hash.MD5
import System.Directory hiding (isSymbolicLink)
import Control.Applicative
import Prelude

View file

@ -12,7 +12,6 @@ module Utility.Path where
import Data.String.Utils
import System.FilePath
import System.Directory hiding (isSymbolicLink)
import Data.List
import Data.Maybe
import Data.Char
@ -29,6 +28,7 @@ import Utility.Exception
import qualified "MissingH" System.Path as MissingH
import Utility.Monad
import Utility.UserInfo
import Utility.Directory
{- Simplifies a path, removing any "." component, collapsing "dir/..",
- and removing the trailing path separator.

View file

@ -11,9 +11,9 @@
module Utility.Tmp where
import System.IO
import System.Directory hiding (isSymbolicLink)
import Control.Monad.IfElse
import System.FilePath
import System.Directory
import Control.Monad.IO.Class
#ifndef mingw32_HOST_OS
import System.Posix.Temp (mkdtemp)