add burger icon to show collapsed navbar when on mobile

NixOS · Jul 2, 2020 · 2662f52 · 2662f52
1 parent 1f8939b
commit 2662f52
Showing 1 changed file with 15 additions and 2 deletions.
diff --git a/src/Main.elm b/src/Main.elm
@@ -8,6 +8,7 @@ import Html
     exposing
         ( Html
         , a
+        , button
         , div
         , footer
         , header
@@ -19,11 +20,13 @@ import Html
         )
 import Html.Attributes
     exposing
-        ( class
+        ( attribute
+        , class
         , classList
         , href
         , id
         , src
+        , type_
         )
 import Page.Home
 import Page.Options
@@ -278,7 +281,17 @@ view model =
                 [ div [ class "navbar navbar-static-top" ]
                     [ div [ class "navbar-inner" ]
                         [ div [ class "container" ]
-                            [ a [ class "brand", href "https://nixos.org" ]
+                            [ button
+                                [ type_ "button"
+                                , class "btn btn-navbar"
+                                , attribute "data-toggle" "collapse"
+                                , attribute "data-target" ".nav-collapse"
+                                ]
+                                [ span [ class "icon-bar" ] []
+                                , span [ class "icon-bar" ] []
+                                , span [ class "icon-bar" ] []
+                                ]
+                            , a [ class "brand", href "https://nixos.org" ]
                                 [ img [ src "https://nixos.org/logo/nix-wiki.png", class "logo" ] []
                                 ]
                             , div [ class "nav-collapse collapse" ]