From f762209e603e0f2851c61f4394de3786c4cd7149 Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Fri, 14 Aug 2015 11:36:37 +0900 Subject: [PATCH] using new ghc-mod. --- elisp/ghc-process.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/elisp/ghc-process.el b/elisp/ghc-process.el index 7de4bb3..db22ef0 100644 --- a/elisp/ghc-process.el +++ b/elisp/ghc-process.el @@ -21,7 +21,7 @@ (defvar-local ghc-process-hook nil) (defvar-local ghc-process-root nil) -(defvar ghc-command "Mock") +(defvar ghc-command "ghc-mod") (defvar ghc-error-buffer "*GHC Error*") @@ -68,7 +68,9 @@ (t cpro))) (defun ghc-start-process (name buf) - (let* ((opts (append '("legacy-interactive" "-b" "\n" "-l" "-s") (ghc-make-ghc-options))) + (let* ((opts (append '("-b" "\n" "-l" "--line-prefix=O: ,E: ") + (ghc-make-ghc-options) + '("legacy-interactive"))) (pro (apply 'start-file-process name buf ghc-command opts))) (set-process-filter pro 'ghc-process-filter) (set-process-sentinel pro 'ghc-process-sentinel)