Don't make elmHubHeader top-level

part3/Main.elm

@@ -32,14 +32,14 @@ initialModel =
     }
 
 
-elmHubHeader =
+view model =
+    let
+        elmHubHeader =
             header []
                 [ h1 [] [ text "ElmHub" ]
                 , span [ class "tagline" ] [ text "Like GitHub, but for Elm things." ]
                 ]
-
+    in
-
-view model =
     div [ class "content" ]
         [ elmHubHeader
         , ul [ class "results" ] (List.map viewSearchResult model.results)

part4/Main.elm

@@ -27,6 +27,7 @@ type alias Msg =
 {-| TODO add a type annotation to this value
 
 HINT: The type aliases above may come in handy for these exercises!
+
 -}
 initialModel =
     { query = "tutorial"
@@ -55,18 +56,16 @@ initialModel =
     }
 
 
-{-| TODO add a type annotation to this value
+{-| TODO add a type annotation to this function
 -}
-elmHubHeader =
+view model =
+    let
+        elmHubHeader =
             header []
                 [ h1 [] [ text "ElmHub" ]
                 , span [ class "tagline" ] [ text "Like GitHub, but for Elm things." ]
                 ]
-
+    in
-
-{-| TODO add a type annotation to this function
--}
-view model =
     div [ class "content" ]
         [ elmHubHeader
         , ul [ class "results" ] (List.map viewSearchResult model.results)