fix: create new whiteboard function

pull/6802/head
Konstantinos Kaloutas 2022-09-22 18:17:06 +03:00
parent 189d68d9a7
commit fc69eb9a2a
1 changed files with 1 additions and 1 deletions

View File

@ -126,7 +126,7 @@
(create-new-whiteboard-page! nil)) (create-new-whiteboard-page! nil))
([name] ([name]
(let [name (or name (str (d/squuid))) (let [name (or name (str (d/squuid)))
uuid (parse-uuid name) uuid (uuid name)
tldr (get-default-tldr (str uuid))] tldr (get-default-tldr (str uuid))]
(transact-tldr! name (get-default-tldr (str uuid))) (transact-tldr! name (get-default-tldr (str uuid)))
(let [entity (get-whiteboard-entity name) (let [entity (get-whiteboard-entity name)