giles
477ce766ff
Annotates ~500 defcomp params across 62 files: market (5), blog (7), cart (5), events (3), federation (4), account (3), orders (2), shared templates (11), sx docs (14), plus remaining spec fn params (z3, test-framework, adapter-dom, adapter-async, engine, eval). Total annotations in codebase: 1043. Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
13 lines
515 B
Plaintext
13 lines
515 B
Plaintext
;; Cart calendar entry components
|
|
|
|
(defcomp ~cart-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 ~cart-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)))
|