fix: public pages are empty

src/main/frontend/components/page.cljs

@@ -282,8 +282,7 @@
                        journal?
                        (= page-name (string/lower-case (date/journal-name))))
                developer-mode? (state/sub [:ui/developer-mode?])
-               published? (= "true" (:published properties))
-               public? (= "true" (:public properties))]
+               public? (true? (:public properties))]
            [:div.flex-1.page.relative (if (seq (:block/tags page))
                                         (let [page-names (model/get-page-names-by-ids (map :db/id (:block/tags page)))]
                                           {:data-page-tags (text/build-data-value page-names)})

src/main/frontend/db/model.cljs

@@ -1118,9 +1118,10 @@
   (-> (d/q
        '[:find ?p
          :where
-         [?p :block/properties ?d]
-         [(get ?d :public) ?pub]
-         [(= "true" ?pub)]]
+         [?p :block/name]
+         [?p :block/properties ?properties]
+         [(get ?properties :public) ?pub]
+         [(= true ?pub)]]
        db)
       (db-utils/seq-flatten)))