Fix switch bug

2021-08-17 19:15:33 +02:00
parent 9bdb9a227f
commit 92c897e6a2
1 changed files with 1 additions and 1 deletions
@@ -86,7 +86,7 @@ spaceAction w = if _carteDisplay w
        _ -> w & inventoryMode .~ TopInventory
  where
    theLoc = fst (_seenLocations w IM.! _selLocation w) w
-    updateTopCloseObject i = closeActiveObjects %~ ( Right (_buttons w IM.! i) : ) . tail 
+    updateTopCloseObject i w' = w' & closeActiveObjects %~ ( Right (_buttons w' IM.! i) : ) . tail 

 pauseGame :: World -> World
 pauseGame w = w {_menuLayers = [PauseMenu]}