Remove separate wall color, should be handled by material type

src/Dodge/Item/BackgroundEffect.hs

@@ -7,7 +7,6 @@ module Dodge.Item.BackgroundEffect (
 ) where
 
 import Linear
-import Color
 import Control.Lens
 import Dodge.Creature.Radius
 import Dodge.Creature.Test
@@ -78,11 +77,11 @@ itEffectOnDrop itm cr w = case itm ^. itType of
 shieldWall :: Int -> Wall
 shieldWall crid =
     defaultWall
-        { _wlColor = yellow
-        , _wlOpacity = SeeAbove
-        , _wlWalkable = True
-        , _wlFireThrough = False
+        { --_wlColor = yellow
+         _wlOpacity = SeeAbove
         , _wlMaterial = Metal
         , _wlRotateTo = False
         , _wlStructure = CreaturePart crid -- shieldWallDamage
+        , _wlPathFlag = mempty
         }
+        & wlPathFlag .~ mempty