mirror of
https://github.com/urbit/shrub.git
synced 2024-12-01 06:35:32 +03:00
chat-hook: rerun fix on OTA
This commit is contained in:
parent
ccf9296bab
commit
66e665d683
@ -19,8 +19,10 @@
|
||||
state-2
|
||||
state-3
|
||||
state-4
|
||||
state-5
|
||||
==
|
||||
::
|
||||
+$ state-5 [%5 state-base]
|
||||
+$ state-4 [%4 state-base]
|
||||
+$ state-3 [%3 state-base]
|
||||
+$ state-2 [%2 state-base]
|
||||
@ -48,7 +50,7 @@
|
||||
$% [%chat-update update:store]
|
||||
==
|
||||
--
|
||||
=| state-4
|
||||
=| state-5
|
||||
=* state -
|
||||
::
|
||||
%- agent:dbug
|
||||
@ -77,14 +79,14 @@
|
||||
=/ old !<(versioned-state old-vase)
|
||||
=| cards=(list card)
|
||||
|-
|
||||
?: ?=(%4 -.old)
|
||||
?: ?=(%5 -.old)
|
||||
[cards this(state old)]
|
||||
?: ?=(%3 -.old)
|
||||
?: ?=(?(%3 %4) -.old)
|
||||
=. cards
|
||||
%+ weld cards
|
||||
^- (list card)
|
||||
[%pass /pokeme %agent [our.bol %chat-hook] %poke %noun !>(%fix-dm)]~
|
||||
$(-.old %4)
|
||||
$(-.old %5)
|
||||
?: ?=(%2 -.old)
|
||||
=. cards
|
||||
%+ weld cards
|
||||
|
Loading…
Reference in New Issue
Block a user