Added some CSS to handle older versions of process.
`createProcess_` is in Internals until process 1.2.1.
This commit is contained in:
parent
ee45be5723
commit
1ddc71e01e
1 changed files with 6 additions and 1 deletions
|
@ -52,8 +52,13 @@ import Data.Char ( toLower, toUpper )
|
|||
import Data.List ( delete, intercalate, isPrefixOf, isSuffixOf, sort )
|
||||
import System.Directory ( getAppUserDataDirectory, findExecutable,
|
||||
doesFileExist, Permissions(..), getPermissions )
|
||||
import System.Process ( shell, CreateProcess(..), createProcess_,
|
||||
import System.Process ( shell, CreateProcess(..),
|
||||
waitForProcess, StdStream(CreatePipe) )
|
||||
#if MIN_VERSION_process(1,2,1)
|
||||
import System.Process ( createProcess_ )
|
||||
#else
|
||||
import System.Process.Internals ( createProcess_ )
|
||||
#endif
|
||||
import System.IO ( stdout, stderr, hClose )
|
||||
import System.IO.Error ( isDoesNotExistError )
|
||||
import qualified Control.Exception as E
|
||||
|
|
Loading…
Reference in a new issue