ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-23 06:42:09 +03:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #4907 from urbit/lf/dm-fixes

Browse Source 
dm-hook: boot fixes
This commit is contained in:
matildepark 2021-05-18 00:29:57 -04:00 committed by GitHub
commit 65c35bb50b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkg/arvo/app/dm-hook.hoon
View File

@ -32,7 +32,7 @@
:_ this :_ this
:_ ~ :_ ~
=/ dms=(list resource) =/ dms=(list resource)
?. .^(? %gu (scry:io %home %graph-store ~)) ?. .^(? %gu (scry:io %graph-store ~))
~ ~
%+ skim ~(tap in get-keys:gra) %+ skim ~(tap in get-keys:gra)
|=([ship name=term] ?=(^ (rush name ;~(pfix (jest 'dm--') (star next))))) |=([ship name=term] ?=(^ (rush name ;~(pfix (jest 'dm--') (star next)))))

3
pkg/arvo/app/hood.hoon
View File

@ -2,7 +2,7 @@
/+ drum=hood-drum, helm=hood-helm, kiln=hood-kiln /+ drum=hood-drum, helm=hood-helm, kiln=hood-kiln
|% |%
+$ state +$ state
$: %12 $: %13
drum=state:drum drum=state:drum
helm=state:helm helm=state:helm
kiln=state:kiln kiln=state:kiln
@ -15,6 +15,7 @@
[%9 drum=state:drum helm=state:helm kiln=state:kiln] [%9 drum=state:drum helm=state:helm kiln=state:kiln]
[%10 drum=state:drum helm=state:helm kiln=state:kiln] [%10 drum=state:drum helm=state:helm kiln=state:kiln]
[%11 drum=state:drum helm=state:helm kiln=state:kiln] [%11 drum=state:drum helm=state:helm kiln=state:kiln]
[%12 drum=state:drum helm=state:helm kiln=state:kiln]
== ==
+$ any-state-tuple +$ any-state-tuple
$: drum=any-state:drum $: drum=any-state:drum

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

@ -108,6 +108,7 @@
%metadata-pull-hook %metadata-pull-hook
%group-view %group-view
%settings-store %settings-store
%dm-hook
== ==
:: ::
++ deft-fish :: default connects ++ deft-fish :: default connects
@ -258,6 +259,8 @@
=> (se-born | %home %contact-pull-hook) => (se-born | %home %contact-pull-hook)
=> (se-born | %home %settings-store) => (se-born | %home %settings-store)
(se-born | %home %group-view) (se-born | %home %group-view)
=? ..on-load (lte hood-version %13)
(se-born | %home %dm-hook)
..on-load ..on-load
:: ::
++ reap-phat :: ack connect ++ reap-phat :: ack connect