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 =
    }


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