From 4233054b6c280c669119c30bee90a755678702b4 Mon Sep 17 00:00:00 2001
From: Christine Dodrill <me@christine.website>
Date: Thu, 16 Jan 2020 00:33:44 +0000
Subject: [PATCH] fix and pretty

---
 frontend/src/Page.elm            | 9 +++++----
 frontend/src/Page/SwitchData.elm | 6 ++----
 static/gruvbox.css               | 4 ++++
 3 files changed, 11 insertions(+), 8 deletions(-)

diff --git a/frontend/src/Page.elm b/frontend/src/Page.elm
index 96e7961..67f7e9f 100644
--- a/frontend/src/Page.elm
+++ b/frontend/src/Page.elm
@@ -1,8 +1,8 @@
 module Page exposing (..)
 
 import Browser exposing (Document)
-import Html exposing (Html, a, div, input, node, p, text)
-import Html.Attributes exposing (href, placeholder, type_, value)
+import Html exposing (Html, a, div, input, node, p, span, text)
+import Html.Attributes exposing (class, href, placeholder, style, type_, value)
 import Html.Events exposing (onInput)
 
 
@@ -28,8 +28,9 @@ navBar =
             [ viewLink "/" "Mi"
             , text " - "
             , viewLink "/switch" "Switch tracker"
-            , text " - "
-            , viewLink "/logout" "Logout"
+            , span
+                [ class "right" ]
+                [ viewLink "/logout" "Logout" ]
             ]
         ]
 
diff --git a/frontend/src/Page/SwitchData.elm b/frontend/src/Page/SwitchData.elm
index 7a629f9..e037b56 100644
--- a/frontend/src/Page/SwitchData.elm
+++ b/frontend/src/Page/SwitchData.elm
@@ -29,14 +29,12 @@ type Data
     | Error String
 
 
-init : ( Model, Cmd Msg )
+init : Model
 init =
-    ( Model
+    Model
         0
         40
         Init
-    , NeedData
-    )
 
 
 type Msg
diff --git a/static/gruvbox.css b/static/gruvbox.css
index 618eb3b..05bea91 100644
--- a/static/gruvbox.css
+++ b/static/gruvbox.css
@@ -26,6 +26,10 @@ pre {
   border: 0;
 }
 
+.right {
+    float: right;
+}
+
 a, a:active, a:visited {
   color: #b16286;
   background-color: #1d2021;