Permalink
Browse files

use defaultConfig

  • Loading branch information...
1 parent f533179 commit 70a89a489956444f38b4b1193514606ec9466bfe @mikeplus64 committed Feb 9, 2013
Showing with 10 additions and 7 deletions.
  1. +10 −7 src/Language/Haskell/Repl.hs
@@ -274,13 +274,16 @@ newRepl :: IO (Repl [String])
newRepl = do
inp <- newChan
out <- newChan
- repl' inp out $ Config
- defaultImports
- defaultFlags
- defaultBuildExpr
- defaultProcessOutput
- defaultPatience
- defaultLineLength
+ repl' inp out defaultConfig
+
+defaultConfig :: Config [String]
+defaultConfig = Config
+ defaultImports
+ defaultFlags
+ defaultBuildExpr
+ defaultProcessOutput
+ defaultPatience
+ defaultLineLength
defaultImports :: [String]
defaultImports

0 comments on commit 70a89a4

Please sign in to comment.