Skip to content

Commit 6a9f506

Browse files
committed
Fix #635
Disallow leading spaces in error regexp in interactive mode.
1 parent 832554f commit 6a9f506

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

haskell-interactive-mode.el

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -444,7 +444,7 @@ SESSION, otherwise operate on the current buffer.
444444
(not visibility)))))))
445445

446446
(defconst haskell-interactive-mode-error-regexp
447-
"^\\([A-Z]?:?[^\r\n:]+\\):\\([0-9()-:]+\\):?")
447+
"^\\(\\(?:[A-Z]:\\)?[^ \r\n:][^\r\n:]*\\):\\([0-9()-:]+\\):?")
448448

449449
(defun haskell-interactive-at-compile-message ()
450450
"Am I on a compile message?"

0 commit comments

Comments
 (0)