From c3f3ca187ee8de0a500da1a5b078bf9cf3a83fb7 Mon Sep 17 00:00:00 2001
From: sabadev <saba@sabadev.xyz>
Date: Tue, 16 Mar 2021 20:28:52 -0400
Subject: [PATCH] Moved navigation out of main.

---
 src/Server.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Server.hs b/src/Server.hs
index 219be67..f215c4b 100644
--- a/src/Server.hs
+++ b/src/Server.hs
@@ -59,9 +59,9 @@ htmlContainer contents = do
       meta_ [charset_ "utf8"]
       meta_ [name_ "description", content_ "width=device-width"]
       link_ [rel_ "stylesheet", href_ "/dark"]
-    body_ $ div_ [role_ "main"] $ do
+    body_ $ do
       nav
-      contents
+      div_ [role_ "main"] contents
 
 navigation :: Handler (Html ())
 navigation = liftIO blogList >>= pure . div_ [role_ "navigation"] . ul_ [class_ "blog-links"]
-- 
2.20.1