shrub/pkg/arvo/mar/publish/action.hoon

130 lines
2.3 KiB
Plaintext
Raw Normal View History

::
2019-07-12 01:07:05 +03:00
:::: /hoon/action/publish/mar
::
2020-01-09 02:13:42 +03:00
/- *publish
=, format
::
2020-01-09 02:13:42 +03:00
|_ act=action
::
++ grad %noun
++ grow
|%
++ noun act
++ tank >act<
--
::
++ grab
|%
2020-01-09 02:13:42 +03:00
++ noun action
++ json
|= jon=^json
2020-01-09 02:13:42 +03:00
=, dejs:format
;; action
2020-01-23 21:52:09 +03:00
|^ %. jon
%- of
2020-01-09 02:13:42 +03:00
:~ new-book+new-book
new-note+new-note
new-comment+new-comment
edit-book+edit-book
edit-note+edit-note
edit-comment+edit-comment
del-book+del-book
del-note+del-note
del-comment+del-comment
subscribe+subscribe
unsubscribe+unsubscribe
read+read
==
::
++ new-book
%- ot
:~ book+so
title+so
about+so
coms+bo
group+group-info
==
::
++ new-note
%- ot
:~ who+(su fed:ag)
book+so
note+so
title+so
body+so
==
::
++ new-comment
2020-01-09 02:13:42 +03:00
%- ot
:~ who+(su fed:ag)
book+so
note+so
body+so
2019-07-19 01:34:42 +03:00
==
2019-06-21 23:24:33 +03:00
::
2020-01-09 02:13:42 +03:00
++ edit-book
%- ot
:~ book+so
title+so
about+so
coms+bo
group+(mu group-info)
2019-06-21 23:24:33 +03:00
==
::
2020-01-09 02:13:42 +03:00
++ edit-note
%- ot
:~ who+(su fed:ag)
book+so
note+so
title+so
body+so
==
::
++ edit-comment
2020-01-09 02:13:42 +03:00
%- ot
:~ who+(su fed:ag)
book+so
note+so
comment+(su ;~(pfix sig (cook year when:^so)))
body+so
==
::
2020-01-09 02:13:42 +03:00
++ del-book (ot book+so ~)
::
2020-01-09 02:13:42 +03:00
++ del-note (ot who+(su fed:ag) book+so note+so ~)
::
2020-01-09 02:13:42 +03:00
++ del-comment
%- ot
:~ who+(su fed:ag)
book+so
note+so
comment+(su ;~(pfix sig (cook year when:^so)))
==
++ subscribe
2020-01-09 02:13:42 +03:00
%- ot
:~ who+(su fed:ag)
book+so
==
++ unsubscribe
2020-01-09 02:13:42 +03:00
%- ot
:~ who+(su fed:ag)
book+so
==
2019-06-21 23:24:33 +03:00
++ read
2020-01-09 02:13:42 +03:00
%- ot
:~ who+(su fed:ag)
book+so
note+so
2019-06-21 23:24:33 +03:00
==
2020-01-09 02:13:42 +03:00
++ group-info
%- ot
:~ group-path+pa
invitees+set-ship
use-preexisting+bo
make-managed+bo
2020-01-09 02:13:42 +03:00
==
++ set-ship (as (su fed:ag))
--
--
--