fix(emacs/lean-flycheck.el): use -concat in lean-flycheck-command

This commit is contained in:
Soonho Kong 2015-05-26 16:06:56 -04:00
parent 1d25f9fa06
commit c4ec89ae6d

View file

@ -17,14 +17,13 @@
(defun lean-flycheck-command ()
"Concat lean-flychecker-checker-name with options"
(let ((command
(cl-concatenate 'list
`(,(lean-get-executable lean-flycheck-checker-name))
lean-flycheck-checker-options
'("--cache")
'(source-original)
'((eval (lean-option-string t)))
'("--")
'(source-inplace))))
(-concat `(,(lean-get-executable lean-flycheck-checker-name))
lean-flycheck-checker-options
'("--cache")
'(source-original)
'((eval (lean-option-string t)))
'("--")
'(source-inplace))))
(when (string= system-type "windows-nt")
(setq command (cons "python" command)))
command))