{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MonoLocalBinds #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}
module Vikunja.API.Task where
import Vikunja.Core
import Vikunja.MimeTypes
import Vikunja.Model as M
import qualified Data.Aeson as A
import qualified Data.ByteString as B
import qualified Data.ByteString.Lazy as BL
import qualified Data.Data as P (Typeable, TypeRep, typeOf, typeRep)
import qualified Data.Foldable as P
import qualified Data.Map as Map
import qualified Data.Maybe as P
import qualified Data.Proxy as P (Proxy(..))
import qualified Data.Set as Set
import qualified Data.String as P
import qualified Data.Text as T
import qualified Data.Text.Encoding as T
import qualified Data.Text.Lazy as TL
import qualified Data.Text.Lazy.Encoding as TL
import qualified Data.Time as TI
import qualified Network.HTTP.Client.MultipartFormData as NH
import qualified Network.HTTP.Media as ME
import qualified Network.HTTP.Types as NH
import qualified Web.FormUrlEncoded as WH
import qualified Web.HttpApiData as WH
import Data.Text (Text)
import GHC.Base ((<|>))
import Prelude ((==),(/=),($), (.),(<$>),(<*>),(>>=),Maybe(..),Bool(..),Char,Double,FilePath,Float,Int,Integer,String,fmap,undefined,mempty,maybe,pure,Monad,Applicative,Functor)
import qualified Prelude as P
kindIdReactionsDeletePost
:: (Consumes KindIdReactionsDeletePost MimeJSON, MimeRender MimeJSON ModelsReaction)
=> ModelsReaction
-> Id
-> Kind
-> VikunjaRequest KindIdReactionsDeletePost MimeJSON ModelsMessage MimeJSON
kindIdReactionsDeletePost :: ModelsReaction
-> Id
-> Kind
-> VikunjaRequest
KindIdReactionsDeletePost MimeJSON ModelsMessage MimeJSON
kindIdReactionsDeletePost ModelsReaction
project (Id Int
id) (Kind Int
kind) =
Method
-> [ByteString]
-> VikunjaRequest
KindIdReactionsDeletePost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
kind,ByteString
"/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/reactions/delete"]
VikunjaRequest
KindIdReactionsDeletePost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
KindIdReactionsDeletePost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
KindIdReactionsDeletePost MimeJSON ModelsMessage MimeJSON
-> ModelsReaction
-> VikunjaRequest
KindIdReactionsDeletePost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsReaction
project
data KindIdReactionsDeletePost
instance HasBodyParam KindIdReactionsDeletePost ModelsReaction
instance Consumes KindIdReactionsDeletePost MimeJSON
instance Produces KindIdReactionsDeletePost MimeJSON
kindIdReactionsGet
:: Id
-> Kind
-> VikunjaRequest KindIdReactionsGet MimeNoContent [Map.Map String [UserUser]] MimeJSON
kindIdReactionsGet :: Id
-> Kind
-> VikunjaRequest
KindIdReactionsGet MimeNoContent [Map String [UserUser]] MimeJSON
kindIdReactionsGet (Id Int
id) (Kind Int
kind) =
Method
-> [ByteString]
-> VikunjaRequest
KindIdReactionsGet MimeNoContent [Map String [UserUser]] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
kind,ByteString
"/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/reactions"]
VikunjaRequest
KindIdReactionsGet MimeNoContent [Map String [UserUser]] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
KindIdReactionsGet MimeNoContent [Map String [UserUser]] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data KindIdReactionsGet
instance Produces KindIdReactionsGet MimeJSON
kindIdReactionsPut
:: (Consumes KindIdReactionsPut MimeJSON, MimeRender MimeJSON ModelsReaction)
=> ModelsReaction
-> Id
-> Kind
-> VikunjaRequest KindIdReactionsPut MimeJSON ModelsReaction MimeJSON
kindIdReactionsPut :: ModelsReaction
-> Id
-> Kind
-> VikunjaRequest
KindIdReactionsPut MimeJSON ModelsReaction MimeJSON
kindIdReactionsPut ModelsReaction
project (Id Int
id) (Kind Int
kind) =
Method
-> [ByteString]
-> VikunjaRequest
KindIdReactionsPut MimeJSON ModelsReaction MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"PUT" [ByteString
"/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
kind,ByteString
"/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/reactions"]
VikunjaRequest KindIdReactionsPut MimeJSON ModelsReaction MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
KindIdReactionsPut MimeJSON ModelsReaction MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest KindIdReactionsPut MimeJSON ModelsReaction MimeJSON
-> ModelsReaction
-> VikunjaRequest
KindIdReactionsPut MimeJSON ModelsReaction MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsReaction
project
data KindIdReactionsPut
instance HasBodyParam KindIdReactionsPut ModelsReaction
instance Consumes KindIdReactionsPut MimeJSON
instance Produces KindIdReactionsPut MimeJSON
projectsIdTasksPut
:: (Consumes ProjectsIdTasksPut MimeJSON, MimeRender MimeJSON ModelsTask)
=> ModelsTask
-> Id
-> VikunjaRequest ProjectsIdTasksPut MimeJSON ModelsTask MimeJSON
projectsIdTasksPut :: ModelsTask
-> Id
-> VikunjaRequest ProjectsIdTasksPut MimeJSON ModelsTask MimeJSON
projectsIdTasksPut ModelsTask
task (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest ProjectsIdTasksPut MimeJSON ModelsTask MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"PUT" [ByteString
"/projects/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/tasks"]
VikunjaRequest ProjectsIdTasksPut MimeJSON ModelsTask MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest ProjectsIdTasksPut MimeJSON ModelsTask MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest ProjectsIdTasksPut MimeJSON ModelsTask MimeJSON
-> ModelsTask
-> VikunjaRequest ProjectsIdTasksPut MimeJSON ModelsTask MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsTask
task
data ProjectsIdTasksPut
instance HasBodyParam ProjectsIdTasksPut ModelsTask
instance Consumes ProjectsIdTasksPut MimeJSON
instance Produces ProjectsIdTasksPut MimeJSON
projectsIdViewsViewTasksGet
:: Id
-> View
-> VikunjaRequest ProjectsIdViewsViewTasksGet MimeNoContent [ModelsTask] MimeJSON
projectsIdViewsViewTasksGet :: Id
-> View
-> VikunjaRequest
ProjectsIdViewsViewTasksGet MimeNoContent [ModelsTask] MimeJSON
projectsIdViewsViewTasksGet (Id Int
id) (View Int
view) =
Method
-> [ByteString]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet MimeNoContent [ModelsTask] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/projects/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/views/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
view,ByteString
"/tasks"]
VikunjaRequest
ProjectsIdViewsViewTasksGet MimeNoContent [ModelsTask] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
ProjectsIdViewsViewTasksGet MimeNoContent [ModelsTask] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data ProjectsIdViewsViewTasksGet
instance HasOptionalParam ProjectsIdViewsViewTasksGet Page where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> Page
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (Page Int
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Int) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"page", Int -> Maybe Int
forall a. a -> Maybe a
Just Int
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet PerPage where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> PerPage
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (PerPage Int
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Int) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"per_page", Int -> Maybe Int
forall a. a -> Maybe a
Just Int
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet S where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> S
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (S Text
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"s", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet SortBy where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> SortBy
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (SortBy Text
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"sort_by", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet OrderBy where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> OrderBy
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (OrderBy Text
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"order_by", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet Filter where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> Filter
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (Filter Text
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"filter", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet FilterTimezone where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> FilterTimezone
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (FilterTimezone Text
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"filter_timezone", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet FilterIncludeNulls where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> FilterIncludeNulls
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (FilterIncludeNulls Text
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"filter_include_nulls", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam ProjectsIdViewsViewTasksGet Expand where
applyOptionalParam :: VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> Expand
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
applyOptionalParam VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req (Expand Text
xs) =
VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
req VikunjaRequest ProjectsIdViewsViewTasksGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
ProjectsIdViewsViewTasksGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"expand", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance Produces ProjectsIdViewsViewTasksGet MimeJSON
projectsProjectViewsViewBucketsBucketTasksPost
:: (Consumes ProjectsProjectViewsViewBucketsBucketTasksPost MimeJSON, MimeRender MimeJSON ModelsTaskBucket)
=> ModelsTaskBucket
-> Project
-> View
-> Bucket
-> VikunjaRequest ProjectsProjectViewsViewBucketsBucketTasksPost MimeJSON ModelsTaskBucket MimeJSON
projectsProjectViewsViewBucketsBucketTasksPost :: ModelsTaskBucket
-> Project
-> View
-> Bucket
-> VikunjaRequest
ProjectsProjectViewsViewBucketsBucketTasksPost
MimeJSON
ModelsTaskBucket
MimeJSON
projectsProjectViewsViewBucketsBucketTasksPost ModelsTaskBucket
taskBucket (Project Int
project) (View Int
view) (Bucket Int
bucket) =
Method
-> [ByteString]
-> VikunjaRequest
ProjectsProjectViewsViewBucketsBucketTasksPost
MimeJSON
ModelsTaskBucket
MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/projects/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
project,ByteString
"/views/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
view,ByteString
"/buckets/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
bucket,ByteString
"/tasks"]
VikunjaRequest
ProjectsProjectViewsViewBucketsBucketTasksPost
MimeJSON
ModelsTaskBucket
MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
ProjectsProjectViewsViewBucketsBucketTasksPost
MimeJSON
ModelsTaskBucket
MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
ProjectsProjectViewsViewBucketsBucketTasksPost
MimeJSON
ModelsTaskBucket
MimeJSON
-> ModelsTaskBucket
-> VikunjaRequest
ProjectsProjectViewsViewBucketsBucketTasksPost
MimeJSON
ModelsTaskBucket
MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsTaskBucket
taskBucket
data ProjectsProjectViewsViewBucketsBucketTasksPost
instance HasBodyParam ProjectsProjectViewsViewBucketsBucketTasksPost ModelsTaskBucket
instance Consumes ProjectsProjectViewsViewBucketsBucketTasksPost MimeJSON
instance Produces ProjectsProjectViewsViewBucketsBucketTasksPost MimeJSON
tasksAllGet
:: VikunjaRequest TasksAllGet MimeNoContent [ModelsTask] MimeJSON
tasksAllGet :: VikunjaRequest TasksAllGet MimeNoContent [ModelsTask] MimeJSON
tasksAllGet =
Method
-> [ByteString]
-> VikunjaRequest TasksAllGet MimeNoContent [ModelsTask] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/tasks/all"]
VikunjaRequest TasksAllGet MimeNoContent [ModelsTask] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest TasksAllGet MimeNoContent [ModelsTask] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data TasksAllGet
instance HasOptionalParam TasksAllGet Page where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> Page -> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (Page Int
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Int) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"page", Int -> Maybe Int
forall a. a -> Maybe a
Just Int
xs)
instance HasOptionalParam TasksAllGet PerPage where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> PerPage -> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (PerPage Int
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Int) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"per_page", Int -> Maybe Int
forall a. a -> Maybe a
Just Int
xs)
instance HasOptionalParam TasksAllGet S where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> S -> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (S Text
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"s", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam TasksAllGet SortBy where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> SortBy -> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (SortBy Text
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"sort_by", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam TasksAllGet OrderBy where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> OrderBy -> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (OrderBy Text
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"order_by", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam TasksAllGet Filter where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> Filter -> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (Filter Text
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"filter", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam TasksAllGet FilterTimezone where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> FilterTimezone
-> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (FilterTimezone Text
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"filter_timezone", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam TasksAllGet FilterIncludeNulls where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> FilterIncludeNulls
-> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (FilterIncludeNulls Text
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"filter_include_nulls", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance HasOptionalParam TasksAllGet Expand where
applyOptionalParam :: VikunjaRequest TasksAllGet contentType res accept
-> Expand -> VikunjaRequest TasksAllGet contentType res accept
applyOptionalParam VikunjaRequest TasksAllGet contentType res accept
req (Expand Text
xs) =
VikunjaRequest TasksAllGet contentType res accept
req VikunjaRequest TasksAllGet contentType res accept
-> [QueryItem] -> VikunjaRequest TasksAllGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"expand", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance Produces TasksAllGet MimeJSON
tasksBulkPost
:: (Consumes TasksBulkPost MimeJSON, MimeRender MimeJSON ModelsBulkTask)
=> ModelsBulkTask
-> VikunjaRequest TasksBulkPost MimeJSON ModelsTask MimeJSON
tasksBulkPost :: ModelsBulkTask
-> VikunjaRequest TasksBulkPost MimeJSON ModelsTask MimeJSON
tasksBulkPost ModelsBulkTask
task =
Method
-> [ByteString]
-> VikunjaRequest TasksBulkPost MimeJSON ModelsTask MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/tasks/bulk"]
VikunjaRequest TasksBulkPost MimeJSON ModelsTask MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest TasksBulkPost MimeJSON ModelsTask MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest TasksBulkPost MimeJSON ModelsTask MimeJSON
-> ModelsBulkTask
-> VikunjaRequest TasksBulkPost MimeJSON ModelsTask MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsBulkTask
task
data TasksBulkPost
instance HasBodyParam TasksBulkPost ModelsBulkTask
instance Consumes TasksBulkPost MimeJSON
instance Produces TasksBulkPost MimeJSON
tasksIdAttachmentsAttachmentIDDelete
:: Id
-> AttachmentId
-> VikunjaRequest TasksIdAttachmentsAttachmentIDDelete MimeNoContent ModelsMessage MimeJSON
tasksIdAttachmentsAttachmentIDDelete :: Id
-> AttachmentId
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDDelete
MimeNoContent
ModelsMessage
MimeJSON
tasksIdAttachmentsAttachmentIDDelete (Id Int
id) (AttachmentId Int
attachmentId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDDelete
MimeNoContent
ModelsMessage
MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"DELETE" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/attachments/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
attachmentId]
VikunjaRequest
TasksIdAttachmentsAttachmentIDDelete
MimeNoContent
ModelsMessage
MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDDelete
MimeNoContent
ModelsMessage
MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data TasksIdAttachmentsAttachmentIDDelete
instance Produces TasksIdAttachmentsAttachmentIDDelete MimeJSON
tasksIdAttachmentsAttachmentIDGet
:: Id
-> AttachmentId
-> VikunjaRequest TasksIdAttachmentsAttachmentIDGet MimeNoContent FilePath MimeOctetStream
tasksIdAttachmentsAttachmentIDGet :: Id
-> AttachmentId
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDGet
MimeNoContent
String
MimeOctetStream
tasksIdAttachmentsAttachmentIDGet (Id Int
id) (AttachmentId Int
attachmentId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDGet
MimeNoContent
String
MimeOctetStream
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/attachments/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
attachmentId]
VikunjaRequest
TasksIdAttachmentsAttachmentIDGet
MimeNoContent
String
MimeOctetStream
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDGet
MimeNoContent
String
MimeOctetStream
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data TasksIdAttachmentsAttachmentIDGet
instance HasOptionalParam TasksIdAttachmentsAttachmentIDGet PreviewSize where
applyOptionalParam :: VikunjaRequest
TasksIdAttachmentsAttachmentIDGet contentType res accept
-> PreviewSize
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDGet contentType res accept
applyOptionalParam VikunjaRequest
TasksIdAttachmentsAttachmentIDGet contentType res accept
req (PreviewSize Text
xs) =
VikunjaRequest
TasksIdAttachmentsAttachmentIDGet contentType res accept
req VikunjaRequest
TasksIdAttachmentsAttachmentIDGet contentType res accept
-> [QueryItem]
-> VikunjaRequest
TasksIdAttachmentsAttachmentIDGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"preview_size", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance Produces TasksIdAttachmentsAttachmentIDGet MimeOctetStream
tasksIdAttachmentsGet
:: Id
-> VikunjaRequest TasksIdAttachmentsGet MimeNoContent [ModelsTaskAttachment] MimeJSON
tasksIdAttachmentsGet :: Id
-> VikunjaRequest
TasksIdAttachmentsGet MimeNoContent [ModelsTaskAttachment] MimeJSON
tasksIdAttachmentsGet (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest
TasksIdAttachmentsGet MimeNoContent [ModelsTaskAttachment] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/attachments"]
VikunjaRequest
TasksIdAttachmentsGet MimeNoContent [ModelsTaskAttachment] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksIdAttachmentsGet MimeNoContent [ModelsTaskAttachment] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data TasksIdAttachmentsGet
instance HasOptionalParam TasksIdAttachmentsGet Page where
applyOptionalParam :: VikunjaRequest TasksIdAttachmentsGet contentType res accept
-> Page
-> VikunjaRequest TasksIdAttachmentsGet contentType res accept
applyOptionalParam VikunjaRequest TasksIdAttachmentsGet contentType res accept
req (Page Int
xs) =
VikunjaRequest TasksIdAttachmentsGet contentType res accept
req VikunjaRequest TasksIdAttachmentsGet contentType res accept
-> [QueryItem]
-> VikunjaRequest TasksIdAttachmentsGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Int) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"page", Int -> Maybe Int
forall a. a -> Maybe a
Just Int
xs)
instance HasOptionalParam TasksIdAttachmentsGet PerPage where
applyOptionalParam :: VikunjaRequest TasksIdAttachmentsGet contentType res accept
-> PerPage
-> VikunjaRequest TasksIdAttachmentsGet contentType res accept
applyOptionalParam VikunjaRequest TasksIdAttachmentsGet contentType res accept
req (PerPage Int
xs) =
VikunjaRequest TasksIdAttachmentsGet contentType res accept
req VikunjaRequest TasksIdAttachmentsGet contentType res accept
-> [QueryItem]
-> VikunjaRequest TasksIdAttachmentsGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Int) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"per_page", Int -> Maybe Int
forall a. a -> Maybe a
Just Int
xs)
instance Produces TasksIdAttachmentsGet MimeJSON
tasksIdAttachmentsPut
:: (Consumes TasksIdAttachmentsPut MimeMultipartFormData)
=> Files
-> Id
-> VikunjaRequest TasksIdAttachmentsPut MimeMultipartFormData ModelsMessage MimeJSON
tasksIdAttachmentsPut :: Files
-> Id
-> VikunjaRequest
TasksIdAttachmentsPut MimeMultipartFormData ModelsMessage MimeJSON
tasksIdAttachmentsPut (Files Text
files) (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest
TasksIdAttachmentsPut MimeMultipartFormData ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"PUT" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/attachments"]
VikunjaRequest
TasksIdAttachmentsPut MimeMultipartFormData ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksIdAttachmentsPut MimeMultipartFormData ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
TasksIdAttachmentsPut MimeMultipartFormData ModelsMessage MimeJSON
-> Part
-> VikunjaRequest
TasksIdAttachmentsPut MimeMultipartFormData ModelsMessage MimeJSON
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> Part -> VikunjaRequest req contentType res accept
`_addMultiFormPart` Text -> ByteString -> Part
forall (m :: * -> *).
Applicative m =>
Text -> ByteString -> PartM m
NH.partLBS Text
"files" (MimeMultipartFormData -> Text -> ByteString
forall mtype x. MimeRender mtype x => mtype -> x -> ByteString
mimeRender' MimeMultipartFormData
MimeMultipartFormData Text
files)
data TasksIdAttachmentsPut
instance Consumes TasksIdAttachmentsPut MimeMultipartFormData
instance Produces TasksIdAttachmentsPut MimeJSON
tasksIdDelete
:: Id
-> VikunjaRequest TasksIdDelete MimeNoContent ModelsMessage MimeJSON
tasksIdDelete :: Id
-> VikunjaRequest
TasksIdDelete MimeNoContent ModelsMessage MimeJSON
tasksIdDelete (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest
TasksIdDelete MimeNoContent ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"DELETE" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id]
VikunjaRequest TasksIdDelete MimeNoContent ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksIdDelete MimeNoContent ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data TasksIdDelete
instance Produces TasksIdDelete MimeJSON
tasksIdGet
:: Id
-> VikunjaRequest TasksIdGet MimeNoContent ModelsTask MimeJSON
tasksIdGet :: Id -> VikunjaRequest TasksIdGet MimeNoContent ModelsTask MimeJSON
tasksIdGet (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest TasksIdGet MimeNoContent ModelsTask MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id]
VikunjaRequest TasksIdGet MimeNoContent ModelsTask MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest TasksIdGet MimeNoContent ModelsTask MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data TasksIdGet
instance Produces TasksIdGet MimeJSON
tasksIdPositionPost
:: (Consumes TasksIdPositionPost MimeJSON, MimeRender MimeJSON ModelsTaskPosition)
=> ModelsTaskPosition
-> Id
-> VikunjaRequest TasksIdPositionPost MimeJSON ModelsTaskPosition MimeJSON
tasksIdPositionPost :: ModelsTaskPosition
-> Id
-> VikunjaRequest
TasksIdPositionPost MimeJSON ModelsTaskPosition MimeJSON
tasksIdPositionPost ModelsTaskPosition
view (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest
TasksIdPositionPost MimeJSON ModelsTaskPosition MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id,ByteString
"/position"]
VikunjaRequest
TasksIdPositionPost MimeJSON ModelsTaskPosition MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksIdPositionPost MimeJSON ModelsTaskPosition MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
TasksIdPositionPost MimeJSON ModelsTaskPosition MimeJSON
-> ModelsTaskPosition
-> VikunjaRequest
TasksIdPositionPost MimeJSON ModelsTaskPosition MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsTaskPosition
view
data TasksIdPositionPost
instance HasBodyParam TasksIdPositionPost ModelsTaskPosition
instance Consumes TasksIdPositionPost MimeJSON
instance Produces TasksIdPositionPost MimeJSON
tasksIdPost
:: (Consumes TasksIdPost MimeJSON, MimeRender MimeJSON ModelsTask)
=> ModelsTask
-> Id
-> VikunjaRequest TasksIdPost MimeJSON ModelsTask MimeJSON
tasksIdPost :: ModelsTask
-> Id -> VikunjaRequest TasksIdPost MimeJSON ModelsTask MimeJSON
tasksIdPost ModelsTask
task (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest TasksIdPost MimeJSON ModelsTask MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id]
VikunjaRequest TasksIdPost MimeJSON ModelsTask MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest TasksIdPost MimeJSON ModelsTask MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest TasksIdPost MimeJSON ModelsTask MimeJSON
-> ModelsTask
-> VikunjaRequest TasksIdPost MimeJSON ModelsTask MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsTask
task
data TasksIdPost
instance HasBodyParam TasksIdPost ModelsTask
instance Consumes TasksIdPost MimeJSON
instance Produces TasksIdPost MimeJSON
tasksTaskIDCommentsCommentIDDelete
:: TaskId
-> CommentId
-> VikunjaRequest TasksTaskIDCommentsCommentIDDelete MimeNoContent ModelsMessage MimeJSON
(TaskId Int
taskId) (CommentId Int
commentId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksTaskIDCommentsCommentIDDelete
MimeNoContent
ModelsMessage
MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"DELETE" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
taskId,ByteString
"/comments/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
commentId]
VikunjaRequest
TasksTaskIDCommentsCommentIDDelete
MimeNoContent
ModelsMessage
MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksTaskIDCommentsCommentIDDelete
MimeNoContent
ModelsMessage
MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data
instance Produces TasksTaskIDCommentsCommentIDDelete MimeJSON
tasksTaskIDCommentsCommentIDGet
:: TaskId
-> CommentId
-> VikunjaRequest TasksTaskIDCommentsCommentIDGet MimeNoContent ModelsTaskComment MimeJSON
(TaskId Int
taskId) (CommentId Int
commentId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksTaskIDCommentsCommentIDGet
MimeNoContent
ModelsTaskComment
MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
taskId,ByteString
"/comments/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
commentId]
VikunjaRequest
TasksTaskIDCommentsCommentIDGet
MimeNoContent
ModelsTaskComment
MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksTaskIDCommentsCommentIDGet
MimeNoContent
ModelsTaskComment
MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data
instance Produces TasksTaskIDCommentsCommentIDGet MimeJSON
tasksTaskIDCommentsCommentIDPost
:: TaskId
-> CommentId
-> VikunjaRequest TasksTaskIDCommentsCommentIDPost MimeNoContent ModelsTaskComment MimeJSON
(TaskId Int
taskId) (CommentId Int
commentId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksTaskIDCommentsCommentIDPost
MimeNoContent
ModelsTaskComment
MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
taskId,ByteString
"/comments/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
commentId]
VikunjaRequest
TasksTaskIDCommentsCommentIDPost
MimeNoContent
ModelsTaskComment
MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksTaskIDCommentsCommentIDPost
MimeNoContent
ModelsTaskComment
MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data
instance Produces TasksTaskIDCommentsCommentIDPost MimeJSON
tasksTaskIDCommentsGet
:: TaskId
-> VikunjaRequest TasksTaskIDCommentsGet MimeNoContent [ModelsTaskComment] MimeJSON
(TaskId Int
taskId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksTaskIDCommentsGet MimeNoContent [ModelsTaskComment] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
taskId,ByteString
"/comments"]
VikunjaRequest
TasksTaskIDCommentsGet MimeNoContent [ModelsTaskComment] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksTaskIDCommentsGet MimeNoContent [ModelsTaskComment] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data
instance Produces TasksTaskIDCommentsGet MimeJSON
tasksTaskIDCommentsPut
:: (Consumes TasksTaskIDCommentsPut MimeJSON, MimeRender MimeJSON ModelsTaskComment)
=> ModelsTaskComment
-> TaskId
-> VikunjaRequest TasksTaskIDCommentsPut MimeJSON ModelsTaskComment MimeJSON
ModelsTaskComment
relation (TaskId Int
taskId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksTaskIDCommentsPut MimeJSON ModelsTaskComment MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"PUT" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
taskId,ByteString
"/comments"]
VikunjaRequest
TasksTaskIDCommentsPut MimeJSON ModelsTaskComment MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksTaskIDCommentsPut MimeJSON ModelsTaskComment MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
TasksTaskIDCommentsPut MimeJSON ModelsTaskComment MimeJSON
-> ModelsTaskComment
-> VikunjaRequest
TasksTaskIDCommentsPut MimeJSON ModelsTaskComment MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsTaskComment
relation
data
instance HasBodyParam TasksTaskIDCommentsPut ModelsTaskComment
instance Consumes TasksTaskIDCommentsPut MimeJSON
instance Produces TasksTaskIDCommentsPut MimeJSON
tasksTaskIDRelationsPut
:: (Consumes TasksTaskIDRelationsPut MimeJSON, MimeRender MimeJSON ModelsTaskRelation)
=> ModelsTaskRelation
-> TaskId
-> VikunjaRequest TasksTaskIDRelationsPut MimeJSON ModelsTaskRelation MimeJSON
tasksTaskIDRelationsPut :: ModelsTaskRelation
-> TaskId
-> VikunjaRequest
TasksTaskIDRelationsPut MimeJSON ModelsTaskRelation MimeJSON
tasksTaskIDRelationsPut ModelsTaskRelation
relation (TaskId Int
taskId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksTaskIDRelationsPut MimeJSON ModelsTaskRelation MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"PUT" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
taskId,ByteString
"/relations"]
VikunjaRequest
TasksTaskIDRelationsPut MimeJSON ModelsTaskRelation MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksTaskIDRelationsPut MimeJSON ModelsTaskRelation MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
TasksTaskIDRelationsPut MimeJSON ModelsTaskRelation MimeJSON
-> ModelsTaskRelation
-> VikunjaRequest
TasksTaskIDRelationsPut MimeJSON ModelsTaskRelation MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsTaskRelation
relation
data TasksTaskIDRelationsPut
instance HasBodyParam TasksTaskIDRelationsPut ModelsTaskRelation
instance Consumes TasksTaskIDRelationsPut MimeJSON
instance Produces TasksTaskIDRelationsPut MimeJSON
tasksTaskIDRelationsRelationKindOtherTaskIDDelete
:: (Consumes TasksTaskIDRelationsRelationKindOtherTaskIDDelete MimeJSON, MimeRender MimeJSON ModelsTaskRelation)
=> ModelsTaskRelation
-> TaskId
-> RelationKind
-> OtherTaskId
-> VikunjaRequest TasksTaskIDRelationsRelationKindOtherTaskIDDelete MimeJSON ModelsMessage MimeJSON
tasksTaskIDRelationsRelationKindOtherTaskIDDelete :: ModelsTaskRelation
-> TaskId
-> RelationKind
-> OtherTaskId
-> VikunjaRequest
TasksTaskIDRelationsRelationKindOtherTaskIDDelete
MimeJSON
ModelsMessage
MimeJSON
tasksTaskIDRelationsRelationKindOtherTaskIDDelete ModelsTaskRelation
relation (TaskId Int
taskId) (RelationKind Text
relationKind) (OtherTaskId Int
otherTaskId) =
Method
-> [ByteString]
-> VikunjaRequest
TasksTaskIDRelationsRelationKindOtherTaskIDDelete
MimeJSON
ModelsMessage
MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"DELETE" [ByteString
"/tasks/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
taskId,ByteString
"/relations/",Text -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Text
relationKind,ByteString
"/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
otherTaskId]
VikunjaRequest
TasksTaskIDRelationsRelationKindOtherTaskIDDelete
MimeJSON
ModelsMessage
MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
TasksTaskIDRelationsRelationKindOtherTaskIDDelete
MimeJSON
ModelsMessage
MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
TasksTaskIDRelationsRelationKindOtherTaskIDDelete
MimeJSON
ModelsMessage
MimeJSON
-> ModelsTaskRelation
-> VikunjaRequest
TasksTaskIDRelationsRelationKindOtherTaskIDDelete
MimeJSON
ModelsMessage
MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` ModelsTaskRelation
relation
data TasksTaskIDRelationsRelationKindOtherTaskIDDelete
instance HasBodyParam TasksTaskIDRelationsRelationKindOtherTaskIDDelete ModelsTaskRelation
instance Consumes TasksTaskIDRelationsRelationKindOtherTaskIDDelete MimeJSON
instance Produces TasksTaskIDRelationsRelationKindOtherTaskIDDelete MimeJSON