@@ -21,11 +21,10 @@ (schema-out cache:series) (schema-out cache:index-entry) (schema-out listing) delete-article! delete-notes! - current-plain-title articles articles+notes listing-htmls fenced-listing unfence @@ -35,12 +34,10 @@ ;; Cache DB and Schemas (define DBFILE (build-path (current-project-root) "vitreous.sqlite")) (define cache-conn (make-parameter (sqlite3-connect #:database DBFILE #:mode 'create))) -(define current-plain-title (make-parameter "void")) - (define-schema cache:article #:table "articles" ([id id/f #:primary-key #:auto-increment] [page symbol/f] [title-plain string/f] [title-html-flow string/f]