itemInInventoryByName :: [Entity Item] -> Text -> Bool
itemInInventoryByName [] _ = False
itemInInventoryByName :: [Entity Item] -> Text -> Bool
itemInInventoryByName [] _ = False
itemInInventoryByName [] _ = False