Remove more (dead) Streaming code
This commit is contained in:
@@ -13,7 +13,7 @@ shootShatter :: Item -> Creature -> World -> World
|
||||
shootShatter it cr w =
|
||||
maybe w (uncurry $ shatterWall w sp ep) $
|
||||
sequence $
|
||||
collidePointWallsFilterStream canshatter sp ep w
|
||||
collidePointWallsFilter canshatter sp ep w
|
||||
where
|
||||
canshatter wl = case _wlOpacity wl of
|
||||
Opaque -> True
|
||||
|
||||
Reference in New Issue
Block a user