mirror of
https://github.com/urbit/shrub.git
synced 2024-12-04 04:35:02 +03:00
Removed /friend query for now.
This commit is contained in:
parent
9075373db7
commit
ab7f7d47a5
@ -1662,18 +1662,6 @@
|
|||||||
?- -.qer
|
?- -.qer
|
||||||
$reader
|
$reader
|
||||||
``[%reader nak nicks]
|
``[%reader nak nicks]
|
||||||
::
|
|
||||||
$friend
|
|
||||||
:+ ~ ~
|
|
||||||
:- %friend
|
|
||||||
%- ~(gas in *(set circle))
|
|
||||||
%+ murn
|
|
||||||
=- (~(tap in src.shape.-))
|
|
||||||
(~(got by stories) (main our.bol))
|
|
||||||
|= p/partner
|
|
||||||
^- (unit circle)
|
|
||||||
?. ?=($& -.p) ~
|
|
||||||
[~ p.p]
|
|
||||||
::
|
::
|
||||||
$burden
|
$burden
|
||||||
:+ ~ ~
|
:+ ~ ~
|
||||||
@ -1753,18 +1741,6 @@
|
|||||||
$glyph `[%reader dif]
|
$glyph `[%reader dif]
|
||||||
$nick `[%reader dif]
|
$nick `[%reader dif]
|
||||||
==
|
==
|
||||||
::
|
|
||||||
$friend
|
|
||||||
:: new or removed local stories apply.
|
|
||||||
::TODO include mailbox sources. check privacy flags.
|
|
||||||
?. ?=($story -.dif) ~
|
|
||||||
=/ add/(unit ?)
|
|
||||||
?+ -.dif.dif ~
|
|
||||||
$new `&
|
|
||||||
$remove `|
|
|
||||||
==
|
|
||||||
?~ add ~
|
|
||||||
`[%friend u.add [our.bol nom.dif]]
|
|
||||||
::
|
::
|
||||||
$burden
|
$burden
|
||||||
::?: &(=(who.qer src.bol) did-they-send-a-burden) ~
|
::?: &(=(who.qer src.bol) did-they-send-a-burden) ~
|
||||||
@ -1844,7 +1820,6 @@
|
|||||||
=> depa
|
=> depa
|
||||||
|^ %- af :~
|
|^ %- af :~
|
||||||
[%reader ul]
|
[%reader ul]
|
||||||
[%friend ul]
|
|
||||||
[%burden (at /[%p])]
|
[%burden (at /[%p])]
|
||||||
[%report ul]
|
[%report ul]
|
||||||
[%circle (al knot rang)]
|
[%circle (al knot rang)]
|
||||||
@ -1862,7 +1837,6 @@
|
|||||||
^- ?
|
^- ?
|
||||||
?- -.qer
|
?- -.qer
|
||||||
$reader (team our.bol who)
|
$reader (team our.bol who)
|
||||||
$friend &
|
|
||||||
$burden ?& =(who who.qer)
|
$burden ?& =(who who.qer)
|
||||||
=(our.bol (above who))
|
=(our.bol (above who))
|
||||||
==
|
==
|
||||||
@ -1982,7 +1956,7 @@
|
|||||||
?~ fal
|
?~ fal
|
||||||
%- pre-bake
|
%- pre-bake
|
||||||
ta-done:(ta-greet:ta nom cir)
|
ta-done:(ta-greet:ta nom cir)
|
||||||
=. u.fal [>%reap-friend-fail nom cir< u.fal]
|
=. u.fal [>%reap-circle-fail nom cir< u.fal]
|
||||||
%- (slog (flop u.fal))
|
%- (slog (flop u.fal))
|
||||||
%- pre-bake
|
%- pre-bake
|
||||||
ta-done:(ta-leave:ta nom cir)
|
ta-done:(ta-leave:ta nom cir)
|
||||||
|
@ -14,7 +14,6 @@
|
|||||||
::
|
::
|
||||||
++ query ::> query paths
|
++ query ::> query paths
|
||||||
$% {$reader $~} ::< shared ui state
|
$% {$reader $~} ::< shared ui state
|
||||||
{$friend $~} ::< publicly joined
|
|
||||||
{$burden who/ship} ::< duties to share
|
{$burden who/ship} ::< duties to share
|
||||||
{$report $~} ::< duty reports
|
{$report $~} ::< duty reports
|
||||||
{$circle nom/knot ran/range} ::< story query
|
{$circle nom/knot ran/range} ::< story query
|
||||||
|
Loading…
Reference in New Issue
Block a user