urbit/gen/hood/load.hoon
2018-03-18 21:18:20 -07:00

21 lines
454 B
Plaintext

:: Hood, generic: load named hood component's state from backup
::
:::: /hoon/load/hood/gen
::
/? 310
/+ hood-womb, old-zuse
=, old-zuse
::
::::
::
:- %say
|= $: {now/@da eny/@uvJ byk/beak}
{{dap/term pas/@uw ~} ~}
==
^- {$hood-load ?(part:hood-womb)}
?+ dap ~|(unknown-backup+dap !!)
$womb
=+ dat=.^(@ %cx (tope byk /jam-crub/womb-part/bak/hood/app))
[%hood-load ;;(part:hood-womb (cue (dy:crub pas dat)))]
==