1 files changed, 23 insertions, 22 deletions

diff --git a/nvim/.config/nvim/ftplugin/haskell.vim b/nvim/.config/nvim/ftplugin/haskell.vim
index c389121..5bcdd4c 100644
--- a/nvim/.config/nvim/ftplugin/haskell.vim
+++ b/nvim/.config/nvim/ftplugin/haskell.vim
@@ -1,29 +1,30 @@
 function! s:OverwriteBuffer(output)
-  let winview = winsaveview()
-  silent! undojoin
-  normal! gg"_dG
-  call append(0, split(a:output, '\v\n'))
-  normal! G"_dd
-  call winrestview(winview)
+    let winview = winsaveview()
+    silent! undojoin
+    normal! gg"_dG
+    call append(0, split(a:output, '\v\n'))
+    normal! G"_dd
+    call winrestview(winview)
 endfunction
 
 function! s:RunStylishHaskell()
-  let output = system("stylish-haskell" . " " . bufname("%"))
-  let errors = matchstr(output, '\(Language\.Haskell\.Stylish\.Parse\.parseModule:[^\x0]*\)')
-  if v:shell_error != 0
-    echom output
-  elseif empty(errors)
-    call s:OverwriteBuffer(output)
-    write
-  else
-    echom errors
-  endif
+    let output = system("stylish-haskell" . " " . bufname("%"))
+    let errors = matchstr(output, '\(Language\.Haskell\.Stylish\.Parse\.parseModule:[^\x0]*\)')
+    if v:shell_error != 0
+        echom output
+    elseif empty(errors)
+        call s:OverwriteBuffer(output)
+        write
+    else
+        echom errors
+    endif
 endfunction
 
-augroup haskell-formatting
-  autocmd!
-  autocmd BufWritePost *.hs call s:RunStylishHaskell()
-augroup END
-
-
 set formatprg=stylish-haskell
+set makeprg=hlint
+
+augroup HaskellLint
+    autocmd!
+    autocmd BufWritePost *.hs | silent make! <afile> | silent redraw!
+    autocmd QuickFixCmdPost [^l]* cwindow
+augroup END