# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1650331465 14400
# Node ID 1b2288cf32af9ddbdc5978b206a044f406aa89f4
# Parent  edeb31bc40ccb161386fa4353250481e1f139e89
Remove draft entries from RSS too

diff -r edeb31bc40cc -r 1b2288cf32af generate.lisp
--- a/generate.lisp	Mon Apr 18 21:22:30 2022 -0400
+++ b/generate.lisp	Mon Apr 18 21:24:25 2022 -0400
@@ -431,7 +431,7 @@
   (render "build/rss.xml"
       (:times (mapcar #'modified-timestamp entries)
        :mode :xml)
-    (t/rss entries)))
+    (t/rss (remove-if #'draft (remove-if #'hidden entries)))))
 
 
 ;;;; Toplevel -----------------------------------------------------------------