Upgrade to spec version v1.6

pull/1/head
Bram van den Heuvel 2023-03-16 10:32:03 +01:00
parent 0c535916eb
commit b09ef1c7e8
10 changed files with 10 additions and 0 deletions

View File

@ -20,6 +20,7 @@ getEvent context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -35,6 +35,7 @@ invite context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -31,6 +31,7 @@ joinRoomById context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -31,6 +31,7 @@ joinedMembers context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -34,6 +34,7 @@ leave context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -13,6 +13,7 @@ loginWithUsernameAndPassword context input =
{ current = Api.loginWithUsernameAndPasswordV1 { current = Api.loginWithUsernameAndPasswordV1
, version = "v1.5" , version = "v1.5"
} }
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -31,6 +31,7 @@ redact context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -31,6 +31,7 @@ sendMessageEvent context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -31,6 +31,7 @@ sendStateKey context input =
|> VC.sameForVersion "v1.3" |> VC.sameForVersion "v1.3"
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input

View File

@ -24,6 +24,7 @@ sync context input =
, version = "v1.4" , version = "v1.4"
} }
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6"
|> VC.mostRecentFromVersionList (Context.getVersions context) |> VC.mostRecentFromVersionList (Context.getVersions context)
|> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion) |> Maybe.withDefault (always <| always <| Task.fail X.UnsupportedSpecVersion)
|> (|>) input |> (|>) input