;; Cart calendar entry components (defcomp ~cart-cal-entry (&key name date-str cost) (li :class "flex items-start justify-between text-sm" (div (div :class "font-medium" (raw! name)) (div :class "text-xs text-stone-500" (raw! date-str))) (div :class "ml-4 font-medium" (raw! cost)))) (defcomp ~cart-cal-section (&key items-html) (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" (raw! items-html))))