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

Revise part12 and part13

Browse Source
This commit is contained in:
Richard Feldman
2016-09-07 01:05:27 -05:00
parent b45519d0a0
commit 282906a3ec
4 changed files with 92 additions and 35 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
part13/ElmHub.elm
View File

@@ -193,11 +193,16 @@ viewErrorMessage errorMessage =
text ""
viewSearchResult : SearchResult -> Html Msg
viewStars : SearchResult -> Table.HtmlDetails Msg
viewStars result =
Table.HtmlDetails []
[ span [ class "star-count" ] [ text (toString result.stars) ] ]
viewSearchResult : SearchResult -> Table.HtmlDetails Msg
viewSearchResult result =
li []
[ span [ class "star-count" ] [ text (toString result.stars) ]
, a [ href ("https://github.com/" ++ result.name), target "_blank" ]
Table.HtmlDetails []
[ a [ href ("https://github.com/" ++ result.name), target "_blank" ]
[ text result.name ]
, button [ class "hide-result", onClick (DeleteById result.id) ]
[ text "X" ]

14
part13/ElmHubCss.elm
View File

@@ -145,4 +145,18 @@ css =
-- display: block;
-- color: #555;
-- }
--
-- th {
-- text-align: left;
-- cursor: pointer;
-- }
--
-- th:hover {
-- color: rgb(96, 181, 204);
-- }
--
-- th, td {
-- font-size: 18px;
-- padding-right: 20px;
-- }
]