Fixed parsing for case foo \n in ..

2013-06-20 23:57:08 -07:00 · 2013-06-20 23:57:08 -07:00 · 092073d0b3
parent 51cd951baa
commit 092073d0b3
1 changed files with 2 additions and 1 deletions
--- 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