@@ -10,11 +10,11 @@ racket/file racket/date racket/string db/base "dust.rkt" - "crystalize.rkt") + "cache.rkt") (provide main) (define feed-author default-authorname) (define feed-author-email "joel@jdueck.net") @@ -52,19 +52,19 @@ `title_plain` AS `title`, `published`, `updated`, `author`, `doc_html` AS `entry_contents` - FROM `articles` + FROM `articles` WHERE (NOT (`conceal` LIKE "%all%")) AND (NOT (`conceal` LIKE "%feed%")) UNION SELECT `page` || '#' || `html_anchor` AS `path`, `title_plain` AS `title`, `published`, "" AS `updated`, `author`, `content_html` as `entry_contents` - FROM `notes`) + FROM `notes` WHERE (NOT (`conceal` LIKE "%all%")) AND (NOT (`conceal` LIKE "%feed%"))) ORDER BY `published` DESC LIMIT ~a --- ) (query-rows cache-conn (format select feed-item-limit)))