11module Gen.BackendTask.Http exposing
22 ( expectString, expectJson
33 , expectBytes, emptyBody, jsonBody
4- , annotation_
5- , call_
4+ , annotation_, call_
65 , bytesBody
76 )
87
@@ -13,8 +12,8 @@ module Gen.BackendTask.Http exposing
1312
1413@docs get, expectString, expectJson
1514@docs expectBytes, emptyBody, jsonBody
16- @docs bytesBodyWithOptions, annotation_
17- @docs call_
15+ @docs bytesBodyWithOptions
16+ @docs annotation_, call_
1817
1918-}
2019
@@ -187,6 +186,7 @@ annotation_ :
187186 { expect : Type . Annotation -> Type . Annotation
188187 , error : Type . Annotation
189188 , body : Type . Annotation
189+ , part : Type . Annotation
190190 , cacheStrategy : Type . Annotation
191191 , metadata : Type . Annotation
192192 }
@@ -201,6 +201,7 @@ annotation_ =
201201 " Body"
202202 []
203203 ( Type . namedWith [ " Pages" , " Internal" , " StaticHttpBody" ] " Body" [] )
204+ , part = Type . namedWith [ " BackendTask" , " Http" ] " Part" []
204205 , cacheStrategy =
205206 Type . namedWith [ " BackendTask" , " Http" ] " CacheStrategy" []
206207 , metadata =
@@ -235,6 +236,16 @@ call_ :
235236 , stringBody : Elm . Expression -> Elm . Expression -> Elm . Expression
236237 , jsonBody : Elm . Expression -> Elm . Expression
237238 , bytesBody : Elm . Expression -> Elm . Expression -> Elm . Expression
239+ , multipartBody : Elm . Expression -> Elm . Expression
240+ , stringPart : Elm . Expression -> Elm . Expression -> Elm . Expression
241+ , bytesPart :
242+ Elm . Expression -> Elm . Expression -> Elm . Expression -> Elm . Expression
243+ , bytesPartWithFilename :
244+ Elm . Expression
245+ -> Elm . Expression
246+ -> Elm . Expression
247+ -> Elm . Expression
248+ -> Elm . Expression
238249 , getWithOptions : Elm . Expression -> Elm . Expression
239250 , withMetadata : Elm . Expression -> Elm . Expression -> Elm . Expression
240251 }
@@ -542,6 +553,99 @@ call_ =
542553 }
543554 )
544555 [ bytesBodyArg_, bytesBodyArg_0 ]
556+ , multipartBody =
557+ \ multipartBodyArg_ ->
558+ Elm . apply
559+ ( Elm . value
560+ { importFrom = [ " BackendTask" , " Http" ]
561+ , name = " multipartBody"
562+ , annotation =
563+ Just
564+ ( Type . function
565+ [ Type . list
566+ ( Type . namedWith
567+ [ " BackendTask" , " Http" ]
568+ " Part"
569+ []
570+ )
571+ ]
572+ ( Type . namedWith
573+ [ " BackendTask" , " Http" ]
574+ " Body"
575+ []
576+ )
577+ )
578+ }
579+ )
580+ [ multipartBodyArg_ ]
581+ , stringPart =
582+ \ stringPartArg_ stringPartArg_0 ->
583+ Elm . apply
584+ ( Elm . value
585+ { importFrom = [ " BackendTask" , " Http" ]
586+ , name = " stringPart"
587+ , annotation =
588+ Just
589+ ( Type . function
590+ [ Type . string, Type . string ]
591+ ( Type . namedWith
592+ [ " BackendTask" , " Http" ]
593+ " Part"
594+ []
595+ )
596+ )
597+ }
598+ )
599+ [ stringPartArg_, stringPartArg_0 ]
600+ , bytesPart =
601+ \ bytesPartArg_ bytesPartArg_0 bytesPartArg_1 ->
602+ Elm . apply
603+ ( Elm . value
604+ { importFrom = [ " BackendTask" , " Http" ]
605+ , name = " bytesPart"
606+ , annotation =
607+ Just
608+ ( Type . function
609+ [ Type . string
610+ , Type . string
611+ , Type . namedWith [ " Bytes" ] " Bytes" []
612+ ]
613+ ( Type . namedWith
614+ [ " BackendTask" , " Http" ]
615+ " Part"
616+ []
617+ )
618+ )
619+ }
620+ )
621+ [ bytesPartArg_, bytesPartArg_0, bytesPartArg_1 ]
622+ , bytesPartWithFilename =
623+ \ bytesPartWithFilenameArg_ bytesPartWithFilenameArg_0 bytesPartWithFilenameArg_1 bytesPartWithFilenameArg_2 ->
624+ Elm . apply
625+ ( Elm . value
626+ { importFrom = [ " BackendTask" , " Http" ]
627+ , name = " bytesPartWithFilename"
628+ , annotation =
629+ Just
630+ ( Type . function
631+ [ Type . string
632+ , Type . string
633+ , Type . string
634+ , Type . namedWith [ " Bytes" ] " Bytes" []
635+ ]
636+ ( Type . namedWith
637+ [ " BackendTask" , " Http" ]
638+ " Part"
639+ []
640+ )
641+ )
642+ }
643+ )
644+ [ bytesPartWithFilenameArg_
645+ , bytesPartWithFilenameArg_0
646+ , bytesPartWithFilenameArg_1
647+ , bytesPartWithFilenameArg_2
648+ ]
545649 , getWithOptions =
546650 \ getWithOptionsArg_ ->
547651 Elm . apply
0 commit comments