Minor tweaking, argument refining

2022-10-29 12:20:19 +01:00
parent af6cdff063
commit afaef480db
17 changed files with 59 additions and 56 deletions
@@ -24,9 +24,10 @@ creatureDisplayText w cr =
                , \cr' -> [crDisplayAwareness cr']
                ]
            )
-            w
+            lw
            cr
  where
+    lw = w ^. cWorld . lWorld
    campos = w ^. cWorld . lWorld . camPos . camViewFrom
    theScale = 0.15 / (w ^. cWorld . lWorld . camPos . camZoom)
    cpos = _crPos cr