cerchez07/elm-0.19-workshop
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Update advanced/part5

Browse Source
This commit is contained in:
Richard Feldman
2018-08-14 03:11:00 -04:00
parent 48e2838bd4
commit 6cb0a2093a
2 changed files with 1 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
advanced/part5/src/Article/Feed.elm
View File

@@ -7,7 +7,6 @@ module Article.Feed
, init , init
, update , update
, viewArticles , viewArticles
, viewPagination
, viewTabs , viewTabs
) )
@@ -195,11 +194,6 @@ viewTab attrs ( name, msg ) =
] ]
viewPagination : (Int -> msg) -> Model -> Html msg
viewPagination toMsg (Model feed) =
PaginatedList.view toMsg feed.articles
viewTag : String -> Html msg viewTag : String -> Html msg
viewTag tagName = viewTag tagName =
li [ class "tag-default tag-pill tag-outline" ] [ text tagName ] li [ class "tag-default tag-pill tag-outline" ] [ text tagName ]

2
advanced/part5/src/Page/Profile.elm
View File

@@ -218,7 +218,7 @@ view model =
[ [ viewTabs model.feedTab ] [ [ viewTabs model.feedTab ]
, Feed.viewArticles model.timeZone feed , Feed.viewArticles model.timeZone feed
|> List.map (Html.map GotFeedMsg) |> List.map (Html.map GotFeedMsg)
, [ Feed.viewPagination ClickedFeedPage feed ] , [ viewPagination (Feed.articles feed) ]
] ]
] ]
] ]