Refactor floor items, removing ids (not fully checked)

2025-08-23 22:10:33 +01:00
parent 32d7120177
commit fcccd63844
24 changed files with 94 additions and 109 deletions
@@ -17,7 +17,7 @@ getSelectedCloseObj w = do
    case i of
        3 -> do
            NInt k <- w ^? hud . closeItems . ix j
-            fmap Left $ w ^? cWorld . lWorld . floorItems . unNIntMap . ix k
+            fmap Left $ w ^? cWorld . lWorld . floorItems . ix k
        5 -> do
            k <- w ^? hud . closeButtons . ix j
            fmap Right $ w ^? cWorld . lWorld . buttons . ix k