如何使用Elm保留错误颜色而不是全部红色

/* styles.css */
.error {
    color: red;
}
.warning {
    color: orange;
}
.info {
    color: blue;
}

module Main exposing (main)

import Html exposing (..)
import Html.Attributes exposing (class)

type Msg = NoOp

main : Program () Msg Model
main =
    Html.program
        { init = init
        , view = view
        , update = update
        , subscriptions = subscriptions
        }

-- MODEL

type alias Model = {}

init : (Model, Cmd Msg)
init =
    ( Model, Cmd.none )

-- UPDATE

update : Msg -> Model -> (Model, Cmd Msg)
update msg model =
    case msg of
        NoOp ->
            ( model, Cmd.none )

-- VIEW

view : Model -> Html Msg
view model =
    div []
        [ h1 [] [ text "Error Handling in Elm" ]
        , p [ class "error" ] [ text "This is an error message." ]
        , p [ class "warning" ] [ text "This is a warning message." ]
        , p [ class "info" ] [ text "This is an info message." ]
        ]