mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-25 16:05:27 +03:00
contact-hooks: update for versioning
This commit is contained in:
parent
37ab1b7b2a
commit
b9206aacec
@ -10,6 +10,7 @@
|
|||||||
update:store
|
update:store
|
||||||
%contact-update
|
%contact-update
|
||||||
%contact-push-hook
|
%contact-push-hook
|
||||||
|
0 0
|
||||||
%.y :: necessary to enable p2p
|
%.y :: necessary to enable p2p
|
||||||
==
|
==
|
||||||
--
|
--
|
||||||
|
@ -11,6 +11,7 @@
|
|||||||
update:store
|
update:store
|
||||||
%contact-update
|
%contact-update
|
||||||
%contact-pull-hook
|
%contact-pull-hook
|
||||||
|
0 0
|
||||||
==
|
==
|
||||||
::
|
::
|
||||||
+$ agent (push-hook:push-hook config)
|
+$ agent (push-hook:push-hook config)
|
||||||
|
@ -71,7 +71,7 @@
|
|||||||
++ give
|
++ give
|
||||||
|= =update:store
|
|= =update:store
|
||||||
^- (list card)
|
^- (list card)
|
||||||
[%give %fact ~ [%contact-update !>(update)]]~
|
[%give %fact ~ [%contact-update-0 !>(update)]]~
|
||||||
--
|
--
|
||||||
::
|
::
|
||||||
++ on-poke
|
++ on-poke
|
||||||
@ -81,7 +81,7 @@
|
|||||||
|^
|
|^
|
||||||
=^ cards state
|
=^ cards state
|
||||||
?+ mark (on-poke:def mark vase)
|
?+ mark (on-poke:def mark vase)
|
||||||
%contact-update (update !<(update:store vase))
|
%contact-update-0 (update !<(update:store vase))
|
||||||
%import (import q.vase)
|
%import (import q.vase)
|
||||||
==
|
==
|
||||||
[cards this]
|
[cards this]
|
||||||
@ -203,7 +203,7 @@
|
|||||||
?: our
|
?: our
|
||||||
[/updates /our /all ~]
|
[/updates /our /all ~]
|
||||||
[/updates /all ~]
|
[/updates /all ~]
|
||||||
[%give %fact paths %contact-update !>(update)]~
|
[%give %fact paths %contact-update-0 !>(update)]~
|
||||||
--
|
--
|
||||||
::
|
::
|
||||||
++ import
|
++ import
|
||||||
@ -223,7 +223,7 @@
|
|||||||
=/ =ship (slav %p i.t.t.path)
|
=/ =ship (slav %p i.t.t.path)
|
||||||
=/ contact=(unit contact:store) (~(get by rolodex) ship)
|
=/ contact=(unit contact:store) (~(get by rolodex) ship)
|
||||||
?~ contact [~ ~]
|
?~ contact [~ ~]
|
||||||
:- ~ :- ~ :- %contact-update
|
:- ~ :- ~ :- %contact-update-0
|
||||||
!> ^- update:store
|
!> ^- update:store
|
||||||
[%add ship u.contact]
|
[%add ship u.contact]
|
||||||
::
|
::
|
||||||
|
@ -83,7 +83,7 @@
|
|||||||
%kick [~[watch-contacts] state]
|
%kick [~[watch-contacts] state]
|
||||||
::
|
::
|
||||||
%fact
|
%fact
|
||||||
?> ?=(%contact-update p.cage.sign)
|
?> ?=(%contact-update-0 p.cage.sign)
|
||||||
=+ !<(=update:contact q.cage.sign)
|
=+ !<(=update:contact q.cage.sign)
|
||||||
?+ -.update `state
|
?+ -.update `state
|
||||||
%add
|
%add
|
||||||
|
16
pkg/arvo/mar/contact/update-0.hoon
Normal file
16
pkg/arvo/mar/contact/update-0.hoon
Normal file
@ -0,0 +1,16 @@
|
|||||||
|
/+ *contact-store
|
||||||
|
::
|
||||||
|
|_ upd=update
|
||||||
|
++ grad %noun
|
||||||
|
++ grow
|
||||||
|
|%
|
||||||
|
++ noun upd
|
||||||
|
++ json (update:enjs upd)
|
||||||
|
--
|
||||||
|
::
|
||||||
|
++ grab
|
||||||
|
|%
|
||||||
|
++ noun update
|
||||||
|
++ json update:dejs
|
||||||
|
--
|
||||||
|
--
|
Loading…
Reference in New Issue
Block a user