urbit/pkg/arvo/mar/graph/validator/publish.hoon

/-  *post
|_  i=indexed-post
++  grow
  |%
  ++  noun  i
  --
++  grab
  |%
  ++  noun
    |=  p=*
    =/  ip  ;;(indexed-post p)
    ?+    index.p.ip  !!
      [@ @ ~]  ip
    ::  top level post must have title as first content
        [@ ~]
      ?>  ?=(^ contents.p.ip)
      ?>  ?=(%text -.i.contents.p.ip)
      ip
    ==
  --
::
++  grad  %noun
--
publish: first draft of graph-store migration 2020-09-08 07:18:21 +03:00			`/- *post`
			`\|_ i=indexed-post`
			`++ grow`
			`\|%`
			`++ noun i`
			`--`
			`++ grab`
			`\|%`
			`++ noun`
			`\|= p=*`
			`=/ ip ;;(indexed-post p)`
publish: store title in content 2020-09-08 09:08:52 +03:00			`?+ index.p.ip !!`
			`[@ @ ~] ip`
			`:: top level post must have title as first content`
			`[@ ~]`
			`?> ?=(^ contents.p.ip)`
			`?> ?=(%text -.i.contents.p.ip)`
			`ip`
			`==`
publish: first draft of graph-store migration 2020-09-08 07:18:21 +03:00			`--`
			`::`
			`++ grad %noun`
			`--`