Implement zipper for attachment trees
This commit is contained in:
@@ -39,7 +39,7 @@ worldSPic cfig u =
|
||||
<> foldup btSPic (filtOn _btPos _buttons)
|
||||
<> foldup mcSPic (filtOn _mcPos _machines)
|
||||
<> aimDelaySweep w
|
||||
<> anyTargeting w
|
||||
-- <> anyTargeting w
|
||||
where
|
||||
w = _uvWorld u
|
||||
foldup = foldMap'
|
||||
|
||||
Reference in New Issue
Block a user