Remove some Streaming
This commit is contained in:
@@ -275,7 +275,8 @@ drawFarWallDetect w =
|
||||
, fst $ collidePoint p q $ filter wlIsOpaque $ wlsNearSeg p q w
|
||||
]
|
||||
)
|
||||
$ runIdentity $ S.toList_ $ streamViewpoints p w
|
||||
$ getViewpoints p w
|
||||
-- $ runIdentity $ S.toList_ $ streamViewpoints p w
|
||||
where
|
||||
p = w ^. cWorld . cwCam . cwcViewFrom
|
||||
|
||||
|
||||
Reference in New Issue
Block a user