mirror of
https://github.com/urbit/shrub.git
synced 2024-11-28 22:33:06 +03:00
hood + apps: fix OTA process for feat/SPA
This commit is contained in:
parent
eaf523e3c2
commit
08e1abb139
@ -52,7 +52,8 @@
|
||||
^- (quip card _this)
|
||||
=/ old-state !<(versioned-state old)
|
||||
?: ?=(%4 -.old-state)
|
||||
[~ this(state old-state)]
|
||||
:- [%pass / %arvo %e %disconnect [~ /]]~
|
||||
this(state old-state)
|
||||
=/ new-state *state-zero
|
||||
=. new-state
|
||||
%_ new-state
|
||||
@ -72,7 +73,13 @@
|
||||
tile-ordering [%chat %publish %links %weather %clock %dojo ~]
|
||||
==
|
||||
:_ 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)
|
||||
|= [[=wire =ship =term] *]
|
||||
^- card
|
||||
|
@ -71,7 +71,7 @@
|
||||
^- (quip card _this)
|
||||
=/ rav [%sing %t [%da now.bol] /app/publish/notebooks]
|
||||
:_ 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 /permissions %agent [our.bol %permission-store] %watch /updates]
|
||||
(invite-poke:main [%create /publish])
|
||||
@ -108,7 +108,8 @@
|
||||
:* %pass /invites %agent [our.bol %invite-store] %watch
|
||||
/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]
|
||||
%poke %file-server-action
|
||||
!>([%serve-dir /'~publish' /app/landscape %.n])
|
||||
@ -174,7 +175,14 @@
|
||||
==
|
||||
::
|
||||
%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
|
||||
@ -500,6 +508,9 @@
|
||||
::
|
||||
[%bind ~]
|
||||
[~ this]
|
||||
::
|
||||
[%view-bind ~]
|
||||
[~ this]
|
||||
==
|
||||
::
|
||||
++ on-fail on-fail:def
|
||||
|
@ -241,10 +241,11 @@
|
||||
=< (se-born %home %link-proxy-hook)
|
||||
=< (se-born %home %link-listen-hook)
|
||||
=< (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)
|
||||
=> (se-born %home %file-server)
|
||||
=> (se-drop:(se-pull our.hid %dojo) | our.hid %dojo)
|
||||
(se-drop:(se-pull our.hid %chat-cli) | our.hid %chat-cli)
|
||||
::
|
||||
|
Loading…
Reference in New Issue
Block a user