hasufell
/
ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Remove the data-default dependency

This commit is contained in:
NightRa 2015-05-28 00:22:04 +03:00
parent fbe0800856
commit 7b3a84bc74
2 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ghc-mod.cabal
View File

@ -160,7 +160,6 @@ Executable ghc-mod
HS-Source-Dirs: src HS-Source-Dirs: src
Build-Depends: base >= 4.0 && < 5 Build-Depends: base >= 4.0 && < 5
, async , async
, data-default
, directory , directory
, filepath , filepath
, pretty , pretty

4
src/GHCMod.hs
View File

@ -8,7 +8,6 @@ import Control.Applicative
import Control.Monad import Control.Monad
import Data.Typeable (Typeable) import Data.Typeable (Typeable)
import Data.Version (showVersion) import Data.Version (showVersion)
import Data.Default
import Data.List import Data.List
import Data.List.Split import Data.List.Split
import Data.Char (isSpace) import Data.Char (isSpace)
@ -303,9 +302,6 @@ data InteractiveOptions = InteractiveOptions {
ghcModExtensions :: Bool ghcModExtensions :: Bool
} }
instance Default InteractiveOptions where
def = InteractiveOptions False
handler :: IO a -> IO a handler :: IO a -> IO a
handler = flip catches $ handler = flip catches $
[ Handler $ \(FatalError msg) -> exitError msg [ Handler $ \(FatalError msg) -> exitError msg