hacking ghc-flymake-init.
This commit is contained in:
parent
fd04ebfe11
commit
2f20d1a9ac
@ -13,8 +13,9 @@
|
|||||||
ghc-flymake-err-line-patterns)
|
ghc-flymake-err-line-patterns)
|
||||||
|
|
||||||
(defun ghc-flymake-init ()
|
(defun ghc-flymake-init ()
|
||||||
|
(let ((after-save-hook nil))
|
||||||
|
(save-buffer))
|
||||||
(let ((file (file-name-nondirectory (buffer-file-name))))
|
(let ((file (file-name-nondirectory (buffer-file-name))))
|
||||||
(flymake-init-create-temp-buffer-copy 'flymake-create-temp-inplace)
|
|
||||||
(list ghc-module-command (append (ghc-module-command-args)
|
(list ghc-module-command (append (ghc-module-command-args)
|
||||||
(list "check" file)))))
|
(list "check" file)))))
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user