This commit is contained in:
swrup 2025-11-30 11:40:34 +01:00
parent 552bccfbb1
commit 4efe2ff37c

View file

@ -28,9 +28,9 @@ let routes =
let get_ = get in let get_ = get in
let post = Fun.flip post in let post = Fun.flip post in
[ [
get (rel /?? nil) --> hello; get_ (rel /?? nil) --> hello;
get (rel / "terms" /?? nil) --> Static.terms; get_ (rel / "terms" /?? nil) --> Static.terms;
get (rel / "privacy" /?? nil) --> Static.privacy; get_ (rel / "privacy" /?? nil) --> Static.privacy;
get_ (rel / "management" / "keys" /?? nil) --> Management.keys_get; get_ (rel / "management" / "keys" /?? nil) --> Management.keys_get;
post (rel / "management" / "keys" /?? nil) any --> Management.keys_post; post (rel / "management" / "keys" /?? nil) any --> Management.keys_post;
] ]