Fix crash on empty inventory left click

2022-03-09 18:17:08 +00:00
parent 3bfebc266b
commit 4a1ca905f7
2 changed files with 3 additions and 3 deletions
@@ -92,7 +92,7 @@ handlePressedMouseButton but w
    | but == ButtonMiddle || _carteDisplay (_uvWorld w) 
                = Just $ w & uvWorld . clickMousePos .~ _mousePos (_uvWorld w)
    | but == ButtonLeft = case _inventoryMode (_uvWorld w) of
-        CombineInventory mi -> Just $ fromMaybe w $ do -- ugly
+        CombineInventory mi -> Just $ fromMaybe (w & uvWorld . inventoryMode .~ TopInventory) $ do -- ugly
            i <- mi
            return $ over uvWorld (doCombine i) w
        _ -> Just w