Calling save-buffer interactively.
from Troels Henriksen.
This commit is contained in:
parent
eedca795e1
commit
256eec740c
@ -41,7 +41,7 @@
|
|||||||
(defun ghc-save-buffer ()
|
(defun ghc-save-buffer ()
|
||||||
(interactive)
|
(interactive)
|
||||||
(if (buffer-modified-p)
|
(if (buffer-modified-p)
|
||||||
(save-buffer)
|
(call-interactively 'save-buffer)
|
||||||
(flymake-start-syntax-check)))
|
(flymake-start-syntax-check)))
|
||||||
|
|
||||||
(provide 'ghc-command)
|
(provide 'ghc-command)
|
||||||
|
Loading…
Reference in New Issue
Block a user