urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-03 05:43:18 +03:00
Code Issues Packages Projects Releases Wiki Activity

Can now also remove circle sources from within %talk.

Browse Source
This commit is contained in:
Fang 2017-11-09 19:05:58 +01:00
parent 664a97b0e8
commit 3392f80ce3
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
app/talk.hoon
View File

@ -80,6 +80,7 @@
{$invite naem (set ship)} ::< give permission
{$banish naem (set ship)} ::< deny permission
{$source naem (map circle range)} ::< add source
{$unsource naem (map circle range)} ::< remove source
:: personal metadata ::
{$attend audience (unit presence)} ::< set our presence
{$name audience human} ::< set our name
@ -700,6 +701,9 @@
::
;~((glue ace) (perk %source ~) cire sorz)
::
;~((glue ace) (perk %unsource ~) cire sorz)
::TODO why do these nest-fail when doing perk with multiple?
::
:: personal metadata
::
;~ (glue ace)
@ -874,7 +878,8 @@
$filter (filter +.job)
$invite (permit & +.job)
$banish (permit | +.job)
$source (source +.job)
$source (source & +.job)
$unsource (source | +.job)
:: personal metadata
$attend (attend +.job)
$name (name +.job)
@ -1055,9 +1060,9 @@
++ source ::< %source
::> adds {pas} to {nom}'s src.
::
|= {nom/naem pos/(map circle range)}
|= {sub/? nom/naem pos/(map circle range)}
^+ ..sh-work
(sh-act %source nom & pos)
(sh-act %source nom sub pos)
::
::> ||
::> || %personal-metadata