maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[locale/blog] Remove unused locale strings

Browse source
This commit is contained in:
Vincent Ambo 2015-11-21 19:01:05 +01:00
parent 4c961c4ac6
commit a68d6cfa31
2 changed files with 2 additions and 70 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Blog.hs
View file

@ -90,7 +90,7 @@ $maybe links <- pageLinks
^{links}
|]
where
toDisplay = if' showAll entries (take 6 entries)
toDisplay = if showAll then entries else (take 6 entries)
linkElems Entry{..} = concat $ intersperse' "/" [show lang, show entryId]
showLinks :: Maybe Int -> BlogLang -> Html