@@ -30,7 +30,10 @@ import Data.Version (showVersion)
3030import qualified Data.Set as S
3131
3232import Control.Applicative
33−import Control.Monad.Except
33+import Control.Monad
34+import Control.Monad.Error.Class
35+import Control.Monad.Trans.Except
36+import Control.Monad.IO.Class
3437
3538import System.FilePath (takeFileName, takeDirectory)
3639import System.Exit (exitFailure)
@@ -599,4 +602,4 @@ main = do
599602 footerInfo = footer $ "psc-bundle " ++ showVersion Paths.version
600603
601604 version :: Parser (a -> a)
602− version = abortOption (InfoMsg (showVersion Paths.version)) $ long "version" <> help "Show the version number" <> hidden
605+ version = abortOption (InfoMsg (showVersion Paths.version)) $ long "version" <> help "Show the version number" <> hidden