cross-domain slice 1: events as a fed-sx peer + allocate-a-post-to-a-calendar (LIVE)

The first cross-domain federated workflow — behaviors defined by TYPES, across domains.

- events.rose-ash.com is now a fed-sx PEER: a lib/host instance with SX_DOMAIN=events whose 'calendar'
  TYPE declares an on-allocate behavior. Replaces the Python events service (no strangler). serve.sh
  gates domain types/behaviors on SX_DOMAIN (blog=article publish/digest; events=calendar+allocate).
- DIRECTED cross-domain delivery: an activity with :to <peer-base> is delivered to that peer's inbox
  (∪ followers). The wire gains 'to'. So 'allocate' targets the events peer specifically.
- host/blog--allocate-activity/allocate! + POST /:slug/allocate?calendar=<id>; the events calendar
  type's allocate-link DAG (an execute-fold effect) fires on receipt.
- docker-compose: the sx_events service (own store, shared SX_FED_SECRET, externalnet for a future
  events.rose-ash.com Caddy route).

LIVE PROOF: publish 'Gig Night' on blog.rose-ash.com → POST /gig-night/allocate?calendar=main → the
events peer RECEIVES the directed, signed activity (/activities: 'allocate article gig-night') and
its calendar type's on-allocate behavior FIRES (/flows: 'linked gig-night'). blog 218/218, full
conformance green.

NEXT: events runs lib/events (real calendars/recurrence/ticketing); link event→post; shop
(lib/commerce) sells tickets — same federated, type-declared shape.

Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>

lib/host/ta.sx

@@ -16,13 +16,13 @@
   (fn (a)
     {"verb" (get a :verb) "actor" (get a :actor) "object" (get a :object)
      "type" (get a :object-type) "slug" (get a :slug) "category" (get a :category)
-     "relation" (get a :relation) "target" (get a :target)
+     "relation" (get a :relation) "target" (get a :target) "to" (get a :to)
      "delta" (get a :delta) "id" (get a :id)}))
 (define host/ta--wire->activity
   (fn (w)
     {:verb (get w "verb") :actor (get w "actor") :object (get w "object")
      :object-type (get w "type") :slug (get w "slug") :category (get w "category")
-     :relation (get w "relation") :target (get w "target")
+     :relation (get w "relation") :target (get w "target") :to (get w "to")
      :delta (get w "delta") :id (get w "id")}))
 (define host/ta--serialize   (fn (a) (serialize (host/ta--activity->wire a))))
 (define host/ta--deserialize (fn (s) (host/ta--wire->activity (parse-safe s))))