Remove ComposedItem, to be replaced with PartiallyComposedItem
This commit is contained in:
@@ -96,8 +96,8 @@ getRootItemBounds i inv = do
|
||||
let ia = allInvLocs inv
|
||||
itm <- ia ^? ix i . _2
|
||||
let root = locToTop itm
|
||||
x <- locRightmost root ^? locLDT . ldtValue . cItem . itLocation . ilInvID
|
||||
y <- locLeftmost root ^? locLDT . ldtValue . cItem . itLocation . ilInvID
|
||||
x <- locRightmost root ^? locLDT . ldtValue . _1 . itLocation . ilInvID
|
||||
y <- locLeftmost root ^? locLDT . ldtValue . _1 . itLocation . ilInvID
|
||||
return (x, y)
|
||||
|
||||
drawMouseOver :: Configuration -> World -> Picture
|
||||
|
||||
Reference in New Issue
Block a user