objective categorical abstract machine language personal data server
Return 400 instead of 500 for missing record on repo.getRecord
+5
-5
+5
-5
pegasus/lib/api/repo/getRecord.ml
+5
-5
pegasus/lib/api/repo/getRecord.ml
···
23
23
; cid= Some (Cid.to_string cid)
24
24
; value= Repository.Lex.repo_record_to_yojson value }
25
25
| _ ->
26
-
Errors.internal_error ~name:"RecordNotFound"
27
-
~msg:("could not find record " ^ uri)
28
-
() )
26
+
Errors.invalid_request ~name:"RecordNotFound"
27
+
("could not find record " ^ uri) )
29
28
| Error _ -> (
30
29
let%lwt input_did =
31
30
if String.starts_with ~prefix:"did:" input.repo then
···
68
67
Errors.internal_error ~name:"RecordNotFound"
69
68
~msg:
70
69
( "could not find record "
71
-
^ Util.Syntax.make_at_uri ~repo:input.repo ~collection:input.collection
72
-
~rkey:input.rkey ~fragment:None )
70
+
^ Util.Syntax.make_at_uri ~repo:input.repo
71
+
~collection:input.collection ~rkey:input.rkey ~fragment:None
72
+
)
73
73
() ) )