futur.blue
objective categorical abstract machine language personal data server
Don't use same `since` for all records in imported repo
+1
-1
pegasus/lib/api/repo/listRecords.ml
+1
-1
pegasus/lib/api/repo/listRecords.ml
···
21
21
List.fold_left
22
22
(fun (_cursor, results_rev) (record : User_store.Types.record) ->
23
23
let uri = "at://" ^ input_did ^ "/" ^ record.path in
24
-
( record.since
24
+
( record.since ^ record.path
25
25
, { uri
26
26
; cid= Cid.to_string record.cid
27
27
; value= Repository.Lex.repo_record_to_yojson record.value }