From 5d3768599f1bcb2b9f9a07ab023e82b2bcdd3f22 Mon Sep 17 00:00:00 2001 From: Jared Kobos Date: Sun, 24 Mar 2019 10:25:50 -0400 Subject: [PATCH] Add additional paths --- src/Main.elm | 18 ++++++++++++++++-- 1 file changed, 16 insertions(+), 2 deletions(-) diff --git a/src/Main.elm b/src/Main.elm index ace93af..7a7260d 100644 --- a/src/Main.elm +++ b/src/Main.elm @@ -15,7 +15,7 @@ type alias Flags = {} ---- MODEL ---- type ActiveView = - Welcome | Summary | Experience | Education | Contact | Links | Feedback | Language + Welcome | Summary | Experience | Education | Contact | Links | Feedback | Language | Theme type alias Model = { @@ -58,6 +58,20 @@ getActiveView ctrl event = case key of "s" -> Summary + "w" -> + Experience + "c" -> + Contact + "e" -> + Education + "f" -> + Feedback + "z" -> + Language + "t" -> + Theme + "l" -> + Links _ -> Welcome Nothing -> @@ -137,7 +151,7 @@ terminalHeader = footerItem : String -> String -> Html Msg footerItem key description = - div [class "flex flex-row text-white p-1 mr-32"] [ + div [class "flex flex-row text-white p-1 w-1/6"] [ p [class "m-2 bg-grey-light text-black"] [text key], p [class "m-2"] [text description] ]