@@ -27,7 +27,7 @@ type ComprehensiveAPI =
28 , -- List users with query parameters
28 , -- List users with query parameters
29 listUsers ::
29 listUsers ::
30− Route GET (Path (Lit "users") :? { limit :: Int # Example "10", offset :: Int # Example "0" })
30+ Route GET ("users" :? { limit :: Int # Example "10", offset :: Int # Example "0" })
31 (Request {})
31 (Request {})
32 (ok :: { body :: Array User })
32 (ok :: { body :: Array User })