reagent.key.error.cljs

(defn self-serve-info [state]
  (let [items (retail-cart-items)
        kitchen-stuff? (< (count items) (count (keys @CART)))]
    [:div#checkout.retail
      [:div#content
        [:h1 "Self Serve Items"]
        [:h2 "please pick up the following items from the Fridge or the Retail Shelf:"]
        [:div.group

        (doall 
          (for [[k items] (group-by :category items)]
            ^{:key (hash k)}
            [:<>
              [:h1.category (id->category k)]
              (doall 
                (for [item items]
                  ^{:key (hash item)}
                  [retail-item (get @CART (:id item)) item])) ])) ]
        (when kitchen-stuff?
          [:h2 "The rest of your order is being prepared and will be ready shortly!"])]
      [:div#options
        [:button {:onClick (fn [e] (swap! state assoc :view :checkout-complete))} 
          "OK!"]]]))