From d136fb4d6795af3ac0b98e74b22d2fd561b06a5f Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Fri, 1 Aug 2014 16:56:44 +0900 Subject: [PATCH] fix #273. --- elisp/ghc-process.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/elisp/ghc-process.el b/elisp/ghc-process.el index baf410c..69cf75b 100644 --- a/elisp/ghc-process.el +++ b/elisp/ghc-process.el @@ -63,7 +63,8 @@ (t cpro))) (defun ghc-start-process (name buf) - (let ((pro (start-file-process name buf ghc-interactive-command "-b" "\n" "-l"))) + (let* ((opts (append '("-b" "\n" "-l") (ghc-make-ghc-options))) + (pro (apply 'start-file-process name buf ghc-interactive-command opts))) (set-process-filter pro 'ghc-process-filter) (set-process-sentinel pro 'ghc-process-sentinel) (set-process-query-on-exit-flag pro nil)