don't save the buffer for hlint.

This commit is contained in:
Kazu Yamamoto 2014-03-27 12:27:09 +09:00
parent 9ab0f4bf19
commit bf935c5741

View File

@ -84,8 +84,11 @@
(defun ghc-save-buffer () (defun ghc-save-buffer ()
(interactive) (interactive)
;; fixme: better way then saving? ;; fixme: better way then saving?
(if ghc-check-command ;; hlint
(if (buffer-modified-p)
(call-interactively 'save-buffer))
(set-buffer-modified-p t) (set-buffer-modified-p t)
(call-interactively 'save-buffer) (call-interactively 'save-buffer))
(ghc-check-syntax)) (ghc-check-syntax))
(provide 'ghc-command) (provide 'ghc-command)