mirror of
https://github.com/urbit/shrub.git
synced 2024-12-19 00:13:12 +03:00
landscape: migration works for chat/groups
This commit is contained in:
parent
f7e550b1f4
commit
5e89835c5d
@ -1,10 +1,16 @@
|
||||
/- met=metadata-store, gra=graph-store
|
||||
/- *group
|
||||
|%
|
||||
+$ flag (pair ship term)
|
||||
++ chat
|
||||
|%
|
||||
+$ import
|
||||
[writers=(set ship) =association:met =update-log:gra =graph:gra]
|
||||
+$ flag (pair ship term)
|
||||
+$ imports (map flag import)
|
||||
--
|
||||
++ groups
|
||||
|%
|
||||
+$ import [=association:met =group]
|
||||
+$ imports (map flag import)
|
||||
--
|
||||
--
|
||||
|
@ -18,10 +18,20 @@
|
||||
(scry:strandio ,[%6 =network:gra] /gx/graph-store/export/noun)
|
||||
;< =associations:met bind:m
|
||||
(scry:strandio ,associations:met /gx/metadata-store/associations/noun)
|
||||
=/ =imports:groups:i
|
||||
%- ~(gas by *imports:groups:i)
|
||||
%+ murn ~(tap by groups)
|
||||
|= [=flag:i =group]
|
||||
^- (unit [_flag import:groups:i])
|
||||
?~ assoc=(~(get by associations) [%groups flag])
|
||||
~& missing-group-assoc/flag
|
||||
~
|
||||
`[flag u.assoc group]
|
||||
;< ~ bind:m (poke-our:strandio %groups group-import+!>(imports))
|
||||
=/ =imports:chat:i
|
||||
%- ~(gas by *imports:chat:i)
|
||||
%+ murn ~(tap by graphs.network)
|
||||
|= [=flag:chat:i graph=graph:gra mar=(unit mark)]
|
||||
|= [=flag:i graph=graph:gra mar=(unit mark)]
|
||||
?. =(mar `%graph-validator-chat) :: XX: correct detection?
|
||||
~
|
||||
?~ assoc=(~(get by associations) [%graph flag])
|
||||
|
Loading…
Reference in New Issue
Block a user