ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-01 11:33:41 +03:00
Code Issues Packages Projects Releases Wiki Activity

gall,clay: fix migration file build dates; add %home as parent desk in jams

Browse Source
This commit is contained in:
Ted Blackman 2021-09-29 15:00:42 -04:00
parent f985a3745e
commit 9560fa43b2
2 changed files with 19 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
pkg/arvo/sys/vane/clay.hoon
View File

@ -317,7 +317,10 @@
$>(%flog task:dill) ::
== ::
$: %g :: to %gall
$>(%deal task:gall) ::
$> $? %deal
%jolt
==
task:gall
== ::
$: %j :: by %jael
$>(%public-keys task:jael) ::
@ -344,7 +347,8 @@
gift ::
== ::
$: %gall
$> $? %unto
$> $? %onto
%unto
==
gift:gall
==
@ -1596,7 +1600,13 @@
++ migrate-dist
~> %slog.0^'clay: migrating for third-party software distribution'
|^ ^+ ..park
:: first make sure gall has molted and has :hood running
::
=. ..park (emit hen %pass /dist/hood %g %jolt %home %hood)
:: now ask :hood to install all the new desks
::
:: NOTE: reverse order, since we're prepending moves each time
::
=. ..park (install-from-tmp %bitcoin)
=. ..park (install-from-tmp %webterm)
=. ..park (install-from-tmp %landscape)
@ -1625,7 +1635,7 @@
++ create-desk ^- move
:^ hen %pass /dist/create/[desk]
%^ new-desk:cloy desk
(latest-tako desk)
(latest-tako %home)
;;((map path page) (cue (get-tmp-jam desk)))
::
++ publish-desk ^- move
@ -4803,6 +4813,8 @@
?^ dud
~|(%clay-take-dud (mean tang.u.dud))
?: ?=([%dist *] tea)
?: ?=(%onto +<.hin)
[~ ..^$]
?> ?=(%unto +<.hin)
?> ?=(%poke-ack -.p.hin)
?~ p.p.hin
@ -4962,6 +4974,7 @@
::
%boon !!
%lost !!
%onto !!
%unto !!
%writ
%- (slog leaf+"clay: strange writ (expected on upgrade to Fusion)" ~)

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

@ -254,7 +254,6 @@
%- ~(urn by eggs.old)
|= [a=term e=egg]
::NOTE kiln will kick off appropriate app revival
?: =(%hood a) e(q.beak %base)
e(old-state [%| p.old-state.e])
+>.old
--
@ -578,7 +577,7 @@
=/ nex=(list [=care:clay =path]) ~(tap in q.sign-arvo)
~> %slog.[0 leaf+"gall: reloading agents"]
~< %slog.[0 leaf+"gall: reloaded agents"]
=; cor (mo-subscribe-to-agent-builds:cor p.p.sign-arvo)
=; cor (mo-subscribe-to-agent-builds:cor now)
%+ roll nex
|= [[=care:clay =path] cor=_mo-core]
^+ cor
@ -597,8 +596,8 @@
?: ?=(%| -.agent.u.yok)
~> %slog.[0 leaf+"gall: dead agent reload: {<dap>}"]
cor
=/ bek=beak [our q.beak.u.yok p.sign-arvo]
=/ rag (mo-scry-agent-cage dap q.bek p.sign-arvo)
=/ bek=beak [our q.beak.u.yok da+now]
=/ rag (mo-scry-agent-cage dap q.bek da+now)
?: ?=(%| -.rag)
(mean p.rag)
(mo-receive-core:cor dap bek p.rag)