parent
3c76ba412f
commit
de3d3a5f19
@ -132,7 +132,7 @@ nil does not display errors/warnings.
|
||||
info infos)
|
||||
(dolist (err errs (nreverse infos))
|
||||
(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)))
|
||||
(coln (string-to-number (match-string 3 err)))
|
||||
(msg (match-string 4 err))
|
||||
|
Loading…
Reference in New Issue
Block a user