shrub/pkg/arvo/gen/dm-hook/dm.hoon

::  graph-store|add-post: add post to a graph
::
/-  *graph-store
:-  %say
|=  $:  [now=@da eny=@uvJ =beak]
        [[him=ship contents=(list content) ~] ~]
    ==
=*  our  p.beak
=/  =post  *post
=:  author.post     our
    index.post      ~[him now]
    time-sent.post  now
    contents.post   contents
==
::
:-  %graph-update-2
^-  update
:-  now
:+  %add-nodes  [our %inbox]
%-  ~(gas by *(map index node))
~[[~[him now] [%&^post [%empty ~]]]]
dm-hook: add root if nonexistent 2021-04-23 07:14:47 +03:00			`:: graph-store\|add-post: add post to a graph`
			`::`
			`/- *graph-store`
			`:- %say`
			`\|= $: [now=@da eny=@uvJ =beak]`
			`[[him=ship contents=(list content) ~] ~]`
			`==`
			`=* our p.beak`
			`=/ =post *post`
			`=: author.post our`
			`index.post ~[him now]`
			`time-sent.post now`
			`contents.post contents`
			`==`
			`::`
dm-hook: update for latest master 2021-05-03 05:41:43 +03:00			`:- %graph-update-2`
dm-hook: add root if nonexistent 2021-04-23 07:14:47 +03:00			`^- update`
			`:- now`
			`:+ %add-nodes [our %inbox]`
			`%- ~(gas by *(map index node))`
dm-hook: update for latest master 2021-05-03 05:41:43 +03:00			`~[[~[him now] [%&^post [%empty ~]]]]`