aelve/guide
1
1
Fork 0
mirror of https://github.com/aelve/guide.git synced 2024-11-27 00:14:03 +03:00
Code Issues Projects Releases Wiki Activity

Fix headers

Browse Source
This commit is contained in:
Artyom 2016-04-24 23:53:00 +03:00
parent 7729115472
commit a3c7f896c5
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/View.hs
View File

@ -353,8 +353,6 @@ renderHaskellRoot
renderHaskellRoot globalState mbSearchQuery = renderHaskellRoot globalState mbSearchQuery =
wrapPage "Aelve Guide" $ do wrapPage "Aelve Guide" $ do
onPageLoad $ JS.expandHash () 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 case mbSearchQuery of
Nothing -> h1_ "The Haskeller's guide" Nothing -> h1_ "The Haskeller's guide"
-- A search page isn't the main page, so we need a link to the main page -- A search page isn't the main page, so we need a link to the main page
@ -389,8 +387,6 @@ renderCategoryPage
renderCategoryPage category = renderCategoryPage category =
wrapPage (category^.title <> " – Aelve Guide") $ do wrapPage (category^.title <> " – Aelve Guide") $ do
onPageLoad $ JS.expandHash () 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] -- TODO: another absolute link [absolute-links]
h1_ (a_ [href_ "/haskell"] "The Haskeller's guide") h1_ (a_ [href_ "/haskell"] "The Haskeller's guide")
renderNoScriptWarning renderNoScriptWarning

5
static/css.css
View File

@ -15,6 +15,11 @@ body {
#main { #main {
flex: 1; } flex: 1; }
/* headers look bad when the width is small, so */
h1 {
line-height: 100%; }
/* Other CSS */ /* Other CSS */
#footer { #footer {