stop pinging yourself, zod

This commit is contained in:
Ted Blackman 2019-08-05 17:21:00 -07:00
parent 290276f108
commit 2157995bb0
2 changed files with 10 additions and 3 deletions

View File

@ -1,3 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:52447461c64b4abf79b6daafa9e693077e3342101f1d451f280d5bd145ac544e
size 10290998
oid sha256:91878e1cf47f40528ff924771938927b69e7672ef5c9e314ef1b26e1857a0186
size 10291667

View File

@ -1147,12 +1147,19 @@
abet:(on-wake:(make-peer-core peer-state channel) bone error)
:: +on-init: first boot; subscribe to our info from jael
::
:: A non-galaxy ship makes a %public-keys subscription to stay
:: updated about its sponsor. A galaxy is its own sponsor, so it
:: does not make such a request.
::
++ on-init
|= our=ship
^+ event-core
::
=~ (emit duct %pass /private-keys %k %private-keys ~)
=~ ?: =(%czar (clan:title our))
event-core(sponsor.ames-state our)
(emit duct %pass /public-keys %k %public-keys [n=our ~ ~])
::
(emit duct %pass /private-keys %k %private-keys ~)
(emit duct %pass /turf %k %turf ~)
==
:: +on-priv: set our private key to jael's response