ui: Reformat with elm-format 0.8.1

ui/src/Data/Date.elm

@@ -1,4 +1,4 @@
-module Data.Date exposing (..)
+module Data.Date exposing (date)
 
 import Date exposing (Date)
 import Json.Decode as Decode exposing (..)

ui/src/Data/Message.elm

@@ -1,4 +1,4 @@
-module Data.Message exposing (..)
+module Data.Message exposing (Attachment, Message, attachmentDecoder, decoder)
 
 import Data.Date exposing (date)
 import Date exposing (Date)

ui/src/Data/MessageHeader.elm

@@ -1,4 +1,4 @@
-module Data.MessageHeader exposing (..)
+module Data.MessageHeader exposing (MessageHeader, decoder)
 
 import Data.Date exposing (date)
 import Date exposing (Date)

ui/src/Data/Metrics.elm

@@ -1,4 +1,4 @@
-module Data.Metrics exposing (..)
+module Data.Metrics exposing (Metrics, decodeIntList, decoder)
 
 import Json.Decode as Decode exposing (..)
 import Json.Decode.Pipeline exposing (..)

ui/src/Data/Session.elm

@@ -1,14 +1,13 @@
-module Data.Session
-    exposing
-        ( Msg(..)
-        , Persistent
-        , Session
-        , decodeValueWithDefault
-        , decoder
-        , init
-        , none
-        , update
-        )
+module Data.Session exposing
+    ( Msg(..)
+    , Persistent
+    , Session
+    , decodeValueWithDefault
+    , decoder
+    , init
+    , none
+    , update
+    )
 
 import Json.Decode as Decode exposing (..)
 import Json.Decode.Pipeline exposing (..)
@@ -63,6 +62,7 @@ update msg session =
         AddRecent mailbox ->
             if List.head session.persistent.recentMailboxes == Just mailbox then
                 session
+
             else
                 let
                     recent =