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

@ -4,7 +4,6 @@
module Build.Configure where
import System.Directory hiding (isSymbolicLink)
import Control.Applicative
import System.Environment (getArgs)
import Control.Monad.IfElse
@ -20,6 +19,7 @@ import Utility.Env
import Utility.Exception
import qualified Git.Version
import Utility.DottedVersion
import Utility.Directory
tests :: [TestCase]
tests =

View file

@ -15,12 +15,12 @@ import Utility.Exception
import Utility.FreeDesktop
import Utility.Path
import Utility.Monad
import Utility.Directory
import Config.Files
import Utility.OSX
import Assistant.Install.AutoStart
import Assistant.Install.Menu
import System.Directory hiding (isSymbolicLink)
import System.Environment
#ifndef mingw32_HOST_OS
import System.Posix.User

View file

@ -15,7 +15,6 @@ import Text.Parsec
import Text.Parsec.String
import Control.Applicative ((<$>))
import Control.Monad
import System.Directory hiding (isSymbolicLink)
import Data.Maybe
import Data.List
@ -23,6 +22,7 @@ import Utility.Monad
import Utility.Process hiding (env)
import qualified Utility.Process
import Utility.Env
import Utility.Directory
data CmdParams = CmdParams
{ cmd :: String

View file

@ -39,7 +39,6 @@ import Data.String.Utils
import Data.Char
import System.Environment
import System.FilePath
import System.Directory hiding (isSymbolicLink)
import System.IO
import Control.Monad
import Prelude hiding (log)
@ -49,6 +48,7 @@ import Utility.Misc
import Utility.Exception hiding (try)
import Utility.Path
import Utility.FileSystemEncoding
import Utility.Directory
data Coord = Coord
{ coordLine :: Int

View file

@ -12,7 +12,6 @@ module Main where
import System.Environment
import Data.Maybe
import System.FilePath
import System.Directory hiding (isSymbolicLink)
import Control.Monad
import Data.List
import System.Posix.Files

View file

@ -21,7 +21,6 @@
{-# LANGUAGE OverloadedStrings, FlexibleContexts #-}
import Development.NSIS
import System.Directory hiding (isSymbolicLink)
import System.FilePath
import Control.Monad
import Control.Applicative
@ -36,6 +35,7 @@ import Utility.CopyFile
import Utility.SafeCommand
import Utility.Process
import Utility.Exception
import Utility.Directory
import Build.BundledPrograms
main = do

View file

@ -10,7 +10,6 @@ module Main where
import System.Environment (getArgs)
import Data.Maybe
import System.FilePath
import System.Directory hiding (isSymbolicLink)
import Control.Monad
import Control.Monad.IfElse
import Data.List

View file

@ -12,12 +12,12 @@ module Main where
import Control.Monad.IfElse
import System.Environment
import System.FilePath
import System.Directory hiding (isSymbolicLink)
import Control.Monad
import Build.BundledPrograms
import Utility.SafeCommand
import Utility.Path
import Utility.Directory
progDir :: FilePath -> FilePath
#ifdef darwin_HOST_OS

View file

@ -7,10 +7,10 @@ module Build.TestConfig where
import Utility.Path
import Utility.Monad
import Utility.SafeCommand
import Utility.Directory
import System.IO
import System.FilePath
import System.Directory hiding (isSymbolicLink)
type ConfigKey = String
data ConfigValue =

View file

@ -6,7 +6,6 @@ module Build.Version where
import Data.List
import System.Environment
import System.Directory hiding (isSymbolicLink)
import Data.Char
import System.Process
import Control.Applicative
@ -14,6 +13,7 @@ import Prelude
import Utility.Monad
import Utility.Exception
import Utility.Directory
type Version = String