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

Try to fix each error only once

This commit is contained in:
Alejandro Serrano 2014-08-24 13:29:12 +02:00
parent 5b32667060
commit 6cf472168c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
elisp/ghc-check.el
View File

@ -367,7 +367,7 @@ nil does not display errors/warnings.
(defun ghc-check-insert-from-warning ()
(interactive)
(let ((ret t))
(dolist (data (mapcar (lambda (ovl) (overlay-get ovl 'ghc-msg)) (ghc-check-overlay-at (point))) ret)
(dolist (data (delete-dups (mapcar (lambda (ovl) (overlay-get ovl 'ghc-msg)) (ghc-check-overlay-at (point)))) ret)
(save-excursion
(cond
((string-match "Inferred type: \\|no type signature:" data)