haunt: Support markdown posts.

diff --git a/haunt.scm b/haunt.scm
index b28e07ba259b547cc64e9e1c3af03bec5a879abe..461d39b5f9bcd7760e1a858a19e721463c1822d5 100644 (file)
--- a/haunt.scm
+++ b/haunt.scm
@@ -8,6 +8,7 @@
              (ice-9 match)  ; match-lambda
              (haunt reader)
              (haunt reader skribe)
              (ice-9 match)  ; match-lambda
              (haunt reader)
              (haunt reader skribe)

+             (haunt reader commonmark)

              (haunt site)
              (haunt asset)
              (haunt post) ;post-file-name
              (haunt site)
              (haunt asset)
              (haunt post) ;post-file-name


@@ -262,7 +263,7 @@ in parentheses."
       '((author . "Ricardo Wurmus")
         (email  . "rekado+web@elephly.net"))
       #:make-slug %make-slug
       '((author . "Ricardo Wurmus")
         (email  . "rekado+web@elephly.net"))
       #:make-slug %make-slug

-      #:readers (list skribe-reader html-reader)
+      #:readers (list commonmark-reader skribe-reader html-reader)

       #:builders (list (lambda (args . rest)
                          (wrap-pages "non-posts" "." default-layout
                                      (list skribe-reader html-reader)))
       #:builders (list (lambda (args . rest)
                          (wrap-pages "non-posts" "." default-layout
                                      (list skribe-reader html-reader)))