contact-store: updates sent to /all path as well

This commit is contained in:
Logan Allen 2021-01-26 16:18:01 -06:00
parent 516c3418ea
commit 090946e328

View File

@ -29,7 +29,10 @@
+* this .
def ~(. (default-agent this %|) bowl)
::
++ on-init on-init:def
++ on-init
=. rolodex (~(put by rolodex) our.bowl *contact:store)
[~ this(state state)]
::
++ on-save !>(state)
++ on-load
|= old-vase=vase
@ -168,8 +171,8 @@
^- (list card)
=/ paths=(list path)
?: our
[/updates /our ~]
~[/updates]
[/updates /our /all ~]
[/updates /all ~]
[%give %fact paths %contact-update !>(update)]~
--
::