From 6a9f506fbe0bb2ec8de2618cb0baaaed64655d85 Mon Sep 17 00:00:00 2001
From: Kirill Ignatiev <kirill.ignatiev@gmail.com>
Date: Fri, 8 May 2015 19:12:54 -0400
Subject: [PATCH] Fix #635

Disallow leading spaces in error regexp in interactive mode.
---
 haskell-interactive-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/haskell-interactive-mode.el b/haskell-interactive-mode.el
index 5dad698ee..457591ea0 100644
--- a/haskell-interactive-mode.el
+++ b/haskell-interactive-mode.el
@@ -444,7 +444,7 @@ SESSION, otherwise operate on the current buffer.
                                 (not visibility)))))))
 
 (defconst haskell-interactive-mode-error-regexp
-  "^\\([A-Z]?:?[^\r\n:]+\\):\\([0-9()-:]+\\):?")
+  "^\\(\\(?:[A-Z]:\\)?[^ \r\n:][^\r\n:]*\\):\\([0-9()-:]+\\):?")
 
 (defun haskell-interactive-at-compile-message ()
   "Am I on a compile message?"