module HomepageView exposing (..)

import Html exposing (..)
import Html.Attributes exposing (..)
import SharedStyles exposing (..)


{ id, class, classList } =
    homepageNamespace


main : Html msg
main =
    div []
        [ header []
            [ img [ id ReactiveLogo, src "assets/logo.png" ] []
            , nav []
                navElems
            , span [ id BuyTickets ]
                [ text "BUY TICKETS" ]
            ]
        , div []
            [ img [ src "assets/banner.png" ] [] ]
        ]


navElems : List (Html msg)
navElems =
    [ "SPEAKERS", "SCHEDULE", "WORKSHOPS", "VENUE", "BLOG", "CONTACT" ]
        |> List.map (\name -> span [ class [ NavLink ] ] [ text name ])