ui: Linter dead code elimination

ui/src/Page/Mailbox.elm

@@ -160,7 +160,6 @@ type Msg
     = ListLoaded (Result HttpUtil.Error (List MessageHeader))
     | ClickMessage MessageID
     | ListKeyPress String Int
-    | OpenMessage MessageID
     | CloseMessage
     | MessageLoaded (Result HttpUtil.Error Message)
     | MessageBody Body
@@ -189,9 +188,6 @@ update msg model =
                 ]
             )
 
-        OpenMessage id ->
-            updateOpenMessage model id
-
         CloseMessage ->
             case model.state of
                 ShowingList list _ ->
@@ -372,7 +368,7 @@ updatePurge model =
                 ]
     in
     case model.state of
-        ShowingList list _ ->
+        ShowingList _ _ ->
             ( { model
                 | promptPurge = False
                 , session = Session.disableRouting model.session