summaryrefslogtreecommitdiff
path: root/website
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2015-08-08 09:42:24 -0400
committerDavid Thompson <dthompson2@worcester.edu>2015-08-08 09:42:24 -0400
commit49a34570cec2339c6fc8965474a41900920442b4 (patch)
tree6d772b2ee87603f3c25a745bee7edc83526409f8 /website
parentddf5b5417179cbf3d8cd17601d88d064d52553d9 (diff)
Add website.
Diffstat (limited to 'website')
-rw-r--r--website/Makefile2
-rw-r--r--website/css/main.css254
-rw-r--r--website/css/reset.css427
-rw-r--r--website/haunt.scm203
-rw-r--r--website/images/haunt.pngbin0 -> 8027 bytes
-rw-r--r--website/posts/0.1-release.sxml41
6 files changed, 927 insertions, 0 deletions
diff --git a/website/Makefile b/website/Makefile
new file mode 100644
index 0000000..dab5ed1
--- /dev/null
+++ b/website/Makefile
@@ -0,0 +1,2 @@
+publish:
+ rsync -P -rvz --delete site/ blog@dthompson.us:/var/www/haunt --cvs-exclude
diff --git a/website/css/main.css b/website/css/main.css
new file mode 100644
index 0000000..3469ba4
--- /dev/null
+++ b/website/css/main.css
@@ -0,0 +1,254 @@
+html {
+ font-size: 10px;
+
+ -webkit-tap-highlight-color: rgba(0, 0, 0, 0);
+}
+
+body {
+ font-family: "Helvetica Neue", Helvetica, Arial, sans-serif;
+ font-size: 14px;
+ line-height: 1.42857143;
+ color: #333;
+ background-color: #fff;
+}
+
+.container {
+ padding-right: 15px;
+ padding-left: 15px;
+ margin-right: auto;
+ margin-left: auto;
+}
+
+@media (min-width: 768px) {
+ .container {
+ width: 750px;
+ }
+}
+
+@media (min-width: 992px) {
+ .container {
+ width: 970px;
+ }
+}
+
+@media (min-width: 1200px) {
+ .container {
+ width: 1170px;
+ }
+}
+
+.text-center {
+ text-align: center;
+}
+
+.full-width {
+ width: 100%;
+}
+
+.center {
+ margin-left: auto;
+ margin-right: auto;
+}
+
+.navbar {
+ padding: 0;
+ min-height: 40px;
+ margin-bottom: 20px;
+ background-color: #333;
+ border-top: 1px solid #a1a1a1;
+ border-bottom: 1px solid #a1a1a1;
+}
+
+.navbar .container {
+ padding: 0;
+ position: relative;
+ min-height: 40px;
+}
+
+.navbar ul {
+ padding: 0;
+ height: 100%;
+}
+
+.navbar li {
+ display: inline;
+ text-decoration: none;
+ padding-right: 30px;
+ font-size: 20px;
+ height: 100%;
+}
+
+.navbar .logo {
+ float: left;
+}
+
+.navbar a {
+ color: #fff;
+ text-decoration: none;
+}
+
+.jumbotron {
+ padding: 30px;
+ margin-bottom: 30px;
+ color: inherit;
+ background-color: #eee;
+ font-size: 20px;
+}
+
+.row {
+ display: table;
+ margin-right: -15px;
+ margin-left: -15px;
+ width: 100%;
+}
+
+.column-logo, .column-info {
+ position: relative;
+ min-height: 1px;
+ padding-left: 15px;
+ padding-right: 15px;
+}
+
+.column-logo {
+ width: 40%;
+ float: left;
+}
+
+.column-info {
+ width: 50%;
+ float: left;
+}
+
+.big-logo {
+ display: block;
+ margin-left: auto;
+ margin-right: auto;
+}
+
+.btn {
+ display: inline-block;
+ padding: 6px 12px;
+ margin-bottom: 0;
+ font-size: 14px;
+ font-weight: normal;
+ line-height: 1.42857143;
+ text-align: center;
+ white-space: nowrap;
+ vertical-align: middle;
+ cursor: pointer;
+ -webkit-user-select: none;
+ -moz-user-select: none;
+ -ms-user-select: none;
+ user-select: none;
+ background-image: none;
+ border: 1px solid transparent;
+ border-radius: 4px;
+ text-decoration: none;
+}
+
+.btn:focus,
+.btn:active:focus,
+.btn.active:focus {
+ outline: thin dotted;
+ outline: 5px auto -webkit-focus-ring-color;
+ outline-offset: -2px;
+}
+
+.btn:hover,
+.btn:focus {
+ color: #286090;
+ text-decoration: none;
+}
+
+.btn:active,
+.btn.active {
+ background-image: none;
+ outline: 0;
+ -webkit-box-shadow: inset 0 3px 5px rgba(0, 0, 0, .125);
+ box-shadow: inset 0 3px 5px rgba(0, 0, 0, .125);
+}
+
+.btn-primary {
+ color: #fff;
+ background-color: #428bca;
+ border-color: #357ebd;
+}
+
+.btn-primary:hover,
+.btn-primary:focus,
+.btn-primary:active,
+.btn-primary.active {
+ color: #fff;
+ background-color: #3071a9;
+ border-color: #285e8e;
+}
+
+.btn-primary:active,
+.btn-primary.active {
+ background-image: none;
+}
+
+.btn-lg,
+.btn-group-lg > .btn {
+ padding: 10px 16px;
+ font-size: 18px;
+ line-height: 1.33;
+ border-radius: 6px;
+}
+
+pre,
+blockquote {
+ border: 1px solid #999;
+
+ page-break-inside: avoid;
+}
+
+pre {
+ display: block;
+ padding: 9.5px;
+ margin: 0 0 10px;
+ font-size: 13px;
+ line-height: 1.42857143;
+ color: #333;
+ word-break: break-all;
+ word-wrap: break-word;
+ background-color: #f5f5f5;
+ border: 1px solid #ccc;
+ border-radius: 4px;
+}
+
+th {
+ text-align: left;
+}
+
+.table {
+ width: 100%;
+ max-width: 100%;
+ margin-bottom: 20px;
+}
+
+.table > thead > tr > th,
+.table > tbody > tr > th,
+.table > tfoot > tr > th,
+.table > thead > tr > td,
+.table > tbody > tr > td,
+.table > tfoot > tr > td {
+ padding: 8px;
+ line-height: 1.42857143;
+ vertical-align: top;
+ border-top: 1px solid #ddd;
+}
+
+.table > thead > tr > th {
+ vertical-align: bottom;
+ border-bottom: 2px solid #ddd;
+}
+
+.table > caption + thead > tr:first-child > th,
+.table > colgroup + thead > tr:first-child > th,
+.table > thead:first-child > tr:first-child > th,
+.table > caption + thead > tr:first-child > td,
+.table > colgroup + thead > tr:first-child > td,
+.table > thead:first-child > tr:first-child > td {
+ border-top: 0;
+}
diff --git a/website/css/reset.css b/website/css/reset.css
new file mode 100644
index 0000000..458eea1
--- /dev/null
+++ b/website/css/reset.css
@@ -0,0 +1,427 @@
+/*! normalize.css v3.0.2 | MIT License | git.io/normalize */
+
+/**
+ * 1. Set default font family to sans-serif.
+ * 2. Prevent iOS text size adjust after orientation change, without disabling
+ * user zoom.
+ */
+
+html {
+ font-family: sans-serif; /* 1 */
+ -ms-text-size-adjust: 100%; /* 2 */
+ -webkit-text-size-adjust: 100%; /* 2 */
+}
+
+/**
+ * Remove default margin.
+ */
+
+body {
+ margin: 0;
+}
+
+/* HTML5 display definitions
+ ========================================================================== */
+
+/**
+ * Correct `block` display not defined for any HTML5 element in IE 8/9.
+ * Correct `block` display not defined for `details` or `summary` in IE 10/11
+ * and Firefox.
+ * Correct `block` display not defined for `main` in IE 11.
+ */
+
+article,
+aside,
+details,
+figcaption,
+figure,
+footer,
+header,
+hgroup,
+main,
+menu,
+nav,
+section,
+summary {
+ display: block;
+}
+
+/**
+ * 1. Correct `inline-block` display not defined in IE 8/9.
+ * 2. Normalize vertical alignment of `progress` in Chrome, Firefox, and Opera.
+ */
+
+audio,
+canvas,
+progress,
+video {
+ display: inline-block; /* 1 */
+ vertical-align: baseline; /* 2 */
+}
+
+/**
+ * Prevent modern browsers from displaying `audio` without controls.
+ * Remove excess height in iOS 5 devices.
+ */
+
+audio:not([controls]) {
+ display: none;
+ height: 0;
+}
+
+/**
+ * Address `[hidden]` styling not present in IE 8/9/10.
+ * Hide the `template` element in IE 8/9/11, Safari, and Firefox < 22.
+ */
+
+[hidden],
+template {
+ display: none;
+}
+
+/* Links
+ ========================================================================== */
+
+/**
+ * Remove the gray background color from active links in IE 10.
+ */
+
+a {
+ background-color: transparent;
+}
+
+/**
+ * Improve readability when focused and also mouse hovered in all browsers.
+ */
+
+a:active,
+a:hover {
+ outline: 0;
+}
+
+/* Text-level semantics
+ ========================================================================== */
+
+/**
+ * Address styling not present in IE 8/9/10/11, Safari, and Chrome.
+ */
+
+abbr[title] {
+ border-bottom: 1px dotted;
+}
+
+/**
+ * Address style set to `bolder` in Firefox 4+, Safari, and Chrome.
+ */
+
+b,
+strong {
+ font-weight: bold;
+}
+
+/**
+ * Address styling not present in Safari and Chrome.
+ */
+
+dfn {
+ font-style: italic;
+}
+
+/**
+ * Address variable `h1` font-size and margin within `section` and `article`
+ * contexts in Firefox 4+, Safari, and Chrome.
+ */
+
+h1 {
+ font-size: 2em;
+ margin: 0.67em 0;
+}
+
+/**
+ * Address styling not present in IE 8/9.
+ */
+
+mark {
+ background: #ff0;
+ color: #000;
+}
+
+/**
+ * Address inconsistent and variable font size in all browsers.
+ */
+
+small {
+ font-size: 80%;
+}
+
+/**
+ * Prevent `sub` and `sup` affecting `line-height` in all browsers.
+ */
+
+sub,
+sup {
+ font-size: 75%;
+ line-height: 0;
+ position: relative;
+ vertical-align: baseline;
+}
+
+sup {
+ top: -0.5em;
+}
+
+sub {
+ bottom: -0.25em;
+}
+
+/* Embedded content
+ ========================================================================== */
+
+/**
+ * Remove border when inside `a` element in IE 8/9/10.
+ */
+
+img {
+ border: 0;
+}
+
+/**
+ * Correct overflow not hidden in IE 9/10/11.
+ */
+
+svg:not(:root) {
+ overflow: hidden;
+}
+
+/* Grouping content
+ ========================================================================== */
+
+/**
+ * Address margin not present in IE 8/9 and Safari.
+ */
+
+figure {
+ margin: 1em 40px;
+}
+
+/**
+ * Address differences between Firefox and other browsers.
+ */
+
+hr {
+ -moz-box-sizing: content-box;
+ box-sizing: content-box;
+ height: 0;
+}
+
+/**
+ * Contain overflow in all browsers.
+ */
+
+pre {
+ overflow: auto;
+}
+
+/**
+ * Address odd `em`-unit font size rendering in all browsers.
+ */
+
+code,
+kbd,
+pre,
+samp {
+ font-family: monospace, monospace;
+ font-size: 1em;
+}
+
+/* Forms
+ ========================================================================== */
+
+/**
+ * Known limitation: by default, Chrome and Safari on OS X allow very limited
+ * styling of `select`, unless a `border` property is set.
+ */
+
+/**
+ * 1. Correct color not being inherited.
+ * Known issue: affects color of disabled elements.
+ * 2. Correct font properties not being inherited.
+ * 3. Address margins set differently in Firefox 4+, Safari, and Chrome.
+ */
+
+button,
+input,
+optgroup,
+select,
+textarea {
+ color: inherit; /* 1 */
+ font: inherit; /* 2 */
+ margin: 0; /* 3 */
+}
+
+/**
+ * Address `overflow` set to `hidden` in IE 8/9/10/11.
+ */
+
+button {
+ overflow: visible;
+}
+
+/**
+ * Address inconsistent `text-transform` inheritance for `button` and `select`.
+ * All other form control elements do not inherit `text-transform` values.
+ * Correct `button` style inheritance in Firefox, IE 8/9/10/11, and Opera.
+ * Correct `select` style inheritance in Firefox.
+ */
+
+button,
+select {
+ text-transform: none;
+}
+
+/**
+ * 1. Avoid the WebKit bug in Android 4.0.* where (2) destroys native `audio`
+ * and `video` controls.
+ * 2. Correct inability to style clickable `input` types in iOS.
+ * 3. Improve usability and consistency of cursor style between image-type
+ * `input` and others.
+ */
+
+button,
+html input[type="button"], /* 1 */
+input[type="reset"],
+input[type="submit"] {
+ -webkit-appearance: button; /* 2 */
+ cursor: pointer; /* 3 */
+}
+
+/**
+ * Re-set default cursor for disabled elements.
+ */
+
+button[disabled],
+html input[disabled] {
+ cursor: default;
+}
+
+/**
+ * Remove inner padding and border in Firefox 4+.
+ */
+
+button::-moz-focus-inner,
+input::-moz-focus-inner {
+ border: 0;
+ padding: 0;
+}
+
+/**
+ * Address Firefox 4+ setting `line-height` on `input` using `!important` in
+ * the UA stylesheet.
+ */
+
+input {
+ line-height: normal;
+}
+
+/**
+ * It's recommended that you don't attempt to style these elements.
+ * Firefox's implementation doesn't respect box-sizing, padding, or width.
+ *
+ * 1. Address box sizing set to `content-box` in IE 8/9/10.
+ * 2. Remove excess padding in IE 8/9/10.
+ */
+
+input[type="checkbox"],
+input[type="radio"] {
+ box-sizing: border-box; /* 1 */
+ padding: 0; /* 2 */
+}
+
+/**
+ * Fix the cursor style for Chrome's increment/decrement buttons. For certain
+ * `font-size` values of the `input`, it causes the cursor style of the
+ * decrement button to change from `default` to `text`.
+ */
+
+input[type="number"]::-webkit-inner-spin-button,
+input[type="number"]::-webkit-outer-spin-button {
+ height: auto;
+}
+
+/**
+ * 1. Address `appearance` set to `searchfield` in Safari and Chrome.
+ * 2. Address `box-sizing` set to `border-box` in Safari and Chrome
+ * (include `-moz` to future-proof).
+ */
+
+input[type="search"] {
+ -webkit-appearance: textfield; /* 1 */
+ -moz-box-sizing: content-box;
+ -webkit-box-sizing: content-box; /* 2 */
+ box-sizing: content-box;
+}
+
+/**
+ * Remove inner padding and search cancel button in Safari and Chrome on OS X.
+ * Safari (but not Chrome) clips the cancel button when the search input has
+ * padding (and `textfield` appearance).
+ */
+
+input[type="search"]::-webkit-search-cancel-button,
+input[type="search"]::-webkit-search-decoration {
+ -webkit-appearance: none;
+}
+
+/**
+ * Define consistent border, margin, and padding.
+ */
+
+fieldset {
+ border: 1px solid #c0c0c0;
+ margin: 0 2px;
+ padding: 0.35em 0.625em 0.75em;
+}
+
+/**
+ * 1. Correct `color` not being inherited in IE 8/9/10/11.
+ * 2. Remove padding so people aren't caught out if they zero out fieldsets.
+ */
+
+legend {
+ border: 0; /* 1 */
+ padding: 0; /* 2 */
+}
+
+/**
+ * Remove default vertical scrollbar in IE 8/9/10/11.
+ */
+
+textarea {
+ overflow: auto;
+}
+
+/**
+ * Don't inherit the `font-weight` (applied by a rule above).
+ * NOTE: the default cannot safely be changed in Chrome and Safari on OS X.
+ */
+
+optgroup {
+ font-weight: bold;
+}
+
+/* Tables
+ ========================================================================== */
+
+/**
+ * Remove most spacing between table cells.
+ */
+
+table {
+ border-collapse: collapse;
+ border-spacing: 0;
+}
+
+td,
+th {
+ padding: 0;
+}
diff --git a/website/haunt.scm b/website/haunt.scm
new file mode 100644
index 0000000..f1322a9
--- /dev/null
+++ b/website/haunt.scm
@@ -0,0 +1,203 @@
+;;; Haunt --- Static site generator for GNU Guile
+;;; Copyright © 2015 David Thompson <davet@gnu.org>
+;;;
+;;; This file is part of Haunt.
+;;;
+;;; Haunt is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or
+;;; (at your option) any later version.
+;;;
+;;; Haunt is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+;;; General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with Haunt. If not, see <http://www.gnu.org/licenses/>.
+
+(use-modules (haunt site)
+ (haunt reader)
+ (haunt asset)
+ (haunt page)
+ (haunt post)
+ (haunt html)
+ (haunt utils)
+ (haunt builder blog)
+ (haunt builder atom)
+ (haunt builder assets)
+ (srfi srfi-19)
+ (ice-9 rdelim)
+ (ice-9 match)
+ (web uri))
+
+(define %releases
+ '(("0.1" "1f751f234e382ed0f13d79e4c106373e9ae55c23")))
+
+(define (tarball-url version)
+ (string-append "http://files.dthompson.us/haunt/haunt-"
+ version ".tar.gz"))
+
+(define %download-button
+ (match %releases
+ (((version sha1) . _)
+ `(a (@ (class "btn btn-primary btn-lg")
+ (role "button")
+ (href ,(tarball-url version)))
+ "Download Haunt " ,version))))
+
+(define (stylesheet name)
+ `(link (@ (rel "stylesheet")
+ (href ,(string-append "/css/" name ".css")))))
+
+(define (anchor content uri)
+ `(a (@ (href ,uri)) ,content))
+
+(define (logo src)
+ `(img (@ (class "logo") (src ,(string-append "/images/" src)))))
+
+(define (jumbotron content)
+ `(div (@ (class "jumbotron"))
+ (div (@ (class "row"))
+ (div (@ (class "column-logo"))
+ (img (@ (class "big-logo")
+ (src "/images/haunt.png"))))
+ (div (@ (class "column-info")) ,content))))
+
+(define %cc-by-sa-link
+ '(a (@ (href "https://creativecommons.org/licenses/by-sa/4.0/"))
+ "Creative Commons Attribution Share-Alike 4.0 International"))
+
+(define haunt-theme
+ (theme #:name "Haunt"
+ #:layout
+ (lambda (site title body)
+ `((doctype "html")
+ (head
+ (meta (@ (charset "utf-8")))
+ (title ,(string-append title " — " (site-title site)))
+ ,(stylesheet "reset")
+ ,(stylesheet "main"))
+ (body
+ (header (@ (class "navbar"))
+ (div (@ (class "container"))
+ (ul
+ (li ,(anchor "home" "/"))
+ (li ,(anchor "downloads" "/downloads.html"))
+ (li ,(anchor "git"
+ "https://git.dthompson.us/haunt.git")))))
+ (div (@ (class "container"))
+ ,body
+ (footer (@ (class "text-center"))
+ (p (small "Copyright © 2015 David Thompson"))
+ (p
+ (small "The text and images on this site are free
+culture works available under the " ,%cc-by-sa-link " license.")))))))
+ #:post-template
+ (lambda (post)
+ `((h2 ,(post-ref post 'title))
+ (h3 "by " ,(post-ref post 'author)
+ " — " ,(date->string* (post-date post)))
+ (div ,(post-sxml post))))
+ #:collection-template
+ (lambda (site title posts prefix)
+ (define (post-uri post)
+ (string-append "/" (or prefix "")
+ (site-post-slug site post) ".html"))
+
+ `(,(jumbotron
+ `((p "Haunt is a simple, functional, hackable static site
+generator written in Guile Scheme that gives authors the ability to
+treat websites as programs.")
+ ,%download-button))
+
+ (p "Haunt isn't your average static site generator. Its
+mission is to give authors the full expressive power of Scheme to
+define every aspect of their websites are generated. Haunt uses a
+simple, functional build system that allows any type of web page to be
+built by writing procedures that return page objects.")
+ (p "Haunt has no opinion about what markup language
+authors should use to write posts. Just write the relevant reader
+procedure and Haunt will happily work with that format. Likewise,
+Haunt has no opinion about how authors structure their sites. Haunt
+ships with helpful builder procedures that generate simple blogs or
+Atom feeds, but authors should feel empowered to tweak them, write
+replacements, or add new builders to do things that the Haunt hackers
+didn't think of.")
+ (p "Here's what a simple Haunt configuration looks
+like:")
+ (pre
+ ,(call-with-input-file "../example/haunt.scm" read-string))
+
+ (p "With the above saved into a file named "
+ (code "haunt.scm")
+ " and a "
+ (code "posts")
+ " directory populated with the articles to publish,
+the site can be built by running "
+ (code "haunt build")
+ ". Once the site is built, running "
+ (code "haunt serve")
+ " and visiting "
+ (code "localhost:8080")
+ " in a web browser will show the results of the build
+without needing to upload the generated files to a web server.")
+
+ (h2 "News")
+ (ul
+ ,@(map (lambda (post)
+ `(li
+ (a (@ (href ,(post-uri post)))
+ ,(post-ref post 'title)
+ " — "
+ ,(date->string* (post-date post)))))
+ (posts/reverse-chronological posts)))
+
+ (h2 "Contributing")
+ (p "Patches to fix bugs or add new functionality are
+highly encouraged. In lieu of a mailing list, please send patches
+to "
+ (code "davet") " at " (code "gnu") " dot " (code "org")
+ " for now.")
+ (p "To get the latest version of the source code, clone
+the official git repository:")
+ (pre "git clone git://dthompson.us/haunt.git")))))
+
+(define (downloads-page site posts)
+ (define body
+ `(,(jumbotron
+ `(,%download-button
+ (p (small "SHA1 checksum: "
+ ,(match %releases (((_ sha1) . _) sha1))))))
+ (h2 "Downloads")
+ (table (@ (class "table"))
+ (thead
+ (tr (th "Source") (th "SHA1")))
+ (tbody
+ ,(map (match-lambda
+ ((version sha1)
+ `(tr
+ (td (a (@ (href ,(tarball-url version)))
+ ,(string-append "haunt-" version ".tar.gz")))
+ (td ,sha1))))
+ %releases)))))
+
+ (make-page "downloads.html"
+ (with-layout haunt-theme site "Downloads" body)
+ sxml->html))
+
+(define %collections
+ `(("Home" "index.html" ,posts/reverse-chronological)))
+
+(site #:title "Haunt"
+ #:domain "dthompson.us"
+ #:default-metadata
+ '((author . "David Thompson")
+ (email . "davet@gnu.org"))
+ #:readers (list sxml-reader html-reader)
+ #:builders (list (blog #:theme haunt-theme #:collections %collections)
+ (atom-feed)
+ (atom-feeds-by-tag)
+ downloads-page
+ (static-directory "images")
+ (static-directory "css")))
diff --git a/website/images/haunt.png b/website/images/haunt.png
new file mode 100644
index 0000000..4e18300
--- /dev/null
+++ b/website/images/haunt.png
Binary files differ
diff --git a/website/posts/0.1-release.sxml b/website/posts/0.1-release.sxml
new file mode 100644
index 0000000..17d18ca
--- /dev/null
+++ b/website/posts/0.1-release.sxml
@@ -0,0 +1,41 @@
+;;; -*- scheme -*-
+
+(use-modules (haunt utils))
+
+`((title . "Introducing Haunt")
+ (date . ,(string->date* "2015-08-08 10:00"))
+ (tags "news" "releases")
+ (summary . "Haunt 0.1 released")
+ (content
+ ((p "I am pleased to announce the first alpha release of Haunt, yet
+another static site generator. Does the world really need another one
+of those? No, but Haunt is special because it is written in Guile
+Scheme, a clean and elegant Lisp dialect, which allows users to
+compose their websites using functional programming techniques. Using
+a general-purpose, extensible programming language to build websites
+allows Haunt users to view their website as not just mere data, but a
+program. Haunt empowers the user to build the abstractions they need
+to make a great static website without getting in the way.")
+ (p "At its core, Haunt is a very simple program. To build your
+site, Haunt takes your posts and static assets as input, passes them
+to a series of user-defined building procedures that return one or
+more pages, and outputs all of the generated pages to the file system.
+That's all there is to it. All of the \"good stuff\" is implemented
+in the builder procedures. Haunt 0.1 comes with simple blog and Atom
+feed generators.")
+ (p "Naturally, this website is built with Haunt. You can see its
+complete source code in the "
+ (code "website") " directory in Haunt's "
+ (a (@ (href "https://git.dthompson.us/haunt.git/tree/HEAD:/website"))
+ "official git repository")
+ ".")
+ (p "The Haunt 0.1 release tarball URL can be found on the "
+ (a (@ (href "/downloads.html")) "downloads page")
+ ".")
+ (p "Haunt is built to be as hackable as possible, and patches to
+improve it are very much welcome. In particular, new post readers for
+common formats such as org-mode and Markdown are desired, along with a
+more robust blog builder and theme engine. In lieu of a mailing list,
+patches may be sent to "
+ (code "davet") " at " (code "gnu.org") ".")
+ (p "Happy haunting!"))))