Cleanup
This commit is contained in:
@@ -239,8 +239,8 @@ drawRBOptions cfig w = fromMaybe mempty $ do
|
||||
guard $ ButtonRight `M.member` _mouseButtons (_input w)
|
||||
invid <- you w ^? crManipulation . manObject . imSelectedItem
|
||||
eslist <-
|
||||
fmap equipSiteToPositions $
|
||||
you w ^? crInv . ix invid . itUse . uequipEffect . eeSite
|
||||
fmap eqSiteToPositions $
|
||||
you w ^? crInv . ix invid . itUse . uequipEffect . eeType
|
||||
i <- w ^? rbOptions . opSel
|
||||
let ae = getEquipmentAllocation w
|
||||
sss <- w ^? hud . hudElement . diSections
|
||||
|
||||
Reference in New Issue
Block a user