;; Cart calendar entry components

(defcomp ~calendar/cal-entry (&key (name :as string) (date-str :as string) (cost :as string))
  (li :class "flex items-start justify-between text-sm"
    (div (div :class "font-medium" name)
      (div :class "text-xs text-stone-500" date-str))
    (div :class "ml-4 font-medium" cost)))

(defcomp ~calendar/cal-section (&key items)
  (div :class "mt-6 border-t border-stone-200 pt-4"
    (h2 :class "text-base font-semibold mb-2" "Calendar bookings")
    (ul :class "space-y-2" items)))