Extract elmHubHeader

2016-06-25 07:54:46 -07:00
parent 3ae25593c4
commit c25f3e695b
1 changed files with 8 additions and 4 deletions
--- a/part1/Main.elm
+++ b/part1/Main.elm
@@ -13,12 +13,16 @@ model =
    }


-view model =
-    div [ class "content" ]
-        [ header []
+elmHubHeader =
+    header []
        [ -- TODO add the equivalent of <h1>ElmHub</h1> right before this <span>
          span [ class "tagline" ] [ text "“Like GitHub, but for Elm things.”" ]
        ]
+
+
+view model =
+    div [ class "content" ]
+        [ elmHubHeader
        , ul [ class "results" ]
            [ li []
                [ span [ class "star-count" ] [{- TODO display the number of stars -}]