Skip to content

Instantly share code, notes, and snippets.

@AdrianRibao

AdrianRibao/final_view_function.elm

Created June 8, 2018 10:59
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save AdrianRibao/7b71b0efeb4adf5e4029d8d15e3efe54 to your computer and use it in GitHub Desktop.
Save AdrianRibao/7b71b0efeb4adf5e4029d8d15e3efe54 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
final_view_function.elm
renderHeaders : Tabs -> Html Msg
renderHeaders currentTab =
ul [ class "nav nav-tabs" ]
[ li [ class "nav-item" ]
[ a
[ class "nav-link"
, onClick (ChangeTab Step1)
, classList [ ( "active", currentTab == Step1 ) ]
]
[ text "Step 1" ]
]
, li [ class "nav-item" ]
[ a
[ class "nav-link"
, onClick (ChangeTab Step2)
, classList [ ( "active", currentTab == Step2 ) ]
]
[ text "Step 2" ]
]
, li [ class "nav-item" ]
[ a
[ class "nav-link"
, onClick (ChangeTab Step3)
, classList [ ( "active", currentTab == Step3 ) ]
]
[ text "Step 3" ]
]
]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment