Add dust on bullet wall hit

src/Dodge/Default/World.hs

@@ -98,7 +98,7 @@ youLight =
         ,_tlsRad = 300
         ,_tlsIntensity = 0.1
         --,_tlsUpdate = \w _ -> (w, Nothing)
-        ,_tlsUpdate = \w _ -> (w, Just (youLight {_tlsPos = f $ _crPos (you w)}))
+        ,_tlsUpdate = \w _ -> Just (youLight {_tlsPos = f $ _crPos (you w)})
         ,_tlsTime = 0
         }
   where