From e133e7b374f5f443d93e9f33aac23520249e0cde Mon Sep 17 00:00:00 2001
From: Jasper Van der Jeugt <m@jaspervdj.be>
Date: Sun, 19 Apr 2015 13:47:37 +0200
Subject: Fix issue with shebang code

---
 src/Language/Haskell/Stylish/Parse.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Language/Haskell/Stylish/Parse.hs b/src/Language/Haskell/Stylish/Parse.hs
index a3ef579..f8e24a6 100644
--- a/src/Language/Haskell/Stylish/Parse.hs
+++ b/src/Language/Haskell/Stylish/Parse.hs
@@ -31,7 +31,7 @@ unCpp = unlines . go False . lines
 -- | Remove shebang from the first line
 unShebang :: String -> String
 unShebang str
-    | "#!" `isPrefixOf` str = unlines $ drop 1 $ lines str
+    | "#!" `isPrefixOf` str = unlines $ ("" :) $ drop 1 $ lines str
     | otherwise             = str
 
 
-- 
cgit v1.2.3