Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (let [change-dish-count (fn [dishes_vec i] (mapv #(if (= i (:menu-item-id %)) (assoc % :count count_d) %) dishes_vec))]
- (mapv #(if (= (:id %) (:active-receipt db))
- (update % :dishes change-dish-count (:id dish_map))
- %)
- vector-of-maps))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement