Merge pull request #1123 from issue-dispenser/master

Support spaces in project directories

Author: gracjan

haskell-compile.el

@@ -64,7 +64,7 @@ The `%s' placeholder is replaced by the current buffer's filename."
 
 (defconst haskell-compilation-error-regexp-alist
   `((,(concat
-       "^ *\\(?1:[^ \t\r\n]+?\\):"
+       "^ *\\(?1:[^\t\r\n]+?\\):"
        "\\(?:"
        "\\(?2:[0-9]+\\):\\(?4:[0-9]+\\)\\(?:-\\(?5:[0-9]+\\)\\)?" ;; "121:1" & "12:3-5"
        "\\|"

haskell-load.el

@@ -537,7 +537,7 @@ When MODULE-BUFFER is non-NIL, paint error overlays."
                   session
                   error-msg
                   file
-                  (plist-get (haskell-process-parse-error final-msg) :line))
+                  line)
                  t)))))))
 
 (defun haskell-interactive-show-load-message (session type module-name file-name echo th)