Try to fix each error only once
This commit is contained in:
		
							parent
							
								
									7277d4d6c3
								
							
						
					
					
						commit
						c78274f7f6
					
				| @ -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) | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user
	 Alejandro Serrano
						Alejandro Serrano