From a3c7f896c52aeb2e6415536544f57b11f508423f Mon Sep 17 00:00:00 2001
From: Artyom <yom@artyom.me>
Date: Sun, 24 Apr 2016 23:53:00 +0300
Subject: [PATCH] Fix headers

---
 src/View.hs    | 4 ----
 static/css.css | 5 +++++
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/src/View.hs b/src/View.hs
index 9fb3678..b523d43 100644
--- a/src/View.hs
+++ b/src/View.hs
@@ -353,8 +353,6 @@ renderHaskellRoot
 renderHaskellRoot globalState mbSearchQuery =
   wrapPage "Aelve Guide" $ do
     onPageLoad $ JS.expandHash ()
-    -- TODO: [very-easy] this header looks bad when the page is narrow, it
-    -- should be fixed in css.css by adding line-height to it
     case mbSearchQuery of
       Nothing -> h1_ "The Haskeller's guide"
       -- A search page isn't the main page, so we need a link to the main page
@@ -389,8 +387,6 @@ renderCategoryPage
 renderCategoryPage category =
   wrapPage (category^.title <> " – Aelve Guide") $ do
     onPageLoad $ JS.expandHash ()
-    -- TODO: [very-easy] this header looks bad when the page is narrow, it
-    -- should be fixed in css.css by adding line-height to it
     -- TODO: another absolute link [absolute-links]
     h1_ (a_ [href_ "/haskell"] "The Haskeller's guide")
     renderNoScriptWarning
diff --git a/static/css.css b/static/css.css
index f1bacc3..41eb687 100644
--- a/static/css.css
+++ b/static/css.css
@@ -15,6 +15,11 @@ body {
 #main {
   flex: 1; }
 
+/* headers look bad when the width is small, so */
+
+h1 {
+  line-height: 100%; }
+
 /* Other CSS */
 
 #footer {