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

docket: force uninstall %hodl agent

Browse Source
This commit is contained in:
yosoyubik 2022-04-27 18:52:23 +02:00
parent 9bb844ada9
commit bb02368546
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pkg/garden/app/docket.hoon
View File

@ -56,8 +56,12 @@
=? old ?=(?(~ ^) -.old) [%1 old]
=^ cards old
?. ?=(%1 -.old) `old
=/ rein=cage kiln-rein+!>([%base %.y ~ ~])
=/ nuke=cage kiln-uninstall+!>(%hodl)
:_ old(- %2)
[%pass /rein %agent [our.bowl %hood] %poke kiln-rein+!>([%base %.y ~ ~])]~
:~ [%pass /rein %agent [our.bowl %hood] %poke rein]
[%pass /nuke %agent [our.bowl %hood] %poke nuke]
==
?> ?=(%2 -.old)
[cards this(state [old inflate-cache])]
::
@ -202,7 +206,8 @@
=^ cards state
?+ wire ~&(bad-docket-take+wire `state)
~ `state
[%rein ~] `state
[%rein ~] ~&(%reined `state)
[%nuke ~] ~&(%nuked `state)
[%kiln ~] take-kiln
[%charge @ *] (take-charge i.t.wire t.t.wire)
==