diff --git a/pkg/garden/app/treaty.hoon b/pkg/garden/app/treaty.hoon index a9f075f14..d0874da22 100644 --- a/pkg/garden/app/treaty.hoon +++ b/pkg/garden/app/treaty.hoon @@ -1,6 +1,9 @@ /- docket, *treaty /+ default-agent, agentio, verb, dbug |% +:: TODO: update before livenet deploy +++ default-ally ~zod +:: +$ card card:agent:gall +$ state-0 $: treaties=(map [=ship =desk] treaty) @@ -23,9 +26,8 @@ pass pass:io cc ~(. +> bowl) ++ on-init - =/ sponsor=ship (sein:title [our now our]:bowl) - ?: =(our.bowl sponsor) `this - (on-poke %ally-update-0 !>([%add sponsor])) + ?: =(our.bowl default-ally) `this + (on-poke %ally-update-0 !>([%add default-ally])) ++ on-save !>(state) ++ on-load |= =vase @@ -120,8 +122,9 @@ |= =path ^- (unit (unit cage)) ?+ path (on-peek:def path) - [%x %alliance ~] ``(alliance-update:cg:ca %ini entente) - [%x %allies ~] ``(ally-update:cg:ca %ini allies) + [%x %alliance ~] ``(alliance-update:cg:ca %ini entente) + [%x %default-ally ~] ``ship+!>(default-ally) + [%x %allies ~] ``(ally-update:cg:ca %ini allies) :: [%x %treaties @ ~] =/ =ship (slav %p i.t.t.path) diff --git a/pkg/garden/mar/ship.hoon b/pkg/garden/mar/ship.hoon new file mode 120000 index 000000000..72de2c03c --- /dev/null +++ b/pkg/garden/mar/ship.hoon @@ -0,0 +1 @@ +../../base-dev/mar/ship.hoon \ No newline at end of file