Remove old layer code

2022-04-10 10:32:55 +01:00
parent 2da4098d41
commit edd82fb3ac
17 changed files with 54 additions and 53 deletions
@@ -12,7 +12,6 @@ import Dodge.Creature.Lamp
 import Dodge.WorldEvent.Explosion
 import Dodge.Creature.Picture
 --import Dodge.Creature.Stance.Data
-import Dodge.Picture.Layer
 import Dodge.Particle.Spark
 import Dodge.Default
 import Dodge.Creature.State
@@ -32,7 +31,7 @@ barrel :: Creature
 barrel = defaultInanimate
    { _crUpdate = updateBarrel
    , _crHP = 500
-    , _crPict = picAtCrPos $ onLayer CrLayer $ pictures 
+    , _crPict = picAtCrPos $ setDepth 20 $ pictures 
        [ color orange $ circleSolid 10
        , setDepth 0.049 . color (greyN 0.5) $ circleSolid 8
        , color (greyN 0.5) $ circleSolid 8