Get rid of the catch-all case in the update function

[norpan]

The catch-all case at the bottom makes adding new messages not fail compilation. One way to fix this is to add a catch-all for each page message instead, like this:

       ( SettingsMsg subMsg, _ ) ->
            model => Cmd.none