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))