Cleanup

2022-06-25 21:45:17 +01:00
parent c56e53d33f
commit 4eaa31bf32
9 changed files with 24 additions and 23 deletions
@@ -233,7 +233,7 @@ farWallDistDirection p w = runIdentity $ L.purely S.fold_ ((,,,)
    $ S.map f vps
  where
    f q = runIdentity (S.fold_ findPoint q (rotateV (negate $ _cameraRot w) . (-.- p)) (wls q))
-    wls q = S.filter wlIsOpaque $ wallsAlongLineStream p q w
+    wls q = S.filter wlIsOpaque $ wallsAlongLine p q w
    findPoint q = fromMaybe q . uncurry (intersectSegSeg p q) . _wlLine
    vps = streamViewpoints p w