Calling save-buffer interactively.

from Troels Henriksen.
2012-08-03 12:44:28 +09:00 · 2012-08-03 12:44:28 +09:00 · 256eec740c
parent eedca795e1
commit 256eec740c
1 changed files with 1 additions and 1 deletions
--- a/elisp/ghc-command.el
+++ b/elisp/ghc-command.el
@ -41,7 +41,7 @@
 (defun ghc-save-buffer ()
  (interactive)
  (if (buffer-modified-p)
-      (save-buffer)
+      (call-interactively 'save-buffer)
    (flymake-start-syntax-check)))

 (provide 'ghc-command)