Cleanup

2025-11-09 11:31:29 +00:00
parent e9ffeeaea7
commit e20cc593fc
4 changed files with 34 additions and 38 deletions
@@ -12,5 +12,5 @@ createWall wl w =
        & insertWallInZones newwl
    )
  where
-    newwl = wl{_wlID = wlid}
-    wlid = IM.newKey $ w ^. cWorld . lWorld . walls --_walls (_cWorld w)
+    newwl = wl & wlID .~ wlid
+    wlid = IM.newKey $ w ^. cWorld . lWorld . walls