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

Merge pull request #6250 from urbit/i/6247/revert-once

Browse Source 
Revert "Merge pull request #6199 from urbit/philip/install-once"
This commit is contained in:
Josh Lehman 2023-01-24 16:05:44 -08:00 committed by GitHub
commit 27c62ac854
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkg/arvo/gen/hood/install.hoon
View File

@ -8,7 +8,7 @@
:: ::
:- %say :- %say
|= $: [now=@da eny=@uvJ bec=beak] |= $: [now=@da eny=@uvJ bec=beak]
[[her=@p rem=desk ~] local=@tas once=_|] [[her=@p rem=desk ~] local=@tas]
== ==
=/ loc=desk ?:(=(%$ local) rem local) =/ loc=desk ?:(=(%$ local) rem local)
[%kiln-install loc her rem once] [%kiln-install loc her rem]

4
pkg/arvo/lib/hood/kiln.hoon
View File

@ -687,7 +687,7 @@
abet:(emit:(spam leaf+mez ~) %pass /kiln %arvo %c [%info u.tor]) abet:(emit:(spam leaf+mez ~) %pass /kiln %arvo %c [%info u.tor])
:: ::
++ poke-install ++ poke-install
|= [loc=desk her=ship rem=desk once=?] |= [loc=desk her=ship rem=desk]
=+ .^(=rock:tire %cx /(scot %p our)//(scot %da now)/tire) =+ .^(=rock:tire %cx /(scot %p our)//(scot %da now)/tire)
=/ =zest =/ =zest
?~ got=(~(get by rock) loc) ?~ got=(~(get by rock) loc)
@ -703,8 +703,6 @@
abet:(spam (render "already syncing" loc her rem ~) ~) abet:(spam (render "already syncing" loc her rem ~) ~)
?: =([our loc] [her rem]) ?: =([our loc] [her rem])
abet abet
?: once
abet:abet:(merge:(work loc) her rem da+now %only-that)
=/ sun (sync loc her rem) =/ sun (sync loc her rem)
~> %slog.(fmt "beginning install into {here:sun}") ~> %slog.(fmt "beginning install into {here:sun}")
=< abet:abet:init =< abet:abet:init