ui: Linter dead code elimination

ui/src/Layout.elm

@@ -249,13 +249,6 @@ navbarRecent page activeMailbox model session =
             else
                 session.persistent.recentMailboxes
 
-        dropdownExpanded =
-            if model.recentVisible then
-                "true"
-
-            else
-                "false"
-
         recentLink mailbox =
             a [ Route.href (Route.Mailbox mailbox) ] [ text mailbox ]
     in

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

ui/src/Page/Status.elm

@@ -100,7 +100,7 @@ initDataSet =
 
 
 subscriptions : Model -> Sub Msg
-subscriptions model =
+subscriptions _ =
     Time.every (10 * 1000) Tick
 
 
@@ -419,23 +419,6 @@ viewMetric metric =
         ]
 
 
-viewLiveMetric : String -> (Int -> String) -> Int -> Html a -> Html a
-viewLiveMetric label formatter value graph =
-    div [ class "metric" ]
-        [ div [ class "label" ] [ text label ]
-        , div [ class "value" ] [ text (formatter value) ]
-        , div [ class "graph" ]
-            [ graph
-            , text "(10min)"
-            ]
-        ]
-
-
-graphNull : Html a
-graphNull =
-    div [] []
-
-
 graphSize : Spark.Size
 graphSize =
     { width = 180