urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-20 09:21:42 +03:00
Code Issues Packages Projects Releases Wiki Activity

gall: run +ap-kill-down only once

Browse Source
This commit is contained in:
yosoyubik 2022-06-30 17:06:22 +02:00
parent 2107240962
commit cb5893ac05
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
pkg/arvo/sys/vane/gall.hoon
View File

@ -221,12 +221,15 @@
=^ tan ap-core (ap-install:ap-core `p.old-state.egg.i.apps) =^ tan ap-core (ap-install:ap-core `p.old-state.egg.i.apps)
?^ tan ?^ tan
(mean u.tan) (mean u.tan)
=? ap-core =(%8 -.spore)
~> %slog.[0 leaf+"gall: running +ap-kill-down"]
=/ boats=(list [=wire =dock]) =/ boats=(list [=wire =dock])
~(tap in ~(key by boat.egg.i.apps)) ~(tap in ~(key by boat.egg.i.apps))
|- ^+ ap-core |- ^+ ap-core
?~ boats ap-core ?~ boats ap-core
=/ [=wire =dock] i.boats =/ [=wire =dock] i.boats
$(boats t.boats, ap-core (ap-kill-down:ap-core wire dock)) $(boats t.boats, ap-core (ap-kill-down:ap-core wire dock))
ap-core
$(apps t.apps, mo-core ap-abet:ap-core) $(apps t.apps, mo-core ap-abet:ap-core)
=. mo-core (mo-subscribe-to-agent-builds:mo-core now) =. mo-core (mo-subscribe-to-agent-builds:mo-core now)
=^ moves adult-gate mo-abet:mo-core =^ moves adult-gate mo-abet:mo-core