From d460ad2ed2593a472ce06d824d1561d8ca32fbc5 Mon Sep 17 00:00:00 2001
From: Kazu Yamamoto <kazu@iij.ad.jp>
Date: Mon, 7 Mar 2011 11:03:48 +0900
Subject: [PATCH] fixing the bug of "\n".

---
 elisp/ghc-flymake.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/elisp/ghc-flymake.el b/elisp/ghc-flymake.el
index d307dc5..66a728c 100644
--- a/elisp/ghc-flymake.el
+++ b/elisp/ghc-flymake.el
@@ -103,7 +103,7 @@
 	(when (looking-at "^\\([^ ]+\\) *::")
 	  (save-match-data
 	    (forward-line)
-	    (if (eobp) (insert "\n")))
+	    (if (not (bolp)) (insert "\n")))
 	  (insert (match-string 1) " = undefined\n")))
        ((string-match "Not in scope: `\\([^']+\\)'" data)
 	(save-match-data