tonatona-google-server-api 0.1.2.0 → 0.1.3.0

raw patch · 3 files changed

+44/−4 lines, 3 files

Files

• src/Tonatona/Google/Client.hs +33/−0
• src/Tonatona/Google/Type.hs +5/−0
• tonatona-google-server-api.cabal +6/−4

@@ -7,6 +7,9 @@   ( getCalendarEventList   , postCalendarEvent   , postGmailSend+  , getDriveFileList+  , createDriveFileMultipart+  , downloadDriveFile   ) where  import Tonalude@@ -41,6 +44,36 @@ postGmailSend email = do   t <- asks token   res <- liftIO $ Client.postGmailSend t email+  case res of+    Left err -> throwM err+    Right resp -> pure resp++getDriveFileList ::+     Form.GetFileParams+  -> Dsl env Response.FileList+getDriveFileList params = do+  t <- asks token+  res <- liftIO $ Client.getDriveFileList t params+  case res of+    Left err -> throwM err+    Right resp -> pure resp++createDriveFileMultipart ::+     Form.MultipartBody+  -> Dsl env Response.FileResource+createDriveFileMultipart body = do+  t <- asks token+  res <- liftIO $ Client.createDriveFileMultipart t body+  case res of+    Left err -> throwM err+    Right resp -> pure resp++downloadDriveFile ::+     Form.DownloadFileParams+  -> Dsl env Response.MediaContent+downloadDriveFile params = do+  t <- asks token+  res <- liftIO $ Client.downloadDriveFile t params   case res of     Left err -> throwM err     Right resp -> pure resp

@@ -0,0 +1,5 @@+module Tonatona.Google.Type+  ( module Google.Type+  ) where++import Google.Type

@@ -1,11 +1,13 @@--- This file has been generated from package.yaml by hpack version 0.28.2.+cabal-version: 1.12++-- This file has been generated from package.yaml by hpack version 0.31.2. -- -- see: https://github.com/sol/hpack ----- hash: 89da5c1a2cd48026794663fbbb2481a140325dfeb0d5efec8c8653372b7d0dc5+-- hash: bb99cae39524722e785fefb1890072456530a9637a153137d1eb58375612cbd6  name:           tonatona-google-server-api-version:        0.1.2.0+version:        0.1.3.0 synopsis:       tonatona plugin for google-server-api description:    Tonatona plugin for [google-server-api](https://hackage.haskell.org/package/google-server-api). This package provides a tonatona plugin to use Google API for server to server applications. category:       Database, Library, Tonatona, Web@@ -17,7 +19,6 @@ license:        MIT license-file:   LICENSE build-type:     Simple-cabal-version:  >= 1.10 extra-source-files:     README.md @@ -31,6 +32,7 @@       Tonatona.Google.Client       Tonatona.Google.Form       Tonatona.Google.Response+      Tonatona.Google.Type   other-modules:       Tonatona.Google.Internal       Paths_tonatona_google_server_api