From 256eec740cf49fb70ac5c63c9c7f80bf840b4d8c Mon Sep 17 00:00:00 2001
From: Kazu Yamamoto <kazu@iij.ad.jp>
Date: Fri, 3 Aug 2012 12:44:28 +0900
Subject: [PATCH] Calling save-buffer interactively.

from Troels Henriksen.
---
 elisp/ghc-command.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/elisp/ghc-command.el b/elisp/ghc-command.el
index 8a354ea..e3e394f 100644
--- 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)