@@ -28,7 +28,7 @@ import Yesod.Core (PathPiece(..))
2828newtype Id t = Id { unId :: UUID }
2929 deriving
3030 ( Eq, Ord, Generic, Read, Show, Data, ToField, FromField, PathPiece, FromJSON
31− , ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema
31+ , ToJSON, NFData, Hashable, FromJSONKey, ToJSONKey, ToSchema, ToParamSchema
3232 , FromHttpApiData, ToHttpApiData )
3333
3434type role Id nominal