urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-11-28 22:33:06 +03:00
Code Issues Packages Projects Releases Wiki Activity

hood + apps: fix OTA process for feat/SPA

Browse Source
This commit is contained in:
Logan Allen 2020-06-17 14:27:30 -04:00
parent eaf523e3c2
commit 08e1abb139
3 changed files with 26 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
pkg/arvo/app/launch.hoon
View File

@ -52,7 +52,8 @@
^- (quip card _this) ^- (quip card _this)
=/ old-state !<(versioned-state old) =/ old-state !<(versioned-state old)
?: ?=(%4 -.old-state) ?: ?=(%4 -.old-state)
[~ this(state old-state)] :- [%pass / %arvo %e %disconnect [~ /]]~
this(state old-state)
=/ new-state *state-zero =/ new-state *state-zero
=. new-state =. new-state
%_ new-state %_ new-state
@ -72,7 +73,13 @@
tile-ordering [%chat %publish %links %weather %clock %dojo ~] tile-ordering [%chat %publish %links %weather %clock %dojo ~]
== ==
:_ this(state [%4 new-state]) :_ this(state [%4 new-state])
:- [%pass / %arvo %e %disconnect [~ /]] %+ welp
:~ [%pass / %arvo %e %disconnect [~ /]]
:* %pass /srv %agent [our.bowl %file-server]
%poke %file-server-action
!>([%serve-dir / /app/landscape %.n])
==
==
%+ turn ~(tap by wex.bowl) %+ turn ~(tap by wex.bowl)
|= [[=wire =ship =term] *] |= [[=wire =ship =term] *]
^- card ^- card

17
pkg/arvo/app/publish.hoon
View File

@ -71,7 +71,7 @@
^- (quip card _this) ^- (quip card _this)
=/ rav [%sing %t [%da now.bol] /app/publish/notebooks] =/ rav [%sing %t [%da now.bol] /app/publish/notebooks]
:_ this :_ this
:~ [%pass /bind %arvo %e %connect [~ /'publish-view'] %publish] :~ [%pass /view-bind %arvo %e %connect [~ /'publish-view'] %publish]
[%pass /read/paths %arvo %c %warp our.bol q.byk.bol `rav] [%pass /read/paths %arvo %c %warp our.bol q.byk.bol `rav]
[%pass /permissions %agent [our.bol %permission-store] %watch /updates] [%pass /permissions %agent [our.bol %permission-store] %watch /updates]
(invite-poke:main [%create /publish]) (invite-poke:main [%create /publish])
@ -108,7 +108,8 @@
:* %pass /invites %agent [our.bol %invite-store] %watch :* %pass /invites %agent [our.bol %invite-store] %watch
/invitatory/publish /invitatory/publish
== ==
[%pass / %arvo %e %disconnect [~ /'~publish']] [%pass /bind %arvo %e %disconnect [~ /'~publish']]
[%pass /view-bind %arvo %e %connect [~ /'publish-view'] %publish]
:* %pass /srv %agent [our.bol %file-server] :* %pass /srv %agent [our.bol %file-server]
%poke %file-server-action %poke %file-server-action
!>([%serve-dir /'~publish' /app/landscape %.n]) !>([%serve-dir /'~publish' /app/landscape %.n])
@ -174,7 +175,14 @@
== ==
:: ::
%3 %3
[cards this(state p.old-state)] :_ this(state p.old-state)
%+ welp cards
:~ [%pass /bind %arvo %e %disconnect [~ /'~publish']]
[%pass /view-bind %arvo %e %connect [~ /'publish-view'] %publish]
:* %pass /srving %agent [our.bol %file-server]
%poke %file-server-action
!>([%serve-dir /'~publish' /app/landscape %.n])
== ==
== ==
:: ::
++ convert-comment-2-3 ++ convert-comment-2-3
@ -500,6 +508,9 @@
:: ::
[%bind ~] [%bind ~]
[~ this] [~ this]
::
[%view-bind ~]
[~ this]
== ==
:: ::
++ on-fail on-fail:def ++ on-fail on-fail:def

5
pkg/arvo/lib/hood/drum.hoon
View File

@ -241,10 +241,11 @@
=< (se-born %home %link-proxy-hook) =< (se-born %home %link-proxy-hook)
=< (se-born %home %link-listen-hook) =< (se-born %home %link-listen-hook)
=< (se-born %home %link-view) =< (se-born %home %link-view)
=< (se-born %home %file-server) =< (se-born %home %s3-store)
(se-born %home %s3-store) (se-born %home %file-server)
. .
?> ?=(%5 ver) ?> ?=(%5 ver)
=> (se-born %home %file-server)
=> (se-drop:(se-pull our.hid %dojo) | our.hid %dojo) => (se-drop:(se-pull our.hid %dojo) | our.hid %dojo)
(se-drop:(se-pull our.hid %chat-cli) | our.hid %chat-cli) (se-drop:(se-pull our.hid %chat-cli) | our.hid %chat-cli)
:: ::