View.Display

The implementation was based on the .display block.

• View Options
• View Function
• Source Code

View Options

type alias ViewOptions =
    { line1 : String
    , line2 : String
    }

View Function

view : ViewOptions -> H.Html msg
view { line1, line2 } =
    H.div [ HA.class "display" ]
        [ H.div [ HA.class "display__line1" ] [ H.text line1 ]
        , H.div [ HA.class "display__line2" ] [ H.text line2 ]
        ]

Source Code

• src/View/Display.elm