From 8745794ea5a3e305172170b5fb4c04675068413b Mon Sep 17 00:00:00 2001
From: Nicolas Wu <nicolas.wu@gmail.com>
Date: Mon, 29 Jul 2013 12:55:38 +0100
Subject: [PATCH] ghc-mod only does check phase

---
 syntax_checkers/haskell/ghc-mod.vim | 14 +++-----------
 1 file changed, 3 insertions(+), 11 deletions(-)

diff --git a/syntax_checkers/haskell/ghc-mod.vim b/syntax_checkers/haskell/ghc-mod.vim
index 9340c381..c1828312 100644
--- a/syntax_checkers/haskell/ghc-mod.vim
+++ b/syntax_checkers/haskell/ghc-mod.vim
@@ -35,20 +35,12 @@ function! SyntaxCheckers_haskell_ghc_mod_GetLocList()
         \ 'args': '--hlintOpt="--language=XmlSyntax"',
         \ 'filetype': 'haskell',
         \ 'subchecker': 'ghc_mod' })
-    let loclist1 = SyntasticMake({
+
+    let loclist = SyntasticMake({
         \ 'makeprg': makeprg,
         \ 'errorformat': errorformat })
 
-    let makeprg = syntastic#makeprg#build({
-        \ 'exe': 'ghc-mod lint',
-        \ 'args': '--hlintOpt="--language=XmlSyntax"',
-        \ 'filetype': 'haskell',
-        \ 'subchecker': 'ghc_mod' })
-    let loclist2 = SyntasticMake({
-        \ 'makeprg': makeprg,
-        \ 'errorformat': errorformat })
-
-    return loclist1 + loclist2
+    return loclist
 endfunction
 
 call g:SyntasticRegistry.CreateAndRegisterChecker({