@@ -52,8 +52,13 @@ import Data.Char ( toLower, toUpper )
5252import Data.List ( delete, intercalate, isPrefixOf, isSuffixOf, sort )
5353import System.Directory ( getAppUserDataDirectory, findExecutable,
5454 doesFileExist, Permissions(..), getPermissions )
55−import System.Process ( shell, CreateProcess(..), createProcess_,
55+import System.Process ( shell, CreateProcess(..),
5656 waitForProcess, StdStream(CreatePipe) )
57+#if MIN_VERSION_process(1,2,1)
58+import System.Process ( createProcess_ )
59+#else
60+import System.Process.Internals ( createProcess_ )
61+#endif
5762import System.IO ( stdout, stderr, hClose )
5863import System.IO.Error ( isDoesNotExistError )
5964import qualified Control.Exception as E