From 04937e88bf061a82b35995ef6e5261c6c3df049e Mon Sep 17 00:00:00 2001 From: Brit Butler Date: Tue, 1 Jan 2013 20:07:31 -0500 Subject: [PATCH] Minor thinko/bugfix. --- src/posts.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/posts.lisp b/src/posts.lisp index 06e23e0..d251a8a 100644 --- a/src/posts.lisp +++ b/src/posts.lisp @@ -25,7 +25,7 @@ (defmethod discover ((content-type (eql :post))) (purge-all 'post) (do-files (file (repo *config*) "post") - (let ((post (construct :post (read-content file t)))) + (let ((post (construct 'post (read-content file t)))) (if (gethash (content-slug post) *content*) (error "There is already an existing post with the slug ~a." (content-slug post))