From 58194312b6052a502c2b7009445643e5b7e5c8d6 Mon Sep 17 00:00:00 2001 From: Richard Feldman Date: Tue, 14 Aug 2018 03:18:04 -0400 Subject: [PATCH] Update advanced/part6 --- advanced/part6/README.md | 2 +- advanced/part6/src/Page/Home.elm | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/advanced/part6/README.md b/advanced/part6/README.md index dadb900..b5287ca 100644 --- a/advanced/part6/README.md +++ b/advanced/part6/README.md @@ -10,4 +10,4 @@ Then open [http://localhost:3000](http://localhost:3000) in your browser. ## Exercise -Open `src/Article.elm` in your editor and resolve the TODOs there. +Open `src/Page/Home.elm` in your editor and resolve the TODOs there. diff --git a/advanced/part6/src/Page/Home.elm b/advanced/part6/src/Page/Home.elm index a863e34..d51ea63 100644 --- a/advanced/part6/src/Page/Home.elm +++ b/advanced/part6/src/Page/Home.elm @@ -197,8 +197,8 @@ viewTabs isLoggedIn activeTab = [] -viewTab : Bool -> String -> msg -> Html msg -viewTab isActive tabName msg = +viewTab : Bool -> ( String, msg ) -> Html msg +viewTab isActive ( tabName, msg ) = li [ class "nav-item" ] [ a [ classList [ ( "nav-link", True ), ( "active", isActive ) ]