diff --git a/desk/app/reel.hoon b/desk/app/reel.hoon index 63d0cad..016cba5 100644 --- a/desk/app/reel.hoon +++ b/desk/app/reel.hoon @@ -174,7 +174,10 @@ :: swap out the nonce for the token in our-metadata =. our-metadata (~(put by (~(del by our-metadata) nonce)) token u.md) - `this + :_ this + =/ url (cat 3 vic token) + =/ path (stab (cat 3 '/v1/id-link/' id)) + ~[[%give %fact ~[path] %json !>(s+url)]] :: %reel-undescribe ?> =(our.bowl src.bowl) @@ -238,6 +241,16 @@ :~ [%pass +.pole %agent dock %poke cage] [%pass /expire/[ship.pole]/[token.pole] %arvo %b [%wait (add ~h1 now.bowl)]] == + :: + [%v1 %id-link id=*] + =/ id (crip +:(spud id.pole)) + ?~ token=(~(get by stable-id) id) `this + ?: (~(has in open-describes) u.token) + :: when the confirmation comes back we'll send the fact + `this + =/ url (cat 3 vic u.token) + :_ this + ~[[%give %fact ~[pole] %json !>(s+url)]] == :: ++ on-leave on-leave:def diff --git a/desk/desk.docket-0 b/desk/desk.docket-0 index 4bc4c7d..d480d77 100644 --- a/desk/desk.docket-0 +++ b/desk/desk.docket-0 @@ -4,7 +4,7 @@ glob-http+['https://bootstrap.urbit.org/glob-0v7.the2a.smdhg.89k09.6ar0t.gb5te.glob' 0v7.the2a.smdhg.89k09.6ar0t.gb5te] ::glob-ames+~zod^0v0 base+'landscape' - version+[1 26 1] + version+[1 26 2] website+'https://tlon.io' license+'MIT' ==