From aed355d9202f2f3d92b93e4dfe32d0a2602d7261 Mon Sep 17 00:00:00 2001 From: Christine Dodrill Date: Mon, 16 Nov 2020 11:30:40 -0500 Subject: [PATCH] cleanups --- sina/src/Page/Switches.elm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/sina/src/Page/Switches.elm b/sina/src/Page/Switches.elm index 9dbc1bb..5b905ad 100644 --- a/sina/src/Page/Switches.elm +++ b/sina/src/Page/Switches.elm @@ -2,7 +2,7 @@ module Page.Switches exposing (view) import Browser exposing (Document) import Html exposing (a, br, button, h2, img, p, span, table, td, text, th, tr) -import Html.Attributes exposing (height, href, src, width) +import Html.Attributes exposing (height, href, src, style, width) import Html.Events exposing (onClick) import Iso8601 import Layout exposing (template) @@ -90,7 +90,7 @@ view { front, switches, switchPage } = , text " " , text <| formatMonth <| Time.toMonth utc time , text " " - , text <| String.fromInt <| Time.toDay utc time + , text <| String.pad 2 '0' <| String.fromInt <| Time.toDay utc time , text " " , text <| String.fromInt <| Time.toYear utc time ] @@ -130,7 +130,7 @@ view { front, switches, switchPage } = body = [ table [] <| [ heading ] ++ contents , p - [] + [ style "margin" "auto" ] [ prevButton , text <| String.fromInt switchPage , nextButton