summaryrefslogtreecommitdiff
path: root/examples/tagblog
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2011-06-13 08:43:28 +0200
committerJasper Van der Jeugt <jaspervdj@gmail.com>2011-06-13 08:43:28 +0200
commitedeef66180f24e4254b512041bee617368fa1eba (patch)
treedf2b6c470dba9fda52a0d3b96fd569d2c74b2c48 /examples/tagblog
parent893b366435739d073d2b6b9cafae868b5d361354 (diff)
downloadhakyll-edeef66180f24e4254b512041bee617368fa1eba.tar.gz
Remove examples from this repo
Diffstat (limited to 'examples/tagblog')
-rw-r--r--examples/tagblog/css/default.css17
-rw-r--r--examples/tagblog/hakyll.hs99
-rw-r--r--examples/tagblog/posts/2009-11-05-a-first-post.markdown22
-rw-r--r--examples/tagblog/posts/2009-11-10-another-post.markdown16
-rw-r--r--examples/tagblog/posts/2009-11-28-a-third-post.markdown20
-rw-r--r--examples/tagblog/posts/2009-12-04-this-blog-aint-dead.markdown13
-rw-r--r--examples/tagblog/posts/2009-12-23-almost-christmas.markdown14
-rw-r--r--examples/tagblog/templates/default.html23
-rw-r--r--examples/tagblog/templates/index.html19
-rw-r--r--examples/tagblog/templates/post.html7
-rw-r--r--examples/tagblog/templates/postitem.html4
-rw-r--r--examples/tagblog/templates/posts.html4
12 files changed, 0 insertions, 258 deletions
diff --git a/examples/tagblog/css/default.css b/examples/tagblog/css/default.css
deleted file mode 100644
index 9ed2b01..0000000
--- a/examples/tagblog/css/default.css
+++ /dev/null
@@ -1,17 +0,0 @@
-body {
- width: 600px;
- margin: 0px auto 0px auto;
-}
-
-div#navigation {
- text-align: center;
- border-bottom: 4px solid black;
-}
-
-div#navigation a {
- color: white;
- text-decoration: none;
- background-color: black;
- padding: 3px 10px 3px 10px;
- margin: 0px 10px 0px 10px;
-}
diff --git a/examples/tagblog/hakyll.hs b/examples/tagblog/hakyll.hs
deleted file mode 100644
index 0f1e7ab..0000000
--- a/examples/tagblog/hakyll.hs
+++ /dev/null
@@ -1,99 +0,0 @@
-{-# LANGUAGE OverloadedStrings #-}
-module Main where
-
-import Prelude hiding (id)
-import Control.Arrow ((>>>), (***), arr)
-import Control.Category (id)
-import Data.Monoid (mempty, mconcat)
-
-import Hakyll
-
-main :: IO ()
-main = hakyll $ do
- -- Compress CSS
- match "css/*" $ do
- route idRoute
- compile compressCssCompiler
-
- -- Render posts
- match "posts/*" $ do
- route $ setExtension ".html"
- compile $ pageCompiler
- >>> arr (renderDateField "date" "%B %e, %Y" "Date unknown")
- >>> renderTagsField "prettytags" (fromCapture "tags/*")
- >>> applyTemplateCompiler "templates/post.html"
- >>> applyTemplateCompiler "templates/default.html"
- >>> relativizeUrlsCompiler
-
- -- Render posts list
- match "posts.html" $ route idRoute
- create "posts.html" $ constA mempty
- >>> arr (setField "title" "All posts")
- >>> requireAllA "posts/*" addPostList
- >>> applyTemplateCompiler "templates/posts.html"
- >>> applyTemplateCompiler "templates/default.html"
- >>> relativizeUrlsCompiler
-
- -- Index
- match "index.html" $ route idRoute
- create "index.html" $ constA mempty
- >>> arr (setField "title" "Home")
- >>> requireA "tags" (setFieldA "tagcloud" (renderTagCloud'))
- >>> requireAllA "posts/*" (id *** arr (take 3 . reverse . sortByBaseName) >>> addPostList)
- >>> applyTemplateCompiler "templates/index.html"
- >>> applyTemplateCompiler "templates/default.html"
- >>> relativizeUrlsCompiler
-
- -- Tags
- create "tags" $
- requireAll "posts/*" (\_ ps -> readTags ps :: Tags String)
-
- -- Add a tag list compiler for every tag
- match "tags/*" $ route $ setExtension ".html"
- metaCompile $ require_ "tags"
- >>> arr tagsMap
- >>> arr (map (\(t, p) -> (tagIdentifier t, makeTagList t p)))
-
- -- Render RSS feed
- match "rss.xml" $ route idRoute
- create "rss.xml" $
- requireAll_ "posts/*"
- >>> mapCompiler (arr $ copyBodyToField "description")
- >>> renderRss feedConfiguration
-
- -- Read templates
- match "templates/*" $ compile templateCompiler
- where
- renderTagCloud' :: Compiler (Tags String) String
- renderTagCloud' = renderTagCloud tagIdentifier 100 120
-
- tagIdentifier :: String -> Identifier
- tagIdentifier = fromCapture "tags/*"
-
--- | Auxiliary compiler: generate a post list from a list of given posts, and
--- add it to the current page under @$posts@
---
-addPostList :: Compiler (Page String, [Page String]) (Page String)
-addPostList = setFieldA "posts" $
- arr (reverse . sortByBaseName)
- >>> require "templates/postitem.html" (\p t -> map (applyTemplate t) p)
- >>> arr mconcat
- >>> arr pageBody
-
-makeTagList :: String
- -> [Page String]
- -> Compiler () (Page String)
-makeTagList tag posts =
- constA (mempty, posts)
- >>> addPostList
- >>> arr (setField "title" ("Posts tagged &#8216;" ++ tag ++ "&#8217;"))
- >>> applyTemplateCompiler "templates/posts.html"
- >>> applyTemplateCompiler "templates/default.html"
-
-feedConfiguration :: FeedConfiguration
-feedConfiguration = FeedConfiguration
- { feedTitle = "SimpleBlog RSS feed."
- , feedDescription = "A simple demo of an RSS feed created with Hakyll."
- , feedAuthorName = "Jasper Van der Jeugt"
- , feedRoot = "http://example.com"
- }
diff --git a/examples/tagblog/posts/2009-11-05-a-first-post.markdown b/examples/tagblog/posts/2009-11-05-a-first-post.markdown
deleted file mode 100644
index 3c9d4ab..0000000
--- a/examples/tagblog/posts/2009-11-05-a-first-post.markdown
+++ /dev/null
@@ -1,22 +0,0 @@
----
-title: A first post
-author: Julius Caesar
-tags: caesar, random crap
----
-
-Lorem ipsum dolor sit amet, consectetur adipiscing elit. Vivamus pretium leo
-adipiscing lectus iaculis lobortis. Vivamus scelerisque velit dignissim metus
-gravida sit amet dapibus ligula tempor. Quisque sit amet viverra nunc.
-Suspendisse cursus elementum ante, ut venenatis nisi dictum eu. Nulla diam
-ligula, eleifend in varius quis, malesuada a nibh. Vivamus consequat
-pellentesque erat non blandit. Nunc sit amet eros vel massa semper ullamcorper
-quis iaculis magna. Vestibulum ullamcorper urna sit amet est elementum
-pulvinar. Vestibulum consequat lacus ac quam hendrerit tincidunt. Praesent
-bibendum vehicula diam, nec sagittis risus tempus a. Nulla quis odio sit amet
-odio vehicula cursus ut id odio. Curabitur semper magna euismod magna mollis
-venenatis. Nunc eget eleifend velit. Mauris sed posuere sem. Fusce id nunc
-nisi, a aliquam orci. Suspendisse laoreet justo non enim laoreet eget consequat
-velit porttitor. Aenean faucibus sodales metus at tincidunt. Donec vestibulum
-leo pulvinar erat auctor ac ultrices massa euismod. Phasellus blandit cursus
-magna, eget lacinia mi lobortis sed. Suspendisse ultricies enim ligula, vel
-scelerisque mauris.
diff --git a/examples/tagblog/posts/2009-11-10-another-post.markdown b/examples/tagblog/posts/2009-11-10-another-post.markdown
deleted file mode 100644
index 2fffc7c..0000000
--- a/examples/tagblog/posts/2009-11-10-another-post.markdown
+++ /dev/null
@@ -1,16 +0,0 @@
----
-title: Another post
-author: Marcus Tullius Cicero
-tags: cicero, random crap
----
-
-Vestibulum in ultrices urna. Etiam tempor enim dui, nec malesuada elit. Donec
-tempor ligula et quam volutpat quis fermentum eros congue. Sed ut pulvinar sem.
-Sed aliquam ipsum id purus sollicitudin vulputate. Cras et mauris dui, vel
-hendrerit leo. Ut metus ipsum, fermentum ac malesuada id, tempus pharetra quam.
-Donec diam felis, consequat ac scelerisque cursus, gravida non lectus. Sed
-faucibus elit dapibus diam elementum id varius nisi tristique. Proin consequat
-faucibus neque in aliquam. Vestibulum ligula odio, pulvinar vel hendrerit
-vitae, egestas ut nibh. Praesent ut velit elit, in consequat dolor. Praesent
-sem enim, commodo in gravida sed, adipiscing vel eros. Lorem ipsum dolor sit
-amet, consectetur adipiscing elit. Proin non aliquam nunc.
diff --git a/examples/tagblog/posts/2009-11-28-a-third-post.markdown b/examples/tagblog/posts/2009-11-28-a-third-post.markdown
deleted file mode 100644
index afabcc7..0000000
--- a/examples/tagblog/posts/2009-11-28-a-third-post.markdown
+++ /dev/null
@@ -1,20 +0,0 @@
----
-title: A third post
-author: Publius Ovidius Naso
-tags: epic fail, ovidius
----
-
-Pellentesque tempor blandit elit, vel ultricies arcu congue egestas. Fusce
-vitae rutrum nisl. Fusce id mauris libero, a venenatis tellus. Fusce iaculis,
-lorem et ornare molestie, mauris risus mollis nisi, non fermentum lacus lacus
-sit amet ipsum. Praesent lobortis ullamcorper dolor, eget convallis ligula
-dignissim a. Suspendisse nulla nisi, congue et pharetra vel, convallis non
-libero. Ut a nulla ipsum. Phasellus cursus velit id neque viverra ut
-pellentesque justo posuere. Curabitur laoreet enim et velit tempor consectetur.
-Donec eu pretium urna. Suspendisse vitae nisi at metus vestibulum aliquam in
-sit amet nisl. Donec convallis lacinia odio, vestibulum molestie nunc feugiat
-a. Suspendisse vehicula, sapien id aliquet consectetur, sem sapien ullamcorper
-arcu, scelerisque porttitor elit ipsum posuere ligula. Nulla at velit eu metus
-tincidunt auctor ut sit amet enim. Donec placerat dapibus nisi id facilisis.
-Maecenas pellentesque pulvinar auctor. Curabitur gravida quam sit amet purus
-consectetur blandit.
diff --git a/examples/tagblog/posts/2009-12-04-this-blog-aint-dead.markdown b/examples/tagblog/posts/2009-12-04-this-blog-aint-dead.markdown
deleted file mode 100644
index 0c56146..0000000
--- a/examples/tagblog/posts/2009-12-04-this-blog-aint-dead.markdown
+++ /dev/null
@@ -1,13 +0,0 @@
----
-title: This blog ain't dead
-author: Marcus Antonius
-tags: epic fail, antonius
----
-
-Etiam non felis aliquet tellus dictum vestibulum. Aliquam accumsan mauris non
-lacus ultricies nec lacinia enim rhoncus. Curabitur vel tortor massa, elementum
-tincidunt elit. Maecenas venenatis luctus arcu ut ullamcorper. Donec interdum
-dolor eu enim tristique vel vehicula risus mollis. Nunc nec tortor quam. Nulla
-a mauris arcu. Phasellus venenatis tortor vel odio tincidunt consequat. Integer
-venenatis nibh vitae lectus laoreet eu feugiat nunc pretium. Integer nec turpis
-metus, in fermentum lorem.
diff --git a/examples/tagblog/posts/2009-12-23-almost-christmas.markdown b/examples/tagblog/posts/2009-12-23-almost-christmas.markdown
deleted file mode 100644
index 78a1508..0000000
--- a/examples/tagblog/posts/2009-12-23-almost-christmas.markdown
+++ /dev/null
@@ -1,14 +0,0 @@
----
-title: Almost Christmas!
-author: Publius Vergilius Maro
-tags: christmas, random crap
----
-
-Morbi tincidunt eleifend ante, eu gravida ante rutrum vel. Nunc bibendum nulla
-tellus, eget egestas sapien. Nam rhoncus interdum libero, eget congue orci
-imperdiet eu. Quisque pellentesque fringilla urna, ac venenatis ante ultricies
-et. Pellentesque habitant morbi tristique senectus et netus et malesuada fames
-ac turpis egestas. Mauris eleifend sagittis ultrices. Quisque ultrices accumsan
-nisl, sed pellentesque metus porta vitae. Nulla facilisi. In et nibh tincidunt
-mi volutpat pellentesque vitae nec sapien. Integer massa ipsum, pellentesque in
-elementum at, cursus sit amet diam.
diff --git a/examples/tagblog/templates/default.html b/examples/tagblog/templates/default.html
deleted file mode 100644
index 0537065..0000000
--- a/examples/tagblog/templates/default.html
+++ /dev/null
@@ -1,23 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
-"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
-<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
- <head>
- <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
- <title>SimpleBlog - $title$</title>
- <link rel="stylesheet" type="text/css" href="/css/default.css" />
- <link rel="alternate"
- type="application/rss+xml"
- title="SimpleBlog"
- href="/rss.xml" />
- </head>
- <body>
- <h1>SimpleBlog - $title$</h1>
- <div id="navigation">
- <a href="/">Home</a>
- <a href="/posts.html">All posts</a>
- </div>
-
- $body$
- </body>
-</html>
diff --git a/examples/tagblog/templates/index.html b/examples/tagblog/templates/index.html
deleted file mode 100644
index 7152d02..0000000
--- a/examples/tagblog/templates/index.html
+++ /dev/null
@@ -1,19 +0,0 @@
-<div id="posts">
- <h1>Recent posts</h1>
- <ul>
- $posts$
- </ul>
- <p><a href="/posts.html">All posts&hellip;</a></p>
-
- <h1>Tags</h1>
- <div>
- $tagcloud$
- </div>
-</div>
-
-<div class="about">
- <h1>About</h1>
- <p>
- This is a sample blog for educational purposes.
- </p>
-</div>
diff --git a/examples/tagblog/templates/post.html b/examples/tagblog/templates/post.html
deleted file mode 100644
index 0233fc1..0000000
--- a/examples/tagblog/templates/post.html
+++ /dev/null
@@ -1,7 +0,0 @@
-<h1>$title$</h1>
-
-<p>by <em>$author$</em> on <strong>$date$</strong></p>
-
-<p>Tagged as: $prettytags$.</p>
-
-$body$
diff --git a/examples/tagblog/templates/postitem.html b/examples/tagblog/templates/postitem.html
deleted file mode 100644
index ccbb58e..0000000
--- a/examples/tagblog/templates/postitem.html
+++ /dev/null
@@ -1,4 +0,0 @@
-<li>
- <a href="$url$">$title$</a>
- - <em>$date$</em> - by <em>$author$</em>
-</li>
diff --git a/examples/tagblog/templates/posts.html b/examples/tagblog/templates/posts.html
deleted file mode 100644
index 758c670..0000000
--- a/examples/tagblog/templates/posts.html
+++ /dev/null
@@ -1,4 +0,0 @@
-<h1>$title$</h1>
-<ul>
- $posts$
-</ul>