Add tests for pipes

This commit is contained in:
Jeroen Engels 2024-03-19 22:53:36 +01:00
parent fdc93a71df
commit 7dab184c00

View File

@ -47,4 +47,38 @@ view model =
"""
|> Review.Test.run (defaults |> withHardcodedKnownClasses [ "known" ] |> rule)
|> Review.Test.expectNoErrors
, test "should report an error when encountering an unknown CSS class through Html.Attributes.class in <| pipe" <|
\() ->
"""module A exposing (..)
import Html
import Html.Attributes as Attr
view model =
Html.span [ Attr.class <| "unknown" ] []
"""
|> Review.Test.run (rule defaults)
|> Review.Test.expectErrors
[ Review.Test.error
{ message = "Unknown CSS class \"unknown\""
, details = [ "I could not find this class in CSS files. Have you made a typo? Here are similarly-named classes: TODO" ]
, under = "unknown"
}
]
, test "should report an error when encountering an unknown CSS class through Html.Attributes.class in |> pipe" <|
\() ->
"""module A exposing (..)
import Html
import Html.Attributes as Attr
view model =
Html.span [ "unknown" |> Attr.class ] []
"""
|> Review.Test.run (rule defaults)
|> Review.Test.expectErrors
[ Review.Test.error
{ message = "Unknown CSS class \"unknown\""
, details = [ "I could not find this class in CSS files. Have you made a typo? Here are similarly-named classes: TODO" ]
, under = "unknown"
}
]
]