diff options
Diffstat (limited to 'src/Blog.hs')
| -rw-r--r-- | src/Blog.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |