using zotero item key as filename

This commit is contained in:
Weihua Lu
2021-07-27 10:03:58 +08:00
parent 2f7e3f5b3f
commit f4c75158c6
4 changed files with 43 additions and 13 deletions

View File

@@ -690,6 +690,19 @@
(when (db/page-empty? (state/get-current-repo) (:db/id page))
(api-insert-new-block! "" {:page page-name})))))
(defn page-properties-block
[page format properties]
(let [content (property/insert-properties format "" properties)]
{:block/pre-block? true
:block/uuid (db/new-block-id)
:block/properties properties
:block/left page
:block/format format
:block/content content
:block/parent page
:block/unordered true
:block/page page}))
(defn default-properties-block
[title format page]
(let [properties (common-handler/get-page-default-properties title)