spec :: WalletDocHttpClient -> Spec
spec client = do
    it "Fetches the documentation from the API" $ do
        response <- runExceptT $ Client.getSwaggerJson client
        response `shouldSatisfy` isRight
spec :: WalletDocHttpClient -> Spec
spec client = do
    it "Fetches the documentation from the API" $ do
        response <- runExceptT $ Client.getSwaggerJson client
        response `shouldSatisfy` isRight
spec client = do
    it "Fetches the documentation from the API" $ do
        response <- runExceptT $ Client.getSwaggerJson client
        response `shouldSatisfy` isRight