From 4df577dde64d11a6f579c87502028b6f3a7e943c Mon Sep 17 00:00:00 2001 From: lemoce Date: Thu, 2 Mar 2017 11:17:23 -0300 Subject: [PATCH] Correction on formatted string for Emacs ghc lint --- elisp/ghc-check.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/elisp/ghc-check.el b/elisp/ghc-check.el index fe636ab..61a89b5 100644 --- a/elisp/ghc-check.el +++ b/elisp/ghc-check.el @@ -80,15 +80,13 @@ nil do not display errors/warnings. (if ghc-check-command (let ((opts (ghc-haskell-list-of-string ghc-hlint-options))) (if opts - (format "lint %s %s\n" opts file) + (format "ascii-escape lint %s %s\n\n" opts file) (format "lint %s\n" file))) (format "check %s\n" file)))) (defun ghc-haskell-list-of-string (los) (when los - (concat "[" - (mapconcat (lambda (x) (concat "\"" x "\"")) los ", ") - "]"))) + (mapconcat (lambda (x) (concat "-h\x02" x "\x03")) los " "))) (defun ghc-check-callback (status) (cond -- 2.7.4