Push /login to spec versions 1.7 and 1.8

main
Bram van den Heuvel 2023-09-22 16:08:20 +02:00
parent 115381fd50
commit 349ee739e2
1 changed files with 2 additions and 0 deletions

View File

@ -64,6 +64,8 @@ loginWithUsernameAndPassword context input =
|> VC.sameForVersion "v1.4" |> VC.sameForVersion "v1.4"
|> VC.sameForVersion "v1.5" |> VC.sameForVersion "v1.5"
|> VC.sameForVersion "v1.6" |> VC.sameForVersion "v1.6"
|> VC.sameForVersion "v1.7"
|> VC.sameForVersion "v1.8"
|> 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