Now also send invite messages to people who have already been invited.

To allow for hosts to notify/remind people they can join.
This commit is contained in:
Fang 2017-11-22 20:56:04 +01:00
parent 974d1e1026
commit 1771a56e36

View File

@ -1191,12 +1191,15 @@
=/ sus/(set ship)
%. sis.con.shape
?:(add ~(dif in sis) ~(int in sis))
?~ sus +>.$
=. +>.$
:: if banishing: notify only those affected.
:: if inviting: notify all targets.
=? sis !inv sus
=- (so-act [%phrase - [%inv inv so-cir]~])
%- ~(rep in `(set ship)`sus)
%- ~(rep in `(set ship)`sis)
|= {s/ship a/audience}
(~(put in a) [s %inbox])
?~ sus +>.$
(so-delta-our %config so-cir %permit [add sus])
::
++ so-admire ::< accept from