ph: include missing library function
/- *aquarium, spider
-/+ libstrand=strand, *strandio, util=ph-util
+/+ libstrand=strand, *strandio, util=ph-util, aqua-azimuth
=, strand=strand:libstrand
|%
++ send-events
(pure:m ~)
loop
::
+++ init-moon ::NOTE real moon always have the same keys
+ |= [moon=ship fake=?]
+ ?> ?=(%earl (clan:title moon))
+ ?: fake (init-ship moon &)
+ =/ m (strand ,~)
+ ^- form:m
+ ;< ~ bind:m
+ %+ dojo (^sein:title moon)
+ =/ =pass pub:ex:(get-keys:aqua-azimuth moon 1)
+ "|moon {(scow %p moon)}, =public-key {(scow %uw pass)}"
+ (init-ship moon |)
+::
++ init-ship
|= [=ship fake=?]
=/ m (strand ,~)
