We only want to include POSTs in an INDEX for now.

This commit is contained in:
Brit Butler 2014-04-06 17:20:05 -04:00
parent 3ccc0fb5d0
commit b11b6fbf94

View file

@ -64,7 +64,7 @@
(defun render-indices () (defun render-indices ()
"Render the indices to view content in groups of size N, by month, and by tag." "Render the indices to view content in groups of size N, by month, and by tag."
(let ((results (by-date (hash-table-values *content*)))) (let ((results (by-date (find-all 'post))))
(dolist (tag (all-tags)) (dolist (tag (all-tags))
(render-index (index-by-tag tag results))) (render-index (index-by-tag tag results)))
(dolist (month (all-months)) (dolist (month (all-months))