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

comment.

Browse Source
This commit is contained in:
Kazu Yamamoto 2014-04-07 09:19:23 +09:00
parent c356bb7fc5
commit 894c94e48d
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

@ -66,7 +66,7 @@
(let ((regex "^\\([^\n\0]*\\):\\([0-9]+\\):\\([0-9]+\\): *\\(.+\\)") (let ((regex "^\\([^\n\0]*\\):\\([0-9]+\\):\\([0-9]+\\): *\\(.+\\)")
info infos) info infos)
(while (re-search-forward regex nil t) (while (re-search-forward regex nil t)
(let* ((file (expand-file-name (match-string 1))) (let* ((file (expand-file-name (match-string 1))) ;; for Windows
(line (string-to-number (match-string 2))) (line (string-to-number (match-string 2)))
;; don't take column to make multiple same errors to a single. ;; don't take column to make multiple same errors to a single.
(msg (match-string 4)) (msg (match-string 4))