Skip to content

Commit 373ce05

Browse files
committed
Add Trustmark to compiled code in example
1 parent 86eea70 commit 373ce05

1 file changed

Lines changed: 13 additions & 1 deletion

File tree

cli/example/src/Example.elm

Lines changed: 13 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -19,6 +19,7 @@ import RealworldConduitApi.Api
1919
import RealworldConduitApi.Types
2020
import RecursiveAllofRefs.Types
2121
import SingleEnum.Types
22+
import Trustmark.Api
2223
import Trustmark.TradeCheck.Api
2324
import Trustmark.TradeCheck.Servers
2425
import Trustmark.TradeCheck.Types
@@ -85,6 +86,13 @@ init () =
8586
{ server = Trustmark.TradeCheck.Servers.sandbox
8687
, authorization = { x_api_key = "?" }
8788
, body = { publicId = 0, schemeId = Nothing }
89+
, toMsg = TrustmarkTradeCheckResponse
90+
}
91+
, Trustmark.Api.taxonomiesDocumentTypes
92+
{ authorization =
93+
{ tm_api_key = "?"
94+
, x_api_key = "?"
95+
}
8896
, toMsg = TrustmarkResponse
8997
}
9098
, PatreonApi.Api.getCampaign
@@ -115,8 +123,9 @@ type Msg
115123
| GithubResponse (Result (OpenApi.Common.Error () String) GithubV3RestApi.Types.Root)
116124
| DbFahrplanResponse (Result (OpenApi.Common.Error Never String) DbFahrplanApi.Types.LocationResponse)
117125
| MarioPartyStatsResponse (Result (OpenApi.Common.Error Never String) (List MarioPartyStats.Types.Boards))
118-
| TrustmarkResponse (Result (OpenApi.Common.Error Never String) Trustmark.TradeCheck.Types.TradeCheckResponse)
126+
| TrustmarkTradeCheckResponse (Result (OpenApi.Common.Error Never String) Trustmark.TradeCheck.Types.TradeCheckResponse)
119127
| PatreonResponse (Result (OpenApi.Common.Error PatreonApi.Types.GetCampaign_Error String) PatreonApi.Types.CampaignResponse)
128+
| TrustmarkResponse (Result (OpenApi.Common.Error Never String) (List String))
120129

121130

122131
update : Msg -> Model -> ( Model, Cmd Msg )
@@ -143,6 +152,9 @@ update msg model =
143152
PatreonResponse _ ->
144153
( model, Cmd.none )
145154

155+
TrustmarkTradeCheckResponse _ ->
156+
( model, Cmd.none )
157+
146158

147159
view : Model -> Browser.Document Msg
148160
view _ =

0 commit comments

Comments
 (0)