소스 검색

revert unneeded naming change

Konstantinos Kaloutas 2 년 전
부모
커밋
4f0e8fffe3
1개의 변경된 파일3개의 추가작업 그리고 3개의 파일을 삭제
  1. 3 3
      src/main/frontend/handler/whiteboard.cljs

+ 3 - 3
src/main/frontend/handler/whiteboard.cljs

@@ -209,13 +209,13 @@
    (create-new-whiteboard-page! nil))
   ([name]
    (let [uuid (or (and name (parse-uuid name)) (d/squuid))
-         page-name (or name (str uuid))]
+         page (or name (str uuid))]
      (db/transact! (get-default-new-whiteboard-tx name (str uuid)))
-     (let [entity (get-whiteboard-entity page-name)
+     (let [entity (get-whiteboard-entity page)
            tx (assoc (select-keys entity [:db/id])
                      :block/uuid uuid)]
        (db-utils/transact! [tx])
-       (let [page-entity (get-whiteboard-entity page-name)]
+       (let [page-entity (get-whiteboard-entity page)]
          (when (and page-entity (nil? (:block/file page-entity)))
            (outliner-file/sync-to-file page-entity)))))))