diff options
| -rw-r--r-- | ale_linters/haskell/ghc.vim | 4 | ||||
| -rw-r--r-- | ale_linters/haskell/hlint.vim | 2 |
2 files changed, 2 insertions, 4 deletions
diff --git a/ale_linters/haskell/ghc.vim b/ale_linters/haskell/ghc.vim index 275cf32f..def883e3 100644 --- a/ale_linters/haskell/ghc.vim +++ b/ale_linters/haskell/ghc.vim @@ -29,9 +29,7 @@ function! ale_linters#haskell#ghc#Handle(buffer, lines) call add(l:corrected_lines, l:line) else if len(l:corrected_lines) > 0 - if l:corrected_lines[-1] =~# ': error:$' - let l:line = substitute(l:line, '\v^\s+', ' ', '') - endif + let l:line = substitute(l:line, '\v\s+', ' ', '') let l:corrected_lines[-1] .= l:line endif endif diff --git a/ale_linters/haskell/hlint.vim b/ale_linters/haskell/hlint.vim index f698d5b4..3aa93fa1 100644 --- a/ale_linters/haskell/hlint.vim +++ b/ale_linters/haskell/hlint.vim @@ -13,7 +13,7 @@ function! ale_linters#haskell#hlint#Handle(buffer, lines) \ 'lnum': l:error.startLine + 0, \ 'vcol': 0, \ 'col': l:error.startColumn + 0, - \ 'text': l:error.severity . ': ' . l:error.hint, + \ 'text': l:error.severity . ': ' . l:error.hint . '. Found: ' . l:error.from . ' Why not: ' . l:error.to, \ 'type': l:error.severity ==# 'Error' ? 'E' : 'W', \}) endfor |