Add fields to determine an item's inventory position/whether it is held

2022-04-11 13:32:06 +01:00
parent d46d315203
commit c686d9e111
14 changed files with 107 additions and 113 deletions
@@ -45,7 +45,7 @@ basicCrPict col cr cfig w =
    )
  where 
    targetingPic = IM.elems $ IM.mapMaybeWithKey f $ _crInv cr
-    f invid it = fmap (\g -> g invid it cr w) (it ^? itTargeting . tgDraw)
+    f invid it = fmap (\g -> g invid it cr cfig w) (it ^? itTargeting . tgDraw)

 drawCrEquipment :: Creature -> SPic
 drawCrEquipment cr = uncurryV translateSPf (_crPos cr) (rotateSP (_crDir cr) $ drawEquipment cr)