%ping: print on ping
::
?: =(%czar (clan:title our.bowl))
[~ app-core]
+ ~> %slog.0^leaf/"ping: prep {<our.bowl>}"
send-ping
:: +coup-ping-send: handle ames ack
::
::
=/ sponsor=ship (sein:title [our now our]:bowl)
::
+ ~> %slog.0^leaf/"ping: {<our.bowl>} -> {<sponsor>}"
:_ app-core
[ost.bowl %poke /ping-send [sponsor %ping] %noun ~]~
--
