@@ -66,7 +66,7 @@
67module Graphics.Vty.Config where
67module Graphics.Vty.Config where
69−#if __GLASGOW_HASKELL__ < 704
69+#if __GLASGOW_HASKELL__ > 704
70import Prelude
70import Prelude
72import Prelude hiding (catch)
72import Prelude hiding (catch)
@@ -74,8 +74,13 @@ import Prelude hiding (catch)
75import Control.Applicative hiding (many)
75import Control.Applicative hiding (many)
77+#if __GLASGOW_HASKELL__ < 708
77import Control.Exception (tryJust, catch, IOException)
78import Control.Exception (tryJust, catch, IOException)
78import Control.Monad (void, guard)
79import Control.Monad (void, guard)
81+import Control.Exception (catch, IOException)
82+import Control.Monad (void)
79import Control.Monad.Trans.Class
84import Control.Monad.Trans.Class
80import Control.Monad.Trans.Writer
85import Control.Monad.Trans.Writer
@@ -86,7 +91,9 @@ import Data.Monoid
86import Graphics.Vty.Input.Events
91import Graphics.Vty.Input.Events
88import System.Directory (getAppUserDataDirectory)
93import System.Directory (getAppUserDataDirectory)
94+#if __GLASGOW_HASKELL__ < 708
89import System.IO.Error (isDoesNotExistError)
95import System.IO.Error (isDoesNotExistError)
90import System.Posix.Env (getEnv)
97import System.Posix.Env (getEnv)
91import System.Posix.IO (stdInput, stdOutput)
98import System.Posix.IO (stdInput, stdOutput)
92import System.Posix.Types (Fd(..))
99import System.Posix.Types (Fd(..))