Fix test naming

This commit is contained in:
sigma-andex 2022-08-25 10:54:40 +01:00
parent 697a80e538
commit e4cc8662d0

View File

@ -167,7 +167,7 @@ sslSpec =
extensibleMiddlewareSpec :: Test extensibleMiddlewareSpec :: Test
extensibleMiddlewareSpec = extensibleMiddlewareSpec =
it "runs the middleware example" do it "runs the extensible middleware example" do
close <- liftEffect ExtensibleMiddleware.main close <- liftEffect ExtensibleMiddleware.main
let headers = Object.singleton "X-Token" "123" let headers = Object.singleton "X-Token" "123"
body <- get 8080 headers "/" body <- get 8080 headers "/"
@ -178,7 +178,7 @@ extensibleMiddlewareSpec =
nodeMiddlewareSpec :: Test nodeMiddlewareSpec :: Test
nodeMiddlewareSpec = nodeMiddlewareSpec =
it "runs the middleware example" do it "runs the node middleware example" do
close <- liftEffect NodeMiddleware.main close <- liftEffect NodeMiddleware.main
let headers = Object.singleton "X-Token" "123" let headers = Object.singleton "X-Token" "123"
body <- get 8080 headers "/" body <- get 8080 headers "/"