From a68d6cfa31ca9fa4e2773c5f3e375c21079c358b Mon Sep 17 00:00:00 2001
From: Vincent Ambo <tazjin@gmail.com>
Date: Sat, 21 Nov 2015 19:01:05 +0100
Subject: [locale/blog] Remove unused locale strings

---
 src/Blog.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Blog.hs')

diff --git a/src/Blog.hs b/src/Blog.hs
index 62e7d4575422..a78b911eda16 100644
--- a/src/Blog.hs
+++ b/src/Blog.hs
@@ -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
-- 
cgit 1.4.1