public/style.css

@@ -179,7 +179,6 @@ body {
     width: 120px;
     height: 120px;
     animation: spin 2s linear infinite;
-
 }
 
 @keyframes spin {

src/Main.elm

@@ -168,18 +168,16 @@ viewNav ( global, _ ) =
         , div [ Html.Attributes.class "navbar-title" ]
             [ text "Schengen Visa Statistics" ]
         , div [ Html.Attributes.class "navbar-view-icons" ]
-            [ button [ activeClass Other |> Html.Attributes.class, ViewChange Other |> onClick ]
-                [ i [ Html.Attributes.class "fa-solid fa-wrench fa-xl" ] [] ]
-            , button [ activeClass MapView |> Html.Attributes.class, ViewChange MapView |> onClick ]
+            [ button [ activeClass MapView |> Html.Attributes.class, ViewChange MapView |> onClick ]
                 [ i [ Html.Attributes.class "fa-solid fa-map fa-xl" ] [] ]
-            , button [ activeClass DataTable |> Html.Attributes.class, ViewChange DataTable |> onClick ]
-                [ i [ Html.Attributes.class "fa-solid fa-table fa-xl" ] [] ]
             , button [ activeClass ForceDirectedGraph |> Html.Attributes.class, ViewChange ForceDirectedGraph |> onClick ]
-                [ i [ Html.Attributes.class "fa-solid fa-poo fa-xl" ] [] ]
+                [ i [ Html.Attributes.class "fa-solid fa-hexagon-nodes fa-xl" ] [] ]
             , button [ activeClass BarPlot |> Html.Attributes.class, ViewChange BarPlot |> onClick ]
                 [ i [ Html.Attributes.class "fa-solid fa-chart-simple fa-xl" ] [] ]
             , button [ activeClass LinePlot |> Html.Attributes.class, ViewChange LinePlot |> onClick ]
                 [ i [ Html.Attributes.class "fa-solid fa-chart-line fa-xl" ] [] ]
+            , button [ activeClass DataTable |> Html.Attributes.class, ViewChange DataTable |> onClick ]
+                [ i [ Html.Attributes.class "fa-solid fa-table fa-xl" ] [] ]
             ]
         ]
 
@@ -189,15 +187,13 @@ viewContent ( global, local ) =
     let
         message =
             Html.div
-                [ Html.Attributes.style "justify-items" "center"
-                , Html.Attributes.style "align-content" "center"
-                , Html.Attributes.style "flex-grow" "1"
-                ]
+                [ Html.Attributes.style "margin" "auto" ]
                 (case global.progress of
                     Loading ->
                         [ Html.div [ Html.Attributes.class "loader" ] []
                         , Html.div
                             [ Html.Attributes.style "position" "relative"
+                            , Html.Attributes.style "left" "1.5rem"
                             , Html.Attributes.style "bottom" "5rem"
                             ]
                             [ Html.text "Loading Data..." ]
@@ -215,10 +211,6 @@ viewContent ( global, local ) =
             div [ Html.Attributes.class "content" ]
                 [ message ]
 
-        Other ->
-            div [ Html.Attributes.class "content" ]
-                [ text "Other Page" ]
-
         MapView ->
             div [ Html.Attributes.class "content" ]
                 [ MapView.view global local.map ]

src/Model.elm

@@ -10,7 +10,6 @@ import Data.DataLoader exposing (Entry)
 
 type View
     = Home
-    | Other
     | MapView
     | DataTable
     | ForceDirectedGraph