parent
3c76ba412f
commit
de3d3a5f19
@ -132,7 +132,7 @@ nil does not display errors/warnings.
|
|||||||
info infos)
|
info infos)
|
||||||
(dolist (err errs (nreverse infos))
|
(dolist (err errs (nreverse infos))
|
||||||
(when (string-match regex err)
|
(when (string-match regex err)
|
||||||
(let* ((file (expand-file-name (match-string 1 err))) ;; for Windows
|
(let* ((file (expand-file-name (match-string 1 err) (ghc-get-project-root))) ;; for Windows
|
||||||
(line (string-to-number (match-string 2 err)))
|
(line (string-to-number (match-string 2 err)))
|
||||||
(coln (string-to-number (match-string 3 err)))
|
(coln (string-to-number (match-string 3 err)))
|
||||||
(msg (match-string 4 err))
|
(msg (match-string 4 err))
|
||||||
|
Loading…
Reference in New Issue
Block a user