chore: add format to build-new-page

every use of it was adding it manually
pull/11196/head
Gabriel Horner 2024-04-04 09:25:18 -04:00
parent 3e504f5ab9
commit 7c1f52d2a4
5 changed files with 9 additions and 12 deletions

View File

@ -42,8 +42,7 @@
[property]
(let [page-name (str hidden-page-name-prefix (:db/ident property))]
(-> (sqlite-util/build-new-page page-name)
(assoc :block/type #{"hidden"}
:block/format :markdown))))
(assoc :block/type #{"hidden"}))))
(defn build-closed-values
"Builds all the tx needed for property with closed values including

View File

@ -63,8 +63,7 @@
:file/content ""
:file/last-modified-at (js/Date.)}]
default-pages (->> (map sqlite-util/build-new-page built-in-pages-names)
(map #(assoc % :block/format :markdown))
(map #(default-db/mark-block-as-built-in %)))
(map default-db/mark-block-as-built-in))
default-properties (build-initial-properties)
db-ident->properties (zipmap
(map :db/ident default-properties)

View File

@ -111,4 +111,5 @@
{:block/name (common-util/page-name-sanity-lc page-name)
:block/original-name page-name
:block/journal? false
:block/uuid (d/squuid)}))
:block/uuid (d/squuid)
:block/format :markdown}))

View File

@ -21,7 +21,7 @@
(let [conn (new-db-conn)
_ (d/transact! conn [(sqlite-util/build-new-property :user.property/foo "foo" {})
(sqlite-util/build-new-property :user.property/foo2 "foo2" {})
(assoc (sqlite-util/build-new-page "Page") :block/format :markdown)
(sqlite-util/build-new-page "Page")
{:block/original-name "Page" :user.property/foo "bar"}])]
(is (= ["Page"]
(->> (q-with-rules '[:find (pull ?b [:block/original-name]) :where (has-page-property ?b :user.property/foo)]
@ -45,8 +45,8 @@
(sqlite-util/build-new-property :user.property/foo2 "foo2" {})
(sqlite-util/build-new-property :user.property/number-many "number-many" {:type :number :cardinality :many})
(sqlite-util/build-new-property :user.property/page-many "page-many" {:type :page :cardinality :many})
(assoc (sqlite-util/build-new-page "Page") :block/format :markdown)
(assoc (sqlite-util/build-new-page "Page A") :block/format :markdown)
(sqlite-util/build-new-page "Page")
(sqlite-util/build-new-page "Page A")
{:block/original-name "Page" :user.property/foo "bar"}
{:block/original-name "Page" :user.property/number-many #{5 10}}
{:block/original-name "Page" :user.property/page-many #{[:block/original-name "Page A"]}}

View File

@ -183,8 +183,7 @@
(assoc (sqlite-util/build-new-page
(date-time-util/int->journal-title deadline (common-config/get-date-formatter user-config)))
:block/journal? true
:block/journal-day deadline
:block/format :markdown))]
:block/journal-day deadline))]
(-> block
(update :block/properties assoc deadline-prop (:block/uuid deadline-page))
(update :block/refs (fnil into []) [:logseq.task/deadline deadline-page])
@ -204,8 +203,7 @@
(assoc (sqlite-util/build-new-page
(date-time-util/int->journal-title scheduled (common-config/get-date-formatter user-config)))
:block/journal? true
:block/journal-day scheduled
:block/format :markdown))]
:block/journal-day scheduled))]
(-> block
(update :block/properties assoc scheduled-prop (:block/uuid scheduled-page))
(update :block/refs (fnil into []) [:logseq.task/scheduled scheduled-page])