elm-format

pull/1/head
Bram van den Heuvel 2023-02-17 11:10:03 +01:00
parent eaa7bc3444
commit 045b67d77d
3 changed files with 30 additions and 26 deletions

View File

@ -1,4 +1,4 @@
module Internal.Api.SendMessageEvent.Api exposing (sendMessageEventV1, sendMessageEventV2, SendMessageEventOutputV1, SendMessageEventInputV1)
module Internal.Api.SendMessageEvent.Api exposing (SendMessageEventInputV1, SendMessageEventOutputV1, sendMessageEventV1, sendMessageEventV2)
import Internal.Api.Request as R
import Internal.Api.SendMessageEvent.V1.SpecObjects as SO1
@ -16,7 +16,9 @@ type alias SendMessageEventInputV1 =
, transactionId : String
}
type alias SendMessageEventOutputV1 = Task X.Error SO1.EventResponse
type alias SendMessageEventOutputV1 =
Task X.Error SO1.EventResponse
sendMessageEventV1 : SendMessageEventInputV1 -> SendMessageEventOutputV1

View File

@ -3,6 +3,7 @@ module Internal.Api.SendMessageEvent.Main exposing (..)
import Internal.Api.SendMessageEvent.Api as Api
import Internal.Tools.VersionControl as VC
sendMessageEvent : List String -> Maybe (SendMessageEventInput -> SendMessageEventOutput)
sendMessageEvent versions =
VC.withBottomLayer

View File

@ -154,6 +154,7 @@ mostRecentFromVersionList versionList ((VersionControl { order }) as vc) =
|> List.filterMap (\v -> fromVersion v vc)
|> List.head
{-| Sometimes, no changes are needed and a function works just the same as the one in the previous version.
In that case, you can amend with a `sameForVersion` function to indicate that the spec is
identical for this version.