diff --git a/advanced/part4/src/Article/Feed.elm b/advanced/part4/src/Article/Feed.elm
index 4ccca1d..41b5614 100644
--- a/advanced/part4/src/Article/Feed.elm
+++ b/advanced/part4/src/Article/Feed.elm
@@ -143,8 +143,8 @@ viewPaginatedList paginatedList resultsPerPage =
         Html.text ""
 
 
-pageLink : (Int -> msg) -> Int -> Bool -> Html msg
-pageLink toMsg targetPage isActive =
+pageLink : Int -> Bool -> Html Msg
+pageLink targetPage isActive =
     li [ classList [ ( "page-item", True ), ( "active", isActive ) ] ]
         [ a
             [ class "page-link"