diff --git a/geniusyield-server-lib/src/GeniusYield/Server/Dex/HistoricalPrices/TapTools/Client.hs b/geniusyield-server-lib/src/GeniusYield/Server/Dex/HistoricalPrices/TapTools/Client.hs index 977b68b..e1f5d5a 100644 --- a/geniusyield-server-lib/src/GeniusYield/Server/Dex/HistoricalPrices/TapTools/Client.hs +++ b/geniusyield-server-lib/src/GeniusYield/Server/Dex/HistoricalPrices/TapTools/Client.hs @@ -104,13 +104,13 @@ instance Swagger.ToParamSchema TapToolsInterval where instance Swagger.ToSchema TapToolsInterval where declareNamedSchema p = - pure $ - Swagger.NamedSchema (Just "TapToolsInterval") $ - Swagger.paramSchemaToSchema p - & Swagger.example - ?~ toJSON TTI1M - & Swagger.description - ?~ "The time interval" + pure + $ Swagger.NamedSchema (Just "TapToolsInterval") + $ Swagger.paramSchemaToSchema p + & Swagger.example + ?~ toJSON TTI1M + & Swagger.description + ?~ "The time interval" type TapToolsOHLCVPrefix ∷ Symbol type TapToolsOHLCVPrefix = "tapToolsOHLCV"