@@ -66,7 +66,7 @@
6666--
6767module Graphics.Vty.Config where
6868
69−#if __GLASGOW_HASKELL__ < 704
69+#if __GLASGOW_HASKELL__ > 704
7070import Prelude
7171#else
7272import Prelude hiding (catch)
@@ -74,8 +74,13 @@ import Prelude hiding (catch)
7474
7575import Control.Applicative hiding (many)
7676
77+#if __GLASGOW_HASKELL__ < 708
7778import Control.Exception (tryJust, catch, IOException)
7879import Control.Monad (void, guard)
80+#else
81+import Control.Exception (catch, IOException)
82+import Control.Monad (void)
83+#endif
7984import Control.Monad.Trans.Class
8085import Control.Monad.Trans.Writer
8186
@@ -86,7 +91,9 @@ import Data.Monoid
8691import Graphics.Vty.Input.Events
8792
8893import System.Directory (getAppUserDataDirectory)
94+#if __GLASGOW_HASKELL__ < 708
8995import System.IO.Error (isDoesNotExistError)
96+#endif
9097import System.Posix.Env (getEnv)
9198import System.Posix.IO (stdInput, stdOutput)
9299import System.Posix.Types (Fd(..))