summaryrefslogtreecommitdiff
path: root/example
diff options
context:
space:
mode:
Diffstat (limited to 'example')
-rw-r--r--example/haunt.scm4
-rw-r--r--example/images/guile-banner.small.pngbin0 -> 20977 bytes
-rw-r--r--example/posts/foo.sxml6
3 files changed, 8 insertions, 2 deletions
diff --git a/example/haunt.scm b/example/haunt.scm
index 66a8392..35c7ae2 100644
--- a/example/haunt.scm
+++ b/example/haunt.scm
@@ -3,6 +3,7 @@
(haunt asset)
(haunt builder blog)
(haunt builder atom)
+ (haunt builder assets)
(srfi srfi-19))
(site #:title "Built with Guile"
@@ -13,4 +14,5 @@
#:readers (list sxml-reader html-reader)
#:builders (list (blog)
(atom-feed)
- (atom-feeds-by-tag)))
+ (atom-feeds-by-tag)
+ (static-directory "images")))
diff --git a/example/images/guile-banner.small.png b/example/images/guile-banner.small.png
new file mode 100644
index 0000000..0d9d5a0
--- /dev/null
+++ b/example/images/guile-banner.small.png
Binary files differ
diff --git a/example/posts/foo.sxml b/example/posts/foo.sxml
index 4edde18..d49d420 100644
--- a/example/posts/foo.sxml
+++ b/example/posts/foo.sxml
@@ -1,3 +1,5 @@
+;;; -*- scheme -*-
+
(use-modules (srfi srfi-41)
(haunt utils))
@@ -19,4 +21,6 @@ posts. Here are the first "
" fibonacci numbers, computed with SRFI-41!")
(pre ,(object->string
(stream->list
- (stream-take count fib)))))))
+ (stream-take count fib))))
+ (p "Guile Scheme is great, eh?")
+ (img (@ (src "/images/guile-banner.small.png"))))))