dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-12-26 13:21:42 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fix tests.

Browse Source
This commit is contained in:
Dillon Kearns 2022-01-23 19:30:48 -08:00
parent b0cab3cc7d
commit 78cc936272
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/ServerRequestTest.elm
View File

@ -17,6 +17,7 @@ all =
|> expectMatch
{ method = Request.Get
, headers = []
, body = Nothing
}
, test "accept GET" <|
\() ->
@ -25,6 +26,7 @@ all =
|> expectMatch
{ method = Request.Get
, headers = []
, body = Nothing
}
, test "accept GET doesn't match POST" <|
\() ->
@ -33,6 +35,7 @@ all =
|> expectNoMatch
{ method = Request.Get
, headers = []
, body = Nothing
}
"Expected HTTP method POST but was GET"
, test "unexpected method for form POST" <|
@ -46,6 +49,7 @@ all =
, headers =
[ ( "content-type", "application/x-www-form-urlencoded" )
]
, body = Nothing
}
"""Did not match formPost because
- Form post must have method POST, but the method was GET
@ -69,6 +73,7 @@ all =
, headers =
[ ( "content-type", "application/x-www-form-urlencoded" )
]
, body = Nothing
}
"""Server.Request.oneOf failed in the following 4 ways:
@ -94,6 +99,7 @@ Expected HTTP method POST but was GET"""
type alias Request =
{ method : Request.Method
, headers : List ( String, String )
, body : Maybe String
}