git.iko.soy/hakyll
on master help sign in
Remove categoryblog example, as the category functionality has been removed from Hakyll 3.
5a15be9Benedict Eastaugh
examples/categoryblog/css/default.cssdeleted−17
compare with master
unifiedsplit
@@ -1,17 +0,0 @@
1−body {
2− width: 600px;
3− margin: 0px auto 0px auto;
4−}
5−
6−div#navigation {
7− text-align: center;
8− border-bottom: 4px solid black;
9−}
10−
11−div#navigation a {
12− color: white;
13− text-decoration: none;
14− background-color: black;
15− padding: 3px 10px 3px 10px;
16− margin: 0px 10px 0px 10px;
17−}
examples/categoryblog/hakyll.hsdeleted−80
@@ -1,80 +0,0 @@
1−module Main where
2−
3−import Control.Arrow ((>>>), arr)
4−import Text.Hakyll (hakyll)
5−import Text.Hakyll.Render
6−import Text.Hakyll.Tags (readCategoryMap, withTagMap)
7−import Text.Hakyll.Feed (FeedConfiguration (..), renderRss)
8−import Text.Hakyll.File (getRecursiveContents, directory, removeSpaces, sortByBaseName)
9−import Text.Hakyll.CreateContext (createPage, createCustomPage, createListing)
10−import Text.Hakyll.ContextManipulations (renderDate, copyValue, changeValue)
11−import Text.Hakyll.Util (link)
12−import Data.Map (toList)
13−import Control.Monad (forM_, liftM, (<=<))
14−import Data.Either (Either(..))
15−
16−main = hakyll "http://example.com" $ do
17− -- Static directory.
18− directory css "css"
19−
20− -- Find all post paths.
21− postPaths <- liftM (reverse . sortByBaseName) $ getRecursiveContents "posts"
22− let renderablePosts = map ((>>> postManipulation) . createPage) postPaths
23−
24− -- Read category map.
25− let categoryMap = readCategoryMap "categoryMap" postPaths
26−
27− -- Render all posts list.
28− renderPostList "posts.html" "All posts" renderablePosts
29−
30− -- Render post list per category
31− let renderListForCategory category posts =
32− renderPostList (categoryToUrl category) ("Posts about " ++ category)
33− (map (>>> postManipulation) posts)
34− withTagMap categoryMap renderListForCategory
35−
36− -- Render index, including recent posts.
37− let categoryList' = categoryMap >>> categoryList
38− let index = createListing "index.html"
39− ["templates/postitem.html"]
40− (take 3 renderablePosts)
41− [ ("title", Left "Home")
42− , ("categories", Right $ categoryList')
43− ]
44− renderChain ["index.html", "templates/default.html"] index
45−
46− -- Render all posts.
47− forM_ renderablePosts $ renderChain [ "templates/post.html"
48− , "templates/default.html"
49− ]
50−
51− -- Render rss feed
52− renderRss myFeedConfiguration $
53− map (>>> copyValue "body" "description") (take 3 renderablePosts)
54−
55− where
56− postManipulation = renderDate "date" "%B %e, %Y" "Date unknown"
57− >>> renderCategoryLink
58−
59− renderCategoryLink =
60− changeValue "category" (\c -> link c $ categoryToUrl c)
61−
62− categoryToUrl c = "$root/categories/" ++ removeSpaces c ++ ".html"
63−
64− categoryList = arr $ uncurry categoryListItem <=< toList
65−
66− categoryListItem category posts =
67− "<li>" ++ link category (categoryToUrl category)
68− ++ " - " ++ show (length posts) ++ " items.</li>"
69−
70− renderPostList url title posts = do
71− let list = createListing url ["templates/postitem.html"]
72− posts [("title", Left title)]
73− renderChain ["posts.html", "templates/default.html"] list
74−
75−myFeedConfiguration = FeedConfiguration
76− { feedUrl = "rss.xml"
77− , feedTitle = "SimpleBlog RSS feed."
78− , feedDescription = "A simple demo of an RSS feed created with Hakyll."
79− , feedAuthorName = "Jasper Van der Jeugt"
80− }
examples/categoryblog/index.htmldeleted−18
@@ -1,18 +0,0 @@
1−<div id="posts">
2− <h1>Recent posts</h1>
3− <ul>
4− $body
5− </ul>
6− <a href="$root/posts.html">All posts...</a>
7− <h1>Categories</h1>
8− <ul>
9− $categories
10− </ul>
11−</div>
12−
13−<div class="about">
14− <h1>About</h1>
15− <p>
16− This is a sample blog for educational purposes.
17− </p>
18−</div>
examples/categoryblog/posts.htmldeleted−4
@@ -1,4 +0,0 @@
1−<h1>$title</h1>
2−<ul>
3− $body
4−</ul>
examples/categoryblog/posts/coding/2009-11-05-a-first-post.markdowndeleted−20
@@ -1,20 +0,0 @@
1−---
2−title: A first post
3−author: Julius Caesar
4−---
5−Lorem ipsum dolor sit amet, consectetur adipiscing elit. Vivamus pretium leo
6−adipiscing lectus iaculis lobortis. Vivamus scelerisque velit dignissim metus
7−gravida sit amet dapibus ligula tempor. Quisque sit amet viverra nunc.
8−Suspendisse cursus elementum ante, ut venenatis nisi dictum eu. Nulla diam
9−ligula, eleifend in varius quis, malesuada a nibh. Vivamus consequat
10−pellentesque erat non blandit. Nunc sit amet eros vel massa semper ullamcorper
11−quis iaculis magna. Vestibulum ullamcorper urna sit amet est elementum
12−pulvinar. Vestibulum consequat lacus ac quam hendrerit tincidunt. Praesent
13−bibendum vehicula diam, nec sagittis risus tempus a. Nulla quis odio sit amet
14−odio vehicula cursus ut id odio. Curabitur semper magna euismod magna mollis
15−venenatis. Nunc eget eleifend velit. Mauris sed posuere sem. Fusce id nunc
16−nisi, a aliquam orci. Suspendisse laoreet justo non enim laoreet eget consequat
17−velit porttitor. Aenean faucibus sodales metus at tincidunt. Donec vestibulum
18−leo pulvinar erat auctor ac ultrices massa euismod. Phasellus blandit cursus
19−magna, eget lacinia mi lobortis sed. Suspendisse ultricies enim ligula, vel
20−scelerisque mauris.
examples/categoryblog/posts/coding/2009-11-28-a-third-post.markdowndeleted−18
@@ -1,18 +0,0 @@
1−---
2−title: A third post
3−author: Publius Ovidius Naso
4−---
5−Pellentesque tempor blandit elit, vel ultricies arcu congue egestas. Fusce
6−vitae rutrum nisl. Fusce id mauris libero, a venenatis tellus. Fusce iaculis,
7−lorem et ornare molestie, mauris risus mollis nisi, non fermentum lacus lacus
8−sit amet ipsum. Praesent lobortis ullamcorper dolor, eget convallis ligula
9−dignissim a. Suspendisse nulla nisi, congue et pharetra vel, convallis non
10−libero. Ut a nulla ipsum. Phasellus cursus velit id neque viverra ut
11−pellentesque justo posuere. Curabitur laoreet enim et velit tempor consectetur.
12−Donec eu pretium urna. Suspendisse vitae nisi at metus vestibulum aliquam in
13−sit amet nisl. Donec convallis lacinia odio, vestibulum molestie nunc feugiat
14−a. Suspendisse vehicula, sapien id aliquet consectetur, sem sapien ullamcorper
15−arcu, scelerisque porttitor elit ipsum posuere ligula. Nulla at velit eu metus
16−tincidunt auctor ut sit amet enim. Donec placerat dapibus nisi id facilisis.
17−Maecenas pellentesque pulvinar auctor. Curabitur gravida quam sit amet purus
18−consectetur blandit.
examples/categoryblog/posts/coding/2009-12-04-this-blog-aint-dead.markdowndeleted−11
@@ -1,11 +0,0 @@
1−---
2−title: This blog ain't dead
3−author: Marcus Antonius
4−---
5−Etiam non felis aliquet tellus dictum vestibulum. Aliquam accumsan mauris non
6−lacus ultricies nec lacinia enim rhoncus. Curabitur vel tortor massa, elementum
7−tincidunt elit. Maecenas venenatis luctus arcu ut ullamcorper. Donec interdum
8−dolor eu enim tristique vel vehicula risus mollis. Nunc nec tortor quam. Nulla
9−a mauris arcu. Phasellus venenatis tortor vel odio tincidunt consequat. Integer
10−venenatis nibh vitae lectus laoreet eu feugiat nunc pretium. Integer nec turpis
11−metus, in fermentum lorem.
examples/categoryblog/posts/random/2009-11-10-another-post.markdowndeleted−14
@@ -1,14 +0,0 @@
1−---
2−title: Another post
3−author: Marcus Tullius Cicero
4−---
5−Vestibulum in ultrices urna. Etiam tempor enim dui, nec malesuada elit. Donec
6−tempor ligula et quam volutpat quis fermentum eros congue. Sed ut pulvinar sem.
7−Sed aliquam ipsum id purus sollicitudin vulputate. Cras et mauris dui, vel
8−hendrerit leo. Ut metus ipsum, fermentum ac malesuada id, tempus pharetra quam.
9−Donec diam felis, consequat ac scelerisque cursus, gravida non lectus. Sed
10−faucibus elit dapibus diam elementum id varius nisi tristique. Proin consequat
11−faucibus neque in aliquam. Vestibulum ligula odio, pulvinar vel hendrerit
12−vitae, egestas ut nibh. Praesent ut velit elit, in consequat dolor. Praesent
13−sem enim, commodo in gravida sed, adipiscing vel eros. Lorem ipsum dolor sit
14−amet, consectetur adipiscing elit. Proin non aliquam nunc.
examples/categoryblog/posts/random/2009-12-23-almost-christmas.markdowndeleted−12
@@ -1,12 +0,0 @@
1−---
2−title: Almost Christmas!
3−author: Publius Vergilius Maro
4−---
5−Morbi tincidunt eleifend ante, eu gravida ante rutrum vel. Nunc bibendum nulla
6−tellus, eget egestas sapien. Nam rhoncus interdum libero, eget congue orci
7−imperdiet eu. Quisque pellentesque fringilla urna, ac venenatis ante ultricies
8−et. Pellentesque habitant morbi tristique senectus et netus et malesuada fames
9−ac turpis egestas. Mauris eleifend sagittis ultrices. Quisque ultrices accumsan
10−nisl, sed pellentesque metus porta vitae. Nulla facilisi. In et nibh tincidunt
11−mi volutpat pellentesque vitae nec sapien. Integer massa ipsum, pellentesque in
12−elementum at, cursus sit amet diam.
examples/categoryblog/templates/default.htmldeleted−23
@@ -1,23 +0,0 @@
1−<?xml version="1.0" encoding="UTF-8"?>
2−<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
3−"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
4−<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
5− <head>
6− <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
7− <title>SimpleBlog - $title</title>
8− <link rel="stylesheet" type="text/css" href="$root/css/default.css" />
9− <link rel="alternate"
10− type="application/rss+xml"
11− title="SimpleBlog"
12− href="http://example.com/rss.xml" />
13− </head>
14− <body>
15− <h1>SimpleBlog - $title</h1>
16− <div id="navigation">
17− <a href="$root/index.html">Home</a>
18− <a href="$root/posts.html">All posts</a>
19− </div>
20−
21− $body
22− </body>
23−</html>
examples/categoryblog/templates/post.htmldeleted−5
@@ -1,5 +0,0 @@
1−<h1>$title</h1>
2−by <em>$author</em> on <strong>$date</strong>
3−<div>Posted in: $category.</div>
4−
5−$body
examples/categoryblog/templates/postitem.htmldeleted−4
@@ -1,4 +0,0 @@
1−<li>
2− <a href="$root/$url">$title</a>
3− - <em>$date</em> - by <em>$author</em>
4−</li>