@@ -17,30 +17,24 @@ import Data.Symbol (class IsSymbol)
1717import Effect (Effect)
1818import Effect.Uncurried (runEffectFn2)
1919import Fetch.Core.Duplex (Duplex)
20−import Fetch.Core.Duplex as CoreDuplex
21−import Fetch.Core.Duplex as Duplex
20+import Fetch.Core.Duplex as Core.Duplex
2221import Fetch.Core.Headers (Headers)
23−import Fetch.Core.Headers as CoreHeaders
22+import Fetch.Core.Headers as Core.Headers
2423import Fetch.Core.Integrity (Integrity(..))
25−import Fetch.Core.Integrity as CoreIntegrity
24+import Fetch.Core.Integrity as Core.Integrity
2625import Fetch.Core.Referrer (Referrer)
27−import Fetch.Core.Referrer as CoreReferrer
28−import Fetch.Core.Referrer as Referrer
26+import Fetch.Core.Referrer as Core.Referrer
2927import Fetch.Core.ReferrerPolicy (ReferrerPolicy)
30−import Fetch.Core.ReferrerPolicy as CoreReferrerPolicy
31−import Fetch.Core.ReferrerPolicy as ReferrerPolicy
28+import Fetch.Core.ReferrerPolicy as Core.ReferrerPolicy
3229import Fetch.Core.Request (_unsafeNew)
33−import Fetch.Core.Request as CoreRequest
30+import Fetch.Core.Request as Core.Request
3431import Fetch.Core.RequestBody (RequestBody)
3532import Fetch.Core.RequestCache (RequestCache)
36−import Fetch.Core.RequestCache as CoreRequestCache
37−import Fetch.Core.RequestCache as RequestCache
33+import Fetch.Core.RequestCache as Core.RequestCache
3834import Fetch.Core.RequestCredentials (RequestCredentials)
39−import Fetch.Core.RequestCredentials as CoreRequestCredentials
40−import Fetch.Core.RequestCredentials as RequestCredentials
35+import Fetch.Core.RequestCredentials as Core.RequestCredentials
4136import Fetch.Core.RequestMode (RequestMode)
42−import Fetch.Core.RequestMode as CoreRequestMode
43−import Fetch.Core.RequestMode as RequestMode
37+import Fetch.Core.RequestMode as Core.RequestMode
4438import Fetch.Internal.RequestBody (class ToRequestBody, toRequestBody)
4539import Prim.Row (class Lacks, class Union)
4640import Prim.Row as R
@@ -53,21 +47,21 @@ type HighlevelRequestOptions headers body =
5347 ( method :: Method
5448 , headers :: { | headers }
5549 , body :: body
56− , credentials :: CoreRequestCredentials.RequestCredentials
57− , cache :: CoreRequestCache.RequestCache
58− , mode :: CoreRequestMode.RequestMode
59− , referrer :: CoreReferrer.Referrer
60− , referrerPolicy :: CoreReferrerPolicy.ReferrerPolicy
61− , integrity :: CoreIntegrity.Integrity
62− , duplex :: CoreDuplex.Duplex
50+ , credentials :: Core.RequestCredentials.RequestCredentials
51+ , cache :: Core.RequestCache.RequestCache
52+ , mode :: Core.RequestMode.RequestMode
53+ , referrer :: Core.Referrer.Referrer
54+ , referrerPolicy :: Core.ReferrerPolicy.ReferrerPolicy
55+ , integrity :: Core.Integrity.Integrity
56+ , duplex :: Core.Duplex.Duplex
6357 )
6458
6559new
6660 :: forall input thru
67− . Union input thru CoreRequest.UnsafeRequestOptions
61+ . Union input thru Core.Request.UnsafeRequestOptions
6862 => String
6963 -> { | input }
70− -> Effect CoreRequest.Request
64+ -> Effect Core.Request.Request
7165new url options = runEffectFn2 _unsafeNew url options
7266
7367class ToCoreRequestOptions input output | input -> output where
@@ -109,28 +103,28 @@ instance ToCoreRequestOptionsConverter "method" Method String where
109103 convertImpl _ = show
110104
111105instance (Homogeneous r String) => ToCoreRequestOptionsConverter "headers" { | r } Headers where
112− convertImpl _ = CoreHeaders.fromRecord
106+ convertImpl _ = Core.Headers.fromRecord
113107
114108instance (ToRequestBody body) => ToCoreRequestOptionsConverter "body" body RequestBody where
115109 convertImpl _ = toRequestBody
116110
117111instance ToCoreRequestOptionsConverter "credentials" RequestCredentials String where
118− convertImpl _ = RequestCredentials.toString
112+ convertImpl _ = Core.RequestCredentials.toString
119113
120114instance ToCoreRequestOptionsConverter "cache" RequestCache String where
121− convertImpl _ = RequestCache.toString
115+ convertImpl _ = Core.RequestCache.toString
122116
123117instance ToCoreRequestOptionsConverter "mode" RequestMode String where
124− convertImpl _ = RequestMode.toString
118+ convertImpl _ = Core.RequestMode.toString
125119
126120instance ToCoreRequestOptionsConverter "referrer" Referrer String where
127− convertImpl _ = Referrer.toString
121+ convertImpl _ = Core.Referrer.toString
128122
129123instance ToCoreRequestOptionsConverter "referrerPolicy" ReferrerPolicy String where
130− convertImpl _ = ReferrerPolicy.toString
124+ convertImpl _ = Core.ReferrerPolicy.toString
131125
132126instance ToCoreRequestOptionsConverter "integrity" Integrity String where
133127 convertImpl _ = un Integrity
134128
135129instance ToCoreRequestOptionsConverter "duplex" Duplex String where
136− convertImpl _ = Duplex.toString
130+ convertImpl _ = Core.Duplex.toString