From 6402f7f4a33834ac818a781c49a0e3f978179fa1 Mon Sep 17 00:00:00 2001
From: Vidar Holen <spam@vidarholen.net>
Date: Sun, 2 Dec 2012 17:19:44 -0800
Subject: [PATCH] Fixed space warning for foo=$(echo $foo)

---
 ShellCheck/Analytics.hs | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/ShellCheck/Analytics.hs b/ShellCheck/Analytics.hs
index 5b462fd..12ae9ca 100644
--- a/ShellCheck/Analytics.hs
+++ b/ShellCheck/Analytics.hs
@@ -824,6 +824,7 @@ prop_checkSpacefulness1 = verifyFull checkSpacefulness "a='cow moo'; echo $a"
 prop_checkSpacefulness2 = verifyNotFull checkSpacefulness "a='cow moo'; [[ $a ]]"
 prop_checkSpacefulness3 = verifyNotFull checkSpacefulness "a='cow*.mp3'; echo \"$a\""
 prop_checkSpacefulness4 = verifyFull checkSpacefulness "for f in *.mp3; do echo $f; done"
+prop_checkSpacefulness4a= verifyNotFull checkSpacefulness "foo=$(echo $foo)"
 prop_checkSpacefulness5 = verifyFull checkSpacefulness "a='*'; b=$a; c=lol${b//foo/bar}; echo $c"
 prop_checkSpacefulness6 = verifyFull checkSpacefulness "a=foo$(lol); echo $a"
 prop_checkSpacefulness7 = verifyFull checkSpacefulness "a=foo\\ bar; rm $a"
@@ -854,9 +855,16 @@ checkSpacefulness t metaMap =
     parents = getParentTree t
     items = getTokenMap t
 
-    endScope _ = return ()
+    headFirst (T_SimpleCommand _ _ _) = False
+    headFirst _ = True
 
-    startScope t = do
+    endScope t =
+        if not $ headFirst t then performScope t else return () 
+
+    startScope t =
+        if headFirst t then performScope t else return () 
+
+    performScope t = do
         (_, spaceMap) <- get
         let
             isSpaceful id = (Map.findWithDefault Spaceless id spaceMap) /= Spaceless