From 092073d0b3f5dd29970e2f8abc00db4d54bd0046 Mon Sep 17 00:00:00 2001
From: Vidar Holen <spam@vidarholen.net>
Date: Thu, 20 Jun 2013 23:57:08 -0700
Subject: [PATCH] Fixed parsing for case foo \n in ..

---
 ShellCheck/Parser.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ShellCheck/Parser.hs b/ShellCheck/Parser.hs
index 197d58f..2e22661 100644
--- a/ShellCheck/Parser.hs
+++ b/ShellCheck/Parser.hs
@@ -1289,11 +1289,12 @@ readInClause = do
     return things
 
 prop_readCaseClause = isOk readCaseClause "case foo in a ) lol; cow;; b|d) fooo; esac"
+prop_readCaseClause2 = isOk readCaseClause "case foo\n in * ) echo bar;; esac"
 readCaseClause = called "case expression" $ do
     id <- getNextId
     g_Case
     word <- readNormalWord
-    spacing
+    allspacing
     g_In
     readLineBreak
     list <- readCaseList