More cleverly set maximum view distance for rectangular window sizes

2022-06-26 11:30:02 +01:00
parent 15b98e38ac
commit 6c571d1878
7 changed files with 27 additions and 28 deletions
@@ -103,6 +103,7 @@ functionalUpdate cfig w = checkEndGame

 updateBoundBox :: Configuration -> World -> World
 updateBoundBox cfig w = w & boundBox .~ cullBox cfig w
+    & boundDist .~ findBoundDists cfig w

 mcChooseUpdate :: Machine -> Machine -> World -> World
 mcChooseUpdate mc mc'